;Skrypt bY SabiK
;inskrypcja-skill_umyslowy
;Wersja 1.1
;Skrypt robi ostatnio pisany scroll i robi lub nie wybrana umiejetnosc po medytowaniu
;UWAGA!!
;Jesli wybrales opcje robienia anatomii lub madrosci
;Przed wlaczeniem skryptu ocen najpierw osobe, na ktorej ma byc robiona wskazana umiejetnosc
set #sysmsgcol 63
event sysmessage Skrypt [inskrypcja-skill_umyslowy] odpalony (bY SabiK)
wait 1
set %lt #ltargetid

set %krag 1 		;Tu ustaw ktory krag czaru piszesz
set %skill 0 		;Tu ustaw jaki skill ma byc robiony z inskrypcja (0 - Nic, 1 - Madrosc, 2 - Hiding, 3 - Anatomia)
set %jedz 0 		;Tu ustaw czy skrypt ma jesc (0 - Nie, 1 - Tak)

if %krag = 1
   set %mana 4
if %krag = 2
   set %mana 6
if %krag = 3
   set %mana 9
if %krag = 4
   set %mana 11
if %krag = 5
   set %mana 14
if %krag = 6
   set %mana 20
if %krag = 7
   set %mana 40
if %krag = 8
   set %mana 50

start:
ignoreitem #charid
if #mana < %mana
   goto medyt

ins:
finditem pbg C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 17
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz piora! Skrypt wylaczono!
   halt
}
set %ins 0
czekaj_ins:
set %ins %ins + 1
if #targcurs = 1
   goto zwoje
if %ins > 50
   goto ins
goto czekaj_ins

zwoje:
finditem mmf C
if #findkind = 0
{
   set #ltargetid #findid
   event macro 22
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz czystych zwojow! Skrypt wylaczono!
   halt
}
czekaj_zwoje:
if #contsize = 350_300
{
   click 108 280
   goto koniec
}
if #targcurs = 1
   goto zwoje
goto czekaj_zwoje

koniec:
wait 8s
if #mana < %mana
   goto medyt

madrosc:
if %skill <> 1
   goto hiding
set #ltargetid %lt
event macro 1 ^ .um madrosc
set %eval 0
czekaj_madrosc:
set %eval %eval + 1
if #targcurs = 1
   goto dalej_madrosc
if %eval > 60
   goto madrosc
goto czekaj_madrosc
dalej_madrosc:
event macro 22
goto start

hiding:
if %skill <> 2
   goto anatomia
event macro 1 ^ .um ukrywanie
set %hid 0
czekaj_hiding:
scanjournal 1
set %hid %hid + 1
if H in #charstatus
   goto start
if Nie_udalo_Ci_sie in #journal
   goto start
if %hid > 60
   goto hiding
goto czekaj_hiding

anatomia:
if %skill <> 3
   goto start
set #ltargetid %lt
event macro 1 ^ .um anatomia
set %anat 0
czekaj_anatomia:
set %anat %anat + 1
if #targcurs = 1
   goto dalej_anatomia
if %anat > 60
   goto anatomia
goto czekaj_anatomia
dalej_anatomia:
event macro 22
goto start


medyt:
event macro 1 ^ .um medytacja
set %med 0
czekaj_medyt:
set %med %med + 1
if Rozpoczynasz_medytacje in #sysmsg
   goto koncz_medyt
if Nie_brakuje_Ci in #sysmsg
   goto start
if %med > 50
   goto medyt
goto czekaj_medyt

koncz_medyt:
if #mana > %mana
   goto koniec2
goto koncz_medyt

koniec2:
jedzenie:
if %jedz = 0
   goto madrosc
finditem hnd_bnd_twi_fwi_ywi_qqd_bdf_zpe_uwi_rqe_axi_aqd_gud_qud_uqe_nwi_yrd_zpd_cwe C
set #lobjectid #findid
event macro 17
wait 21

madrosc:
if %skill <> 1
   goto hiding
set #ltargetid %lt
event macro 1 ^ .um madrosc
set %eval 0
czekaj_madrosc:
set %eval %eval + 1
if #targcurs = 1
   goto dalej_madrosc
if %eval > 60
   goto madrosc
goto czekaj_madrosc
dalej_madrosc:
event macro 22
goto start

hiding:
if %skill <> 2
   goto anatomia
event macro 1 ^ .um ukrywanie
set %hid 0
czekaj_hiding:
scanjournal 1
set %hid %hid + 1
if H in #charstatus
   goto start
if Nie_udalo_Ci_sie in #journal
   goto start
if %hid > 60
   goto hiding
goto czekaj_hiding

anatomia:
if %skill <> 3
   goto start
set #ltargetid %lt
event macro 1 ^ .um anatomia
set %anat 0
czekaj_anatomia:
set %anat %anat + 1
if #targcurs = 1
   goto dalej_anatomia
if %anat > 60
   goto anatomia
goto czekaj_anatomia
dalej_anatomia:
event macro 22
goto start