星尘传说内存.doc

[General]
Description=¾«ÁéÍâ´«
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=¼òµ¥¹Ò»ú½Å±¾
ÄÚ´æ¶ÁÈ˺͹ֵÄѪ£¬ÄÜÊÊÖи÷ÖÖ·Ö±çÂʵÄÆÁÄ»
´ò¹Ö¼Æʱ·ÀµØÐο¨ËÀ£¬ÈËÔÚÔ­µØÅܲ½
ÈËÎïËÀÍö½Å±¾Í£Ö¹
[Script]
UserVar a=3 µÚÒ»¸ö¼¼ÄÜÊý×Ö¼ü2
UserVar b=7 µÚ¶þ¸ö¼¼ÄÜÊý×Ö¼ü3
UserVar c=15 µÚÈý¸ö¼¼ÄÜÊý×Ö¼ü4
UserVar d=30 µÚËĸö¼¼ÄÜÊý×Ö¼ü5
UserVar fz=600 ¸¨Öú¼¼ÄܼüÊý×Ö¼ü6
UserVar ds=60 ¼Æʱ´ò¹Ö
jn1=now
jn2=now
jn3=now
jn4=now
dsjn=now
fzjn=now
//ÏÂÃæÕâ¾äÊDzéÕÒ´°¿ÚÀàÃû(0)»òÕß±êÌâ("¡¶¾«ÁéÍâ´«¡·"),·µ»ØÕÒµ½µÄ¾ä±úHwnd
Plugin Hwnd = Window.Find(0, "¡¶¾«ÁéÍâ´«¡·")
KeyPress 54,1
Rem ´ò¹Ö
Gosub ÈËÎïµÄѪ
Gosub ¹ÖÎïµÄѪ
If GW2>0 and GW2 <20000
//СÓÚ20000ÊǹýÂËBOSS¹Ö£¬¿ÉÒÔ×Ô¼ºÐÞ¸Ä
Gosub ¼¼ÄÜ
Gosub ´ò¹Ö¼Æʱ
Goto ´ò¹Ö
Else
dsjn=now
KeyPress 32,1
Delay 100
KeyPress 32,1
Delay 100
KeyPress 9,1
Delay 100
KeyPress 49,1
Goto ´ò¹Ö
EndIf
Sub ¼¼ÄÜ
If DateDiff("s",jn1,now)>=a
Delay 100
KeyPress 50,1
jn1=now
Else
EndIf
If DateDiff("s",jn2,now)>=b
Delay 100
KeyPress 51,1
jn2=now
Else
EndIf
If DateDiff("s",jn3,now)>=c
Delay 100
KeyPress 52,1
jn3=now
Else
EndIf
If DateDiff("s",jn4,now)>=d
Delay 100
KeyPress 53,1
jn4=now
Else
EndIf
If DateDiff("s",fzjn,now)>=fz
KeyPress 54,1
fzjn=now
Else
EndIf
Return ¼¼ÄÜ
Sub ´ò¹Ö¼Æʱ
//·ÀÖ¹µØÐο¨×¡²»ÄÜ´ò¹Ö,սʿ¿ÉÄܱ»¿¨×¡,»òÕßÎäÆ÷±¬ÁË
If DateDiff("s",dsjn,now)>=ds
dsjn=now
KeyPress 9,1
Delay 100
KeyPress 49,1
Else
EndIf
Return ´ò¹Ö¼Æʱ
Sub ¹ÖÎïµÄѪ
//ÏÂÃæÕâ¾äÊǶÁÈ¡32λÄÚ´æÊýÖµ(&H0696E450)ÄÚ´æµØÖ··µ»Øµ½±äÁ¿(GW)
Plugin GW = Memory.Read32Bit(Hwnd, &H069BA668)
GW1=GW+1256
Plugin GW2 = Memory.Read32Bit(Hwnd,GW1)
Return ¹ÖÎïµÄѪ
Sub ÈËÎïµÄѪ
//ÏÂÃæÕâ¾äÊǶÁÈ¡32λÄÚ´æÊýÖµ(&H19A5904)ÄÚ´æµØÖ··µ»Øµ½±äÁ¿(Val)
Plugin Val = Memory.Read32Bit(Hwnd, &H019A5904)
//MessageBox Val
hp=val+1192
//ÏÂÃæÕâ¾äÊǶÁÈ¡32λÄÚ´æÊýÖµ(HP)ÄÚ´æµØÖ··µ»Øµ½±äÁ¿(HP1)
Plugin HP1 = Memory.Read32Bit(Hwnd,hp)
If HP1=0
MessageBox "ÈËÎïÒѾ­ËÀÍö"
EndScript
EndIf
Return ÈËÎïµÄѪ