❶ 如何用Flash as腳本製作以下效果 滑鼠移動時在主場景上畫出線條，線條只保留5秒內畫的，之前
說說我想到的，5秒，如果是每隔5秒刪除一次，那麼as2用時間間隔函數，as3用timer。
構成封閉圖形，其實就是有點重疊了，你只要把繪制的點放進數組，每繪制一個點，for遍歷一下，這樣就是耗CPU。
❷ 滑鼠怎麼使用才可以在網頁上畫出紅線
一般來說 除非網頁本身支持，類似於畫圖一類的功能， 才可以畫出線。
不過 如果瀏覽器支持滑鼠手勢，並打開了軌跡顯示， 那麼按住右鍵是可以劃線的。
松開滑鼠後會消失。
不知道是不是你要的效果。
滑鼠手勢可以在瀏覽器設置中打開
❸ 求一個按鍵精靈滑鼠左右連點腳本
Declare Function GetKeyState Lib "user32" Alias "GetKeyState" (ByVal vKey As Long) As Integer
Dim Astat //定義狀態記錄變數
Astat = 0//賦初值， =0表示沒有被按下
Global asas
While 1
n= GetKeyState(192) //A
If n<>Astat Then
Astat = n
If (n >= 0) Then
asas = 1
Else
asas = 0
線程ID=BeginThread(abc)
end if
End If
Wend
Sub abc
Do
LeftClick 1
Delay 300
RightClick 1
Delay 200
Loop Until asas=1
End sub
❹ 求助：一個簡單的滑鼠點擊腳本
這種腳本軟體的，你直接通過《無敵點擊狗》軟體就能實現，無敵點擊狗支持靈活多樣的點擊按鍵模擬，能給你自動錄入和點擊等！
❺ 按鍵精靈 編寫腳本 如何讓滑鼠移動
滑鼠移動 move 例如50,80 deplay 48000 滑鼠移動 move 例如90,100 deplay 48000 然後套個循環
❻ 求一個按鍵精靈滑鼠腳本 獲取滑鼠當前位置位置 並以中心點,循環然後畫半徑30的圓
GetCursorPos x, y
r=30
While n<3.1415926*2
x1=x+r*cos(n)
y1=y-r*sin(n)
MoveTo x1,y1
Delay 20
n=n+0.03
Wend
這是畫圓代碼
❼ 按鍵精靈，查找滑鼠形狀腳本，誰能讓這個腳本聽話呢
varr = GetCursorShape(1) '得到滑鼠的形狀特徵並記錄
TracePrint varr
i = 0
For 3
i = i + 1
TracePrint i
delay 1000//加點延時
var = GetCursorShape(1)'再次獲取形狀特徵
TracePrint var
If var = varr Then
If i = 1 Then
Call aa(53)
ElseIf i = 2 Then
Call aa(54)
ElseIf i = 3 Then
Call aa(52)
End If
Else
Call Plugin.Msg.Tips("滑鼠的形狀特徵與上次不吻合")
End If
Next
Sub aa(key)
Delay 2500
KeyPress key, 1
End Sub
❽ 求 滑鼠在屏幕上自動移動的腳本
你會用按鍵精靈的抓點嗎?如果會,把要跑動的坐標點給我發過來,1,2個坐標點就行,給你寫腳本模塊,然後你自己編輯就好了
❾ 我要找一個用滑鼠畫一個簡單的圓的按鍵精靈的腳本，不用很規則的圓，差不多就行，一定要簡單，快速
用滑鼠畫一個圓
Gosub 畫圓
Sub 畫圓()
r=300:x0=512:y0=384:x=0:y=0:n=0
While n<3.1415926*2
x=x0+r*cos(n)
y=y0-r*sin(n)
MoveTo x,y
Delay 5
n=n+0.03
Wend
End sub
❿ 按鍵精靈中的腳本怎樣設計成使滑鼠畫圈
n=1 Rem star If ………………（否定條件） SayString n KeyPress 13,1 n=n+1 EndIf Goto star 自己改改 如果你想更一步深入了解的話， 請瀏覽：bbs.7gg.net這個論壇，上面有個傳奇交流專版，簡單易懂，還有情感版塊,生活版塊。音樂版塊。更可以接觸到熱愛傳奇的朋友們。希望能幫到你。 追問： 我還不太會用編程的那些步驟能告訴一下Q在詳細的問問么