Var1 = 0 //Origin Farming..Enable1.Disable0
Var2 = 0 //Support Skill[Victory Strenth]..Enable1.Disable0
Var3 = 0 //Support Skill[Speed Attack]..Enable1.Disable0
Var4 = 0 //Support Skill[Bless]..Enable1.Disable0
Var5 = 0 //Support Skill[Howl]..Enable1.Disable0
Var6 = 1 //AutoLoot..Enable1.Disable0
Var7 = 0 //Cancel Group Friend Pack Invite..Enable1.Disable0
Var8 = 0 //Auto Talk When See Ppl.Enable1.Disable0..[When Use Please Maximize Mini Map]
Pos1 = 0 //When detect people close by, stop bot, enable after leave ..Enable1.Disable0..[When Use please Maximize Mini Map]
Pos2 = 80 //Auto Heal Hp at percentage.from 1-99. Set at 80 %
Pos3 = 1 //Change to Back Up Weapon..Enable1.Disable0..[使用弓請關閉備武2.將箭矢放在F10]
Pos4 = 10 //防卡點程序.建議設定在5-30之間.[打怪物的次數.幾次後如果怪物的血量是滿的.重新執行]
Pos5 = 0 //Set Auto Bot in Range..Enable1.Disable0
Pos6 = 10 //Set Range..[Must enable Auto Bot In Rage]
//-----------------------------------------
ExtVar[17] = ReadMemory[0x00717E28,3] //X Axis
ExtVar[18] = ReadMemory[0x00717E24,3] //y Axis
//-----------------------------------------
Start_FOD: //Origin Botting
If Var1 = 1
ExtVar[0] = GetPicPos["Picture\bb.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
While ExtVar[0] = -1
ExtVar[0] = GetPicPos["Picture\bb.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
Delay(500)
Wend
End If
CAll GET_MP
Return
//----------------------------------------
GET_MP: //Support Skill
ExtVar[4] = GetPicPos["Picture\cc.bmp",XY2Pos[50,577],XY2Pos[224,620],30] //F4的圖片
ExtVar[5] = GetPicPos["Picture\dd.bmp",XY2Pos[50,577],XY2Pos[224,620],30] //F5的圖片
ExtVar[6] = GetPicPos["Picture\ee.bmp",XY2Pos[50,577],XY2Pos[224,620],30] //F6的圖片
ExtVar[7] = GetPicPos["Picture\ff.bmp",XY2Pos[50,577],XY2Pos[224,620],30] //F7的圖片
If Var2 = 1
If ExtVar[4] = -1 //Victory Strenth
KeyPress(115)
Delay(2500)
End If
End If
If Var3 = 1
If ExtVar[5] = -1 //Speed Attack
KeyPress(116)
Delay(2500)
End If
End If
If Var4 = 1
If ExtVar[6] = -1 //Bless
KeyPress(117)
Delay(2500)
End If
End If
If Var5 = 1
If ExtVar[7] = -1 //Howl
KeyPress(118)
Delay(2500)
End If
End If
Call Look_For_Map_Atk
Return
//-----------------------------------------
Look_For_Map_Atk: //Search For Monster
ExtVar[3] = 0
ExtVar[25] = 0
ExtVar[26] = 0
KeyPress(9)
Delay(100)
ExtVar[8] = Color[XY2Pos[840, 36], 50]
If ExtVar[8] < 3096319 //Avoid Steal Kill
Call Look_For_Map_Atk
End If
Call OVER
Return
//-----------------------------------------
OVER: //After Killing Monster
ExtVar[0] = GetPicPos["Picture\bb.bmp",XY2Pos[643,0],XY2Pos[695,51],30] //Normal Monsters
ExtVar[1] = GetPicPos["Picture\aa.bmp",XY2Pos[643,0],XY2Pos[695,51],30] //Cave Monsters
ExtVar[2] = GetPicPos["Picture\hh.bmp",XY2Pos[643,0],XY2Pos[695,51],30] //Boss
While ExtVar[0] > -1 || ExtVar[1] > -1 || ExtVar[2] > -1
ExtVar[0] = GetPicPos["Picture\bb.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
ExtVar[1] = GetPicPos["Picture\aa.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
ExtVar[2] = GetPicPos["Picture\hh.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
KeyPress(112)
Delay(100)
ExtVar[3] = ExtVar[3]+1 //防卡點程序
If ExtVar[3] > Pos4
ExtVar[9] = Color[XY2Pos[840, 36, ], 50]
If ExtVar[9] = 3096319
Call Look_For_Map_Atk
End If
End If
Call HP
Wend
Call Take_Something
Return
//-----------------------------------------
HP: //Auto Heal
ExtVar[10] = GetColorPos[3096319,XY2Pos[Pos2*1.14+100,36],XY2Pos[214,39]] //HP
If ExtVar[10] = -1
KeyPress(114)
End If
ExtVar[11] = GetColorPos[3096319,XY2Pos[30*1.14+100,36],XY2Pos[214,39]] //Auto Escape When HP Below 30%
If ExtVar[11] = -1
KeyPress(119)
Delay(3000)
Stop
End If
Call BAD
Return
//-----------------------------------------
BAD: //Weapon Exchange
ExtVar[12] = GetPicPos["Picture\bad.bmp",XY2Pos[380,113],XY2Pos[404,134],30]
If ExtVar[12] > -1 //Weapon Durability Low Change
Delay(100)
ExtVar[13] = ExtVar[13]+1
If ExtVar[13] = 1 || ExtVar[13] = 3 || ExtVar[13] = 5
KeyPress(120)
Delay(3000)
If Pos3 = 0
If ExtVar[13] = 3 || ExtVar[13] = 5
KeyPress(119)
Delay(3000)
Stop
End If
End If
End If
End If
If Pos3 = 1
ExtVar[12] = GetPicPos["Picture\bad.bmp",XY2Pos[380,113],XY2Pos[404,134],30]
If ExtVar[12] > -1 //When Weapon Durability Low Exchange to
Delay(100)
If ExtVar[13] = 2 || ExtVar[13] = 4 || ExtVar[13] = 6
KeyPress(121)
Delay(3000)
End If
End If
End If
ExtVar[12] = GetPicPos["Picture\bad.bmp",XY2Pos[380,113],XY2Pos[404,134],30]
If ExtVar[12] > -1 //Auto Escape/Town When All weapons At Low Durability
Delay(100)
If ExtVar[13] > 7
KeyPress(119)
Delay(3000)
Stop
End If
End If
Call OVER
Return
//-----------------------------------------
Take_Something: //Auto Loot
If Var6 = 1
KeyPress(113)
Delay(700)
KeyPress(113)
Delay(700)
KeyPress(113)
Delay(700)
End If
Call Cancel
Return
//-----------------------------------------
Cancel: //Cancel Friend/Group/Etc Invite
If Var7 = 1
ExtVar[14] = GetPicPos["Picture\ii.bmp",XY2Pos[514,419],XY2Pos[558,436],30]
If ExtVar[14] > -1
MouseMove XY2Pos[535,427]
Delay(1000)
Left DbClick
Delay(1000)
End If
End If
If Var8 = 1
ExtVar[15] = GetPicPos["Picture\say.bmp",XY2Pos[871,41],XY2Pos[980,113],30]
If ExtVar[15] > -1
KeyPress(13)
Delay(500)
Text "Please Dont Steal My Spot" //Please Input text you want to say betwen " "
Delay(500)
KeyPress(13)
Delay(500)
MouseMove XY2Pos[520,388]
Delay(500)
Left DbClick
End If
End If
If Pos1 = 1
ExtVar[16] = GetPicPos["Picture\say.bmp",XY2Pos[871,41],XY2Pos[980,113],30]
While ExtVar[16] > -1 //Detect People Around auto disable bot
ExtVar[16] = GetPicPos["Picture\say.bmp",XY2Pos[871,41],XY2Pos[980,113],30]
Delay(1000)
ExtVar[0] = GetPicPos["Picture\bb.bmp",XY2Pos[643,0],XY2Pos[695,51],30]
If ExtVar[0] > -1 //When Being attack by aggressive monsters, fight back
Call OVER
End If
Wend
End If
Call FOP
//-----------------------------------------
FOP:
If Pos5 = 1
ExtVar[19] = ReadMemory[0x00717E28,3] //X Axis
ExtVar[20] = ReadMemory[0x00717E24,3] //y Axis
ExtVar[21] = ExtVar[17]+Pos6
ExtVar[22] = ExtVar[17]-Pos6
ExtVar[23] = ExtVar[18]+Pos6
ExtVar[24] = ExtVar[18]-Pos6
While ExtVar[19] > ExtVar[21]
ExtVar[19] = ReadMemory[0x00717E28,3] //X Axis
MouseMove XY2Pos[162,398]
Left DbClick
Delay(500)
ExtVar[25] = ExtVar[25]+1 //防卡點程序
If ExtVar[25] = 20
Call Look_For_Map_Atk
End If
Wend
While ExtVar[19] < ExtVar[22]
ExtVar[19] = ReadMemory[0x00717E28,3] //X Axis
MouseMove XY2Pos[832,398]
Left DbClick
Delay(500)
ExtVar[25] = ExtVar[25]+1 //防卡點程序
If ExtVar[25] = 20
Call Look_For_Map_Atk
End If
Wend
While ExtVar[20] > ExtVar[23]
ExtVar[20] = ReadMemory[0x00717E24,3] //y Axis
MouseMove XY2Pos[511,623]
Left DbClick
Delay(500)
ExtVar[26] = ExtVar[26]+1 //防卡點程序
If ExtVar[26] = 20
Call Look_For_Map_Atk
End If
Wend
While ExtVar[20] < ExtVar[24]
ExtVar[20] = ReadMemory[0x00717E24,3] //y Axis
MouseMove XY2Pos[505,95]
Left DbClick
Delay(500)
ExtVar[26] = ExtVar[26]+1 //防卡點程序
If ExtVar[26] = 20
Call Look_For_Map_Atk
End If
Wend
End If
Call Start_FOD
Return
//-----------------------------------------