;Skrypt bY SabiK
;jedzenie-bind.txt
;Wersja 1.5 - Zmiany:
;- skanowanie na 16bitowych kolorach (dotychczasz skrypt dzialal tylko na 32bitowych)
;- dodane skanowanie przejedzenia i bardzo duzego przejedzenia (skrypt rozroznia Optymalne najedzenie, przejedzenie i bardzo duze przejedzenie)
;---------------------------------------------------
;Po wcisnieciu klawisz %key,
;skrypt skanuje poziom glodu, bialka, witamin i weglowodanow i zaspokaja go do poziomu optymalnego
;Gdy nie masz jedzenia skrypt odtwarza dzwiek
;!!!UWAGA!!!
;Musisz miec na widoku chleb, salatke, ciasteczka, ser i sok kokosowy
;W tym czasie musi byc aktywne okno ultimy
;Najlepiej miec wylaczone inne skrypty wykonujace czynnosci dlugoterminowe (przeszkadzajace w jedzeniu, np. magia, krawiec, alchemia itd.)
;lub ustawic w nich petle, ktora zatrzymuje skrypt gdy "*STOP = 1"
;U W A G A !!! USTAW PONIZSZE ZMIENNE PRZED WLACZENIEM SKRYPTU !!!
set %sciezka D:\xxx.wav ;Tutaj ustaw sciezke do dzwieku
set %key X ;Tutaj ustaw klawisz pod ktorym skrypt bedzie jadl
;------------------------------------------------------------------------------
initevents
set #sysmsgcol 1281
event sysmessage Skrypt [jedzenie-bind] odpalony (by SabiK)
wait 1
start1:
onhotkey %key
goto start
goto start1
start:
set *STOP 1
set %jedz 0
event macro 8 4
set %licz #scnt2 + 50
repeat
if #contname = generic_gump && #contsize = 400_380
goto jedzenie
if %licz < #scnt2
goto start
until #contname = generic_gump
info:
click 259 41
set %licz #scnt2 + 40
repeat
if #contname = generic_gump && #contsize = 400_380
goto jedzenie
if %licz < #scnt2
{
if #contname = generic_gump
goto info
else
goto start
}
until #contname = generic_gump && #contsize = 400_380
jedzenie:
set %glod 0
set %bialka 0
set %witaminy 0
set %weglowodany 0
if %jedz = 1
{
jedz1:
set %jedz 0
click 38 41
wait 10
set %licz #scnt2 + 40
czekaj_odswiez:
if #contname = generic_gump && #contsize = 400_380
goto jedz
if %licz < #scnt2
{
if #contname = generic_gump
goto jedz1
else
goto start
}
goto czekaj_odswiez
}
jedz:
;--- Glod ---
savepix 311 260 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %glod 1
else
{
set %y_przejedzony 254
gosub sprawdz_czy_przejedzony
}
;--- Bialka ---
savepix 311 280 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %bialka 1
else
{
set %y_przejedzony 274
gosub sprawdz_czy_przejedzony
}
;--- Witaminy ---
savepix 311 300 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %witaminy 1
else
{
set %y_przejedzony 294
gosub sprawdz_czy_przejedzony
}
;--- Weglowodany ---
savepix 311 320 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %weglowodany 1
else
{
set %y_przejedzony 314
gosub sprawdz_czy_przejedzony
}
if %glod = 0 && %bialka = 0 && %witaminy = 0 && %weglowodany = 0
{
finditem MGG C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem chleba! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
for %a 1 2
{
scanjournal %a
if #sysmsg = Czujesz_sie_w_pelni_sil. || #journal = Czujesz_sie_w_pelni_sil.
{
set %jedz 1
goto jedzenie
}
}
finditem JGI C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem salatki! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
for %a 1 2
{
scanjournal %a
if #sysmsg = Czujesz_sie_w_pelni_sil. || #journal = Czujesz_sie_w_pelni_sil.
{
set %jedz 1
goto jedzenie
}
}
finditem SLI C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem ciasteczek! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
if %glod = 1 && %bialka = 0 && %witaminy = 0 && %weglowodany = 0
{
finditem ZBM C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem soku kokosowego! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
if %bialka = 0
{
if %glod = 1
{
finditem END C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem sera! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
else
{
finditem MGG C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem chleba! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
}
if %witaminy = 0
{
finditem JGI C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem salatki! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
if %weglowodany = 0
{
finditem SLI C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem ciasteczek! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
if %glod = 0 && %bialka = 1 && %witaminy = 1 && %weglowodany = 1
{
finditem MGG C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie znalazlem chleba! Uzupelnil zapasy lub otworz plecak z jedzeniem!
sound %sciezka
goto start1
}
set #lobjectid #findid
event macro 17
wait 22
set %jedz 1
goto jedzenie
}
click 311 260 r
set #sysmsgcol 1082
event sysmessage Zakonczono jedzenie!
set *STOP 0
goto start1
;/// --- Subs ---
sub sprawdz_czy_przejedzony
savepix 203 %y_przejedzony 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %glod 1
savepix 258 %y_przejedzony 1
gosub sprawdz_czy_na_wierzchu
if #pixcol = 11392710 || #pixcol = 11392966
set %glod 1
return
sub sprawdz_czy_na_wierzchu
if #pixcol = 4294967295
{
sound %sciezka
display ok UO na wierzch!
}
return
Darmowy hosting zapewnia PRV.PL