;Skrypt bY SabiK
;krawiec_tkanina-skill_umyslowy-ciecie
;Skrypt szyje ostatnio szyty przedmiot, robi(lub nie) wybrana umiejetnosc.oraz je(lub nie) ;P
;U W A G A !!!
;Przed wlaczeniem skryptu zrob najpierw dana czynnosc recznie
;Skrypt automatycznie przezyca expy do wskazanego plecaka!!!
;Aby to robil musisz podac jego wspolrzedne w %x i %y
;Jesli klikniesz w srodek plecaka na expy
;to jego wspolrzedne znajdziesz w zakladce 'Container Info / #CONTPOSX i #CONTPOSY
;Te pierwsze podaj pod %x a te drugie pod %y
set #sysmsgcol 63
event sysmessage Skrypt [krawiec_tkanina-skill_umyslowy-ciecie] odpalony (bY SabiK)
wait 1
set %x 256 	;Ustaw tutaj #CONTPOSX plecaka na expy (patrz do instrukcji)
set %y 256 	;Ustaw tutaj #CONTPOSY plecaka na expy (patrz do instrukcji)
set %lt #ltargetid
start:
ignoreitem #charid
set %jedz 1 	;Tu ustaw czy skrypt ma jesc (0 - Nie, 1 - Tak)
set %skill 2 	;Tu ustaw jaki skill ma byc robiony z cieciem (0 - Nic, 1 - Madrosc, 2 - Hiding, 3 - Anatomia)

jedzenie:
if %jedz = 0
   goto madrosc
finditem hnd_twi_fwi_ywi_qqd_zpe_uwi_rqe_axi_aqd_gud_qud_uqe_nwi_yrd_zpd_cwe C
set #lobjectid #findid
event macro 17
wait 20

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 > 80
   goto madrosc
goto czekaj_madrosc
dalej_madrosc:
event macro 22
goto szycie

hiding:
if %skill <> 2
   goto anatomia
event macro 1 ^ .um ukrywanie
set %hid 0
czekaj_hiding:
scanjournal 1
set %hid %hid + 1
if Schowales in #journal
   goto szycie
if Nie_udalo in #journal
   goto szycie
if %hid > 80
   goto hiding
goto czekaj_hiding

anatomia:
if %skill <> 3
   goto szycie
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 > 80
   goto anatomia
goto czekaj_anatomia
dalej_anatomia:
event macro 22
goto szycie


szycie:
finditem hag C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 17
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz narzedzi szewskich! Skrypt wylaczono!
   halt
}
set %narz 0
czekaj_narzedzia:
set %narz %narz + 1
if #targcurs = 1
   goto dalej_narzedzia
if %narz > 50
   goto szycie
goto czekaj_narzedzia
dalej_narzedzia:
finditem cui C
if #findkind = 0
{
   set #ltargetid #findid
   event macro 22
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz tkaniny! Zaczynam ciac!
   goto ciecie
}
czekaj_szycie:
if #contsize = 500_460
   goto szyj_ostatni_przedmiot
goto czekaj_szycie
szyj_ostatni_przedmiot:
click 135 390

koniec:
if Masz_za_malo in #sysmsg
   goto ciecie
if Uszyles in #sysmsg
{
   scanjournal 2
   wait 1s
   if W_pojemniku in #journal
      {
         event macro 1 .grab
         wait 10
         goto ciecie
      }
   wait 20
   goto start
}
if Zniszczyles_troche_mat in #sysmsg
   goto start
if Your in #sysmsg
{
   scanjournal 2
   wait 5
   if Uszyles in #sysmsg
      goto start
   if Zniszczyles_troche_mat in #sysmsg
      goto start
}
goto koniec


ciecie:
finditem kag C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 17
}
if #findkind = 1
{
   ignoreitem #findid
   goto ciecie
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz nozyczek! Skrypt wylaczono!
   halt
}
set %noz 0
czekaj_nozyczki:
set %noz %noz + 1
if #targcurs = 1
   goto dalej_nozyczki
if %noz > 50
   goto ciecie
goto czekaj_nozyczki
dalej_nozyczki:
finditem fwl C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 22
}
if #findkind = -1
{
   finditem dci C
   if #findkind = 0
   {
      set #lobjectid #findid
      event macro 22
   }
   if #findkind = -1
   {
      set #sysmsgcol 1080
      event sysmessage Nie znaleziono tog ani plaszczy! Skrypt wylaczono!
      halt
   }
}
koniec1:
if Nie_mozesz_pociac in #sysmsg
   {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie
}
if #CONTSIZE = 188_118
    {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie
}
if Pociales in #sysmsg
      goto ciecie2
