;Skrypt bY SabiK
;kupowanie.txt
;Wersja 1.6
;Skrypt kupuje zaznaczone przedmioty (regi, puste butelki, jedzenie, strzały, belty, piora)
;Po nacisnięciu klawisza skrypt mówi 'Chce cos kupic' i kupuje wybrane przedmioty
;Jesli kupujesz tylko regi to zaleca sie wylaczenie kupowania pustych butelek, jedzenia, strzal/beltow i pior,
;wtedy skrypt kupuje regi odrazu po ich znalezieniu i zaznaczeniu, a nie zjezdza na dol listy

;U W A G A !!! USTAW PONIZSZE ZMIENNE PRZED WLACZENIEM SKRYPTU !!!
set %key x           ;Tutaj ustaw klawisz, ktory uruchamia skrypt
set %sieci 1
set %siarka 1
set %wilcze 1
set %mandra 1
set %zenszen 1
set %czosnek 1
set %mech 1
set %perly 1
set %puste_butle 0
set %jedzenie 0      ;kupuje chleb, salatke, ciasteczka
set %strzaly 0
set %belty 0
set %piora 0
;------------------------------------------------------------------------------------------------------------

initevents
set #lpc 30
if %jedzenie = 1
set %ilosc %sieci + %siarka + %wilcze + %mandra + %zenszen + %czosnek + %mech + %perly + %puste_butle + %strzaly + %belty + %piora + 3
else
set %ilosc %sieci + %siarka + %wilcze + %mandra + %zenszen + %czosnek + %mech + %perly + %puste_butle + %strzaly + %belty + %piora
set %ile 0
set #sysmsgcol 1281
event sysmessage Skrypt [kupowanie] odpalony (by SabiK)
wait 1

start:
onhotkey %key
  {
   kupie:
   event macro 1 ^ chce cos kupic
   set %licz #scnt2 + 40
   goto start2
  }
goto start

start2:
if #contsize = 283_248
   goto start3
if %licz < #scnt2
   goto kupie
goto start2
start3:
if *STOP = 1
{
   repeat
   until *STOP = 0
}
onhotkey %key
{
   set #sysmsgcol 1082
   event sysmessage Skrypt wraca do poczatku
   goto start
}
getShopInfo
if ( #shopItemType = RZF ) && ( %sieci = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = SZF ) && ( %siarka = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = WZF ) && ( %wilcze = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = MZF ) && ( %mandra = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = JZF ) && ( %zenszen = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = KZF ) && ( %czosnek = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = JUF ) && ( %mech = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = KUF ) && ( %perly = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = WUF ) && ( %puste_butle = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = MGG ) && ( %jedzenie = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = SLI ) && ( %jedzenie = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = JGI ) && ( %jedzenie = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = RWF ) && ( %strzaly = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = LNK ) && ( %belty = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
if ( #shopItemType = VLK ) && ( %piora = 1 )
{
click 285 85 d
setShopItem #shopItemID #shopItemMax
set %ile %ile + 1
goto start1
}
start1:
if %ile = %ilosc
   goto koniec
if #shopCurPos = #shopCnt
   goto koniec
click 393 207
goto start3

koniec:
click 363 428
set %ile 0
goto start