and
script editor
for wizard you must place your pet on bottom left transparent slot above your skill bar
but under worldchat box
open scITE script editor and paste one of the codes in and hit F5 to run the script
to stop the script hit esc you must be playing in window mode 1024x768
Attack Skills on key 2 and 4
mana potion key 5
health potion key 7
Intelligence buff key 9
defense buff key 0
;used for hunting mobs
HotKeySet("{esc}", "myExit")
Global $attacking = False ;
Global $needRest = False ;
Global $hpBar = False ;
Global $hpBar2 = False ;
Global $needMana = False ;
Global $manaBar = False ;
Global $manaBar2 = False ;
Global $needBuff = False ;
Global $needBuff2 = False ;
Global $buffBox = False ;
Global $buffBox2 = False ;
While (1)
WinActivate("Talisman Online")
WinMove("Talisman Online", "", 0, 0)
;find a mob
Send("{TAB}")
Sleep(1000)
;click and attack mob
Send(4)
Sleep(200)
Send("{2 900}")
Sleep(1000)
;are we still attacking?
$attacking = True ;
$attacking = PixelSearch(665, 105, 667, 107, 0xD9C100, 1)
If Not @
hen
$attacking = False
Else
$attacking = False
EndIf
;are we healthy enough to continue attacking?
$needRest = True
$hpBar = PixelSearch(131, 73, 133, 75, 0xA90100, 1)
If @
hen
StartRest()
EndIf
$needRest = True
$hpBar2 = PixelSearch(225, 72, 227, 74, 0xAC0002, 1)
If Not @
hen
$needRest = False
Else
$needRest = False
EndIf
;do we have enough mana to continue attacking?
$needMana = True
$manaBar = PixelSearch(108, 84, 110, 86, 0x0056A4, 1)
If @
hen
Startmana()
EndIf
$needMana = True
$manaBar2 = PixelSearch(218, 85, 220, 87, 0x0056A5, 1)
If Not @
hen
$needMana = False
Else
$needMana = False
EndIf
;do we need buff
$needBuff = True
$buffBox = PixelSearch(601, 61, 791, 85, 0xFFFF00, 3)
If @
hen
myBuff()
EndIf
If Not @
hen
$needBuff = False
Else
$needBuff = False
EndIf
$needBuff2 = True
$buffBox2 = PixelSearch(689, 59, 813, 97, 0x89F09C, 3)
If @
hen
myBuff2()
EndIf
If Not @
hen
$needBuff2 = False
Else
$needBuff2 = False
EndIf
Sleep(100)
WEnd
Func myExit()
MsgBox(0, "Ending", "Bot has Exited")
Exit
EndFunc ;==>myExit
Func StartRest()
Send(7)
Sleep(7000)
EndFunc ;==>StartRest
Func Startmana()
Send(5)
Sleep(15000)
EndFunc ;==>Startmana
Func myBuff()
Send(0)
Sleep(500)
EndFunc ;==>myBuff
Func myBuff2()
MouseClick("right", 121, 655, 1)
Sleep(2000)
MouseClick("left", 41, 77, 1)
Sleep(2000)
Send(9)
Sleep(2000)
MouseClick("right", 121, 655, 1)
Sleep(2000)
EndFunc ;==>myBuff2
HotKeySet("{esc}", "myExit")
Global $attacking = False ;
Global $needRest = False ;
Global $hpBar = False ;
Global $hpBar2 = False ;
Global $needMana = False ;
Global $manaBar = False ;
Global $manaBar2 = False ;
Global $needBuff = False ;
Global $needBuff2 = False ;
Global $buffBox = False ;
Global $buffBox2 = False ;
While (1)
WinActivate("Talisman Online")
WinMove("Talisman Online", "", 0, 0)
;find a mob
Send("{TAB}")
Sleep(1000)
;click and attack mob
Send(4)
Sleep(200)
Send("{2 900}")
Sleep(1000)
;are we still attacking?
$attacking = True ;
$attacking = PixelSearch(665, 105, 667, 107, 0xD9C100, 1)
If Not @
hen$attacking = False
Else
$attacking = False
EndIf
;are we healthy enough to continue attacking?
$needRest = True
$hpBar = PixelSearch(131, 73, 133, 75, 0xA90100, 1)
If @
henStartRest()
EndIf
$needRest = True
$hpBar2 = PixelSearch(225, 72, 227, 74, 0xAC0002, 1)
If Not @
hen$needRest = False
Else
$needRest = False
EndIf
;do we have enough mana to continue attacking?
$needMana = True
$manaBar = PixelSearch(108, 84, 110, 86, 0x0056A4, 1)
If @
henStartmana()
EndIf
$needMana = True
$manaBar2 = PixelSearch(218, 85, 220, 87, 0x0056A5, 1)
If Not @
hen$needMana = False
Else
$needMana = False
EndIf
;do we need buff
$needBuff = True
$buffBox = PixelSearch(601, 61, 791, 85, 0xFFFF00, 3)
If @
henmyBuff()
EndIf
If Not @
hen$needBuff = False
Else
$needBuff = False
EndIf
$needBuff2 = True
$buffBox2 = PixelSearch(689, 59, 813, 97, 0x89F09C, 3)
If @
henmyBuff2()
EndIf
If Not @
hen$needBuff2 = False
Else
$needBuff2 = False
EndIf
Sleep(100)
WEnd
Func myExit()
MsgBox(0, "Ending", "Bot has Exited")
Exit
EndFunc ;==>myExit
Func StartRest()
Send(7)
Sleep(7000)
EndFunc ;==>StartRest
Func Startmana()
Send(5)
Sleep(15000)
EndFunc ;==>Startmana
Func myBuff()
Send(0)
Sleep(500)
EndFunc ;==>myBuff
Func myBuff2()
MouseClick("right", 121, 655, 1)
Sleep(2000)
MouseClick("left", 41, 77, 1)
Sleep(2000)
Send(9)
Sleep(2000)
MouseClick("right", 121, 655, 1)
Sleep(2000)
EndFunc ;==>myBuff2
Assassin/Monk
key 1 and 2 for attacks
health potion key 7
defense buff key 0
;used for hunting mobs with this you can browse other windows and it will continue only in background window.
#RequireAdmin
WinActivate("Talisman Online")
WinMove("Talisman Online", "", 0, 0)
HotKeySet("{esc}", "myExit")
Global $hWnd = WinWait("Talisman Online", "", 10)
Global $needRest = False ;
Global $needRest2 = False ;
Global $hpBar = False ;
Global $hpBar2 = False ;
Global $Attack1 = False ;
Global $stamina1 = False ;
Global $Attack2 = False ;
Global $stamina2 = False ;
Global $Attack3 = False ;
Global $stamina3 = False ;
Global $Ehplow = False ;
Global $Ehplowest = False ;
Global $Ehplowest2 = False ;
Global $REDCooldown1 = 1800000
Global $REDCooldown1Temp = TimerInit()
Global $redx = False ;
Global $redx1 = False ;
While (1)
checkEhp()
startrest1()
Attack1()
Attack2()
Attack3()
Checkfullinv()
TimerDispatch()
WEnd
Func checkEhp()
$Ehplowest = PixelSearch(473, 79, 473, 79, 0xB90000)
If @
hen
ControlSend($hWnd, "", "", "{TAB}")
Sleep(500)
;$Ehplow = True
EndIf
$Ehplowest2 = PixelSearch(632, 196, 632, 196, 0xEEF329)
If Not @
hen
ControlSend($hWnd, "", "", "{TAB}")
Sleep(500)
EndIf
EndFunc ;==>checkEhp
Func Attack1()
$stamina1 = PixelSearch(228, 85, 228, 85, 0x00AF00)
If Not @
hen
ControlSend($hWnd, "", "", "2")
Sleep(500)
$Attack1 = True
EndIf
EndFunc ;==>Attack1
Func Attack2()
$stamina2 = PixelSearch(167, 85, 167, 85, 0x00AF00)
If Not @
hen
ControlSend($hWnd, "", "", "2")
Sleep(500)
$Attack2 = True
EndIf
EndFunc ;==>Attack2
Func Attack3()
$stamina3 = PixelSearch(118, 85, 118, 85, 0x00A700)
If Not @
hen
ControlSend($hWnd, "", "", "1")
Sleep(500)
$Attack3 = True
EndIf
EndFunc ;==>Attack3
Func Checkfullinv()
$redx = 0xAF1F1F
$redx1 = PixelSearch(581, 337, 581, 337, $redx, 1)
If Not @
hen
MouseClick("left", $redx1[0], $redx1[1])
sleep(500)
EndIf
EndFunc ;==>Checkfullinv
Func startrest1()
;are we healthy enough to continue attacking?
$needRest = True
$hpBar = PixelSearch(154, 73, 154, 73, 0xAD0002)
If @
hen
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "7")
Sleep(11000)
EndIf
$needRest2 = False
$hpBar2 = PixelSearch(227, 74, 227, 74, 0xAB0100)
If Not @
hen
$needRest2 = False
EndIf
EndFunc ;==>startrest1
; Function to perform timed operations
Func TimerDispatch()
If $REDCooldown1 <= TimerDiff($REDCooldown1Temp) Then
ControlSend($hWnd, "", "", "0")
$REDCooldown1Temp = TimerInit()
EndIf
EndFunc ;==>TimerDispatch
Func myExit()
MsgBox(0, "Ending", "Bot has Exited", 1)
Exit
EndFunc ;==>myExit
#RequireAdmin
WinActivate("Talisman Online")
WinMove("Talisman Online", "", 0, 0)
HotKeySet("{esc}", "myExit")
Global $hWnd = WinWait("Talisman Online", "", 10)
Global $needRest = False ;
Global $needRest2 = False ;
Global $hpBar = False ;
Global $hpBar2 = False ;
Global $Attack1 = False ;
Global $stamina1 = False ;
Global $Attack2 = False ;
Global $stamina2 = False ;
Global $Attack3 = False ;
Global $stamina3 = False ;
Global $Ehplow = False ;
Global $Ehplowest = False ;
Global $Ehplowest2 = False ;
Global $REDCooldown1 = 1800000
Global $REDCooldown1Temp = TimerInit()
Global $redx = False ;
Global $redx1 = False ;
While (1)
checkEhp()
startrest1()
Attack1()
Attack2()
Attack3()
Checkfullinv()
TimerDispatch()
WEnd
Func checkEhp()
$Ehplowest = PixelSearch(473, 79, 473, 79, 0xB90000)
If @
henControlSend($hWnd, "", "", "{TAB}")
Sleep(500)
;$Ehplow = True
EndIf
$Ehplowest2 = PixelSearch(632, 196, 632, 196, 0xEEF329)
If Not @
henControlSend($hWnd, "", "", "{TAB}")
Sleep(500)
EndIf
EndFunc ;==>checkEhp
Func Attack1()
$stamina1 = PixelSearch(228, 85, 228, 85, 0x00AF00)
If Not @
henControlSend($hWnd, "", "", "2")
Sleep(500)
$Attack1 = True
EndIf
EndFunc ;==>Attack1
Func Attack2()
$stamina2 = PixelSearch(167, 85, 167, 85, 0x00AF00)
If Not @
henControlSend($hWnd, "", "", "2")
Sleep(500)
$Attack2 = True
EndIf
EndFunc ;==>Attack2
Func Attack3()
$stamina3 = PixelSearch(118, 85, 118, 85, 0x00A700)
If Not @
henControlSend($hWnd, "", "", "1")
Sleep(500)
$Attack3 = True
EndIf
EndFunc ;==>Attack3
Func Checkfullinv()
$redx = 0xAF1F1F
$redx1 = PixelSearch(581, 337, 581, 337, $redx, 1)
If Not @
henMouseClick("left", $redx1[0], $redx1[1])
sleep(500)
EndIf
EndFunc ;==>Checkfullinv
Func startrest1()
;are we healthy enough to continue attacking?
$needRest = True
$hpBar = PixelSearch(154, 73, 154, 73, 0xAD0002)
If @
henControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "1")
Sleep(1000)
ControlSend($hWnd, "", "", "7")
Sleep(11000)
EndIf
$needRest2 = False
$hpBar2 = PixelSearch(227, 74, 227, 74, 0xAB0100)
If Not @
hen$needRest2 = False
EndIf
EndFunc ;==>startrest1
; Function to perform timed operations
Func TimerDispatch()
If $REDCooldown1 <= TimerDiff($REDCooldown1Temp) Then
ControlSend($hWnd, "", "", "0")
$REDCooldown1Temp = TimerInit()
EndIf
EndFunc ;==>TimerDispatch
Func myExit()
MsgBox(0, "Ending", "Bot has Exited", 1)
Exit
EndFunc ;==>myExit







