[General]Description=熱血江湖職業血醫掛機指令碼BeginHotkey=122BeginHotkeyMod=0RunOnce=0Enable=1[Repeat]Type=1Number=14266328[Comment]Content=熱血江湖職業血醫掛機指令碼.F2=群療.F3=紅.F4=藍.F9=回城符.[Script]Dim redmax,bluemax,redB,blueB,red,blue,redGohome,lanVBSCall Call ReadMemory(&h0140a246,1,lan)VBSCall Call ReadMemory(&h0140a044,1,redmax)VBSCall Call ReadMemory(&h0140a048,1,bluemax)redGohome=redmax/100*20redB=redmax/100*60blueB=bluemax/100*20SayString 我帶了Delay 20SayExpression lanDelay 20SayString 個藍。KeyPress 13 1Delay 500MoveTo 80 19Delay 100LeftClick 1Rem start1VBSCall Call ReadMemory(&h0140a038,1,red)VBSCall Call ReadMemory(&h0140a03c,1,blue)If red<redBKeyDown 114 1Delay 200KeyUp 114 1EndIfIf red<redGohomeRem endKeyPress 120 1Delay 10000EndScriptEndIfIf blue<blueBKeyDown 115 1Delay 500KeyUp 115 1VBS lan=lan-1EndIfKeyPress 113 1Delay 30If lan<50KeyDown 18 1KeyPress 70 1KeyUp 18 1Delay 100For 2SayString 藍還有Delay 30SayExpression lanDelay 30SayString 個,把藍扔到我腳邊!KeyPress 13 1Delay 200SayString 請扔點藍給我,但別壓垮了我,大家小心了。KeyPress 13 1Delay 200KeyPress 113 1Delay 30EndForGosub jianlanIf lan<10For 2SayString 藍還有Delay 20SayExpression lanDelay 20SayString 個,沒藍我就回城啦!886KeyPress 13 1Delay 200KeyPress 113 1Delay 30EndForGosub jianlanIf lan<5Goto endEndIfEndIfEndIfGoto start1Sub jianlanFor 5MiddleClick 1Delay 200EndForVBSCall Call ReadMemory(&h0140a246,1,lan)SayString 現在有Delay 20SayExpression lanDelay 20SayString 個藍,大家繼續啊!KeyPress 13 1Delay 500MoveTo 80 19Delay 100LeftClick 1Delay 50KeyPress 113 1Delay 30Return jianlan這是我今天剛做的熱血江湖醫生群療指令碼,在1.6版上測試透過,當藍不到50個時會提示打手們扔藍給醫生,適合醫生掛通宵,少於10個藍再得不到補藍就提示要回城了,當少於5個時就直接回城。打手們扔藍時請把藍扔在醫生邊上,扔多少隨便,只要醫生能拿的起來。打手不適用這指令碼。我用的是按鍵精靈5.5版F2=群療F3=放紅F4=放藍F9=回城符
[General]Description=熱血江湖職業血醫掛機指令碼BeginHotkey=122BeginHotkeyMod=0RunOnce=0Enable=1[Repeat]Type=1Number=14266328[Comment]Content=熱血江湖職業血醫掛機指令碼.F2=群療.F3=紅.F4=藍.F9=回城符.[Script]Dim redmax,bluemax,redB,blueB,red,blue,redGohome,lanVBSCall Call ReadMemory(&h0140a246,1,lan)VBSCall Call ReadMemory(&h0140a044,1,redmax)VBSCall Call ReadMemory(&h0140a048,1,bluemax)redGohome=redmax/100*20redB=redmax/100*60blueB=bluemax/100*20SayString 我帶了Delay 20SayExpression lanDelay 20SayString 個藍。KeyPress 13 1Delay 500MoveTo 80 19Delay 100LeftClick 1Rem start1VBSCall Call ReadMemory(&h0140a038,1,red)VBSCall Call ReadMemory(&h0140a03c,1,blue)If red<redBKeyDown 114 1Delay 200KeyUp 114 1EndIfIf red<redGohomeRem endKeyPress 120 1Delay 10000EndScriptEndIfIf blue<blueBKeyDown 115 1Delay 500KeyUp 115 1VBS lan=lan-1EndIfKeyPress 113 1Delay 30If lan<50KeyDown 18 1KeyPress 70 1KeyUp 18 1Delay 100For 2SayString 藍還有Delay 30SayExpression lanDelay 30SayString 個,把藍扔到我腳邊!KeyPress 13 1Delay 200SayString 請扔點藍給我,但別壓垮了我,大家小心了。KeyPress 13 1Delay 200KeyPress 113 1Delay 30EndForGosub jianlanIf lan<10For 2SayString 藍還有Delay 20SayExpression lanDelay 20SayString 個,沒藍我就回城啦!886KeyPress 13 1Delay 200KeyPress 113 1Delay 30EndForGosub jianlanIf lan<5Goto endEndIfEndIfEndIfGoto start1Sub jianlanFor 5MiddleClick 1Delay 200EndForVBSCall Call ReadMemory(&h0140a246,1,lan)SayString 現在有Delay 20SayExpression lanDelay 20SayString 個藍,大家繼續啊!KeyPress 13 1Delay 500MoveTo 80 19Delay 100LeftClick 1Delay 50KeyPress 113 1Delay 30Return jianlan這是我今天剛做的熱血江湖醫生群療指令碼,在1.6版上測試透過,當藍不到50個時會提示打手們扔藍給醫生,適合醫生掛通宵,少於10個藍再得不到補藍就提示要回城了,當少於5個時就直接回城。打手們扔藍時請把藍扔在醫生邊上,扔多少隨便,只要醫生能拿的起來。打手不適用這指令碼。我用的是按鍵精靈5.5版F2=群療F3=放紅F4=放藍F9=回城符