if Nie_udalo_Ci in #sysmsg
      goto ciecie2
goto koniec1


ciecie2:
finditem kag C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 17
}
if #findkind = 1
{
   ignoreitem #findid
   goto ciecie2
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz nozyczek! Skrypt wylaczono!
   halt
}
set %noz 0
czekaj_nozyczki2:
set %noz %noz + 1
if #targcurs = 1
   goto dalej_nozyczki2
if %noz > 50
   goto ciecie2
goto czekaj_nozyczki2
dalej_nozyczki2:
finditem fwl C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 22
}
if #findkind = -1
{
   finditem dci C
   if #findkind = 0
   {
      set #lobjectid #findid
      event macro 22
   }
   if #findkind = -1
   {
      set #sysmsgcol 1080
      event sysmessage Nie znaleziono tog ani plaszczy! Skrypt wylaczono!
      halt
   }
}
koniec2:
if Nie_mozesz_pociac in #sysmsg
   {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie2
}
if #CONTSIZE = 188_118
    {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie2
}
if Pociales in #sysmsg
      goto ciecie3
if Nie_udalo_Ci in #sysmsg
      goto ciecie3
goto koniec2


ciecie3:
finditem kag C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 17
}
if #findkind = 1
{
   ignoreitem #findid
   goto ciecie3
}
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz nozyczek! Skrypt wylaczono!
   halt
}
set %noz 0
czekaj_nozyczki3:
set %noz %noz + 1
if #targcurs = 1
   goto dalej_nozyczki3
if %noz > 50
   goto ciecie3
goto czekaj_nozyczki3
dalej_nozyczki3:
finditem fwl C
if #findkind = 0
{
   set #lobjectid #findid
   event macro 22
}
if #findkind = -1
{
   finditem dci C
   if #findkind = 0
   {
      set #lobjectid #findid
      event macro 22
   }
   if #findkind = -1
   {
      set #sysmsgcol 1080
      event sysmessage Nie znaleziono tog ani plaszczy! Skrypt wylaczono!
      halt
   }
}
koniec3:
if Nie_mozesz_pociac in #sysmsg
   {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie3
}
if #CONTSIZE = 188_118
    {
    click 126 94
    event Drag #findID
	wait 20
    click %x %y p
    goto ciecie3
}
if Pociales in #sysmsg
      goto start
if Nie_udalo_Ci in #sysmsg
      goto start
goto koniec3


jedzenie_ciecie:
if %jedz = 0
   goto madrosc_ciecie
finditem hnd_twi_fwi_ywi_qqd_zpe_uwi_rqe_axi_aqd_gud_qud_uqe_nwi_yrd_zpd_cwe C
set #lobjectid #findid
event macro 17
wait 20

madrosc_ciecie:
if %skill <> 1
   goto hiding_ciecie
set #ltargetid %lt
event macro 1 ^ .um madrosc
set %eval 0
czekaj_madrosc_ciecie:
set %eval %eval + 1
if #targcurs = 1
   goto dalej_madrosc_ciecie
if %eval > 80
   goto madrosc_ciecie
goto czekaj_madrosc_ciecie
dalej_madrosc_ciecie:
event macro 22
goto ciecie

hiding_ciecie:
if %skill <> 2
   goto anatomia_ciecie
event macro 1 ^ .um ukrywanie
set %hid 0
czekaj_hiding_ciecie:
scanjournal 1
set %hid %hid + 1
if Schowales in #journal
   goto ciecie
if Nie_udalo in #journal
   goto ciecie
if %hid > 80
   goto hiding_ciecie
goto czekaj_hiding_ciecie

anatomia_ciecie:
if %skill <> 3
   goto ciecie
set #ltargetid %lt
event macro 1 ^ .um anatomia
set %anat 0
czekaj_anatomia_ciecie:
set %anat %anat + 1
if #targcurs = 1
   goto dalej_anatomia_ciecie
if %eval > 80
   goto anatomia_ciecie
goto czekaj_anatomia_ciecie
dalej_anatomia_ciecie:
event macro 22
goto ciecie