|
|
Konto Do Usunięcia. | 2008, mar 11 14:05
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
Znalazłem ten skrypt... oddziela mi po jednym piórko i dalej nic się nie dzieje po mimo że jest wszystko ustawione....
;Skrypt sluzy do produkcji strzal i beltow (przy ewentualnym koxie ukrywania lub anatomii). ;Aby skrypt dzialal prawidlowo, nalezy najpierw osobiscie stworzyc jedna strzale/belt. ;W przeciwnym wypadku skrypt moze sie zaciac przy findid piorka i strzalek. ;Jezeli ma cwiczyc anatomie, to nalezy przed samym wlaczeniem skryptu ocenic anatomia NPC'a, na ktorym ma byc cwiczony skill.
initevents set %lobj #ltargetid set %produkcja 1 ;wpisz, co ma robic skrypt (0 - strzaly, 1 - belty) set %skill 1 ;wpisz, co skrypt ma koxac przy okazji (1 - ukrywanie, 2 - anatomia) set %profile 296_136 set %plecak #BACKPACKID finditem CKF_ZJF C_ , %plecak ;woreczek lub plecak set %plecak #FINDID
if %produkcja = 0{ set %x 60 set %y 60 } if %produkcja = 1 { set %x 105 set %y 60 }
start: finditem VLK C_ , %plecak ;znajduje piora w w plecaku Exevent Drag #findid wait 1 Exevent Dropc %worek ;rzuca jedno piorko do plecaka wait 1 finditem SLK C_ , %plecak ;znajduje strzaly set #lobjectid #findid piora: finditem VLK C_ , %worek ;znajduje pioro w worku if #findkind = -1 goto piora set #ltargetid #findid event macro 17 0target 100s event macro 22 0luk: if #CONTSIZE = %profile { wait 1 dalszyn: set %contposx #contposx + %x set %contposy #contposy + %y click %contposx %contposy d wait 1 if #contsize = %profile goto dalszyn goto pat } goto luk pat: wait 8s waiting: if Stworzyl in #sysmsg goto hid if Zniszczyl in #sysmsg goto hid if Your_skill in #sysmsg goto hid if Oddal in #sysmsg goto hid goto waiting
hid: if %skill = 1 goto hiding goto anat hiding: event macro 13 21 wait 1 if #charstatus = H goto start if Nie_udalo_ in #sysmsg goto start if Your_ in #sysmsg goto start goto start
anat: if %skill = 2 goto anatomia goto start anatomia: event macro 13 1 wait 1 if Wybierz_cel in #sysmsg goto anatomia2 goto anatomia anatomia2: set #ltargetid %lobj wait 1 event macro 22 if Cel in #sysmsg goto start if Nie_jestes_ in #sysmsg goto start if Your_ in #sysmsg goto start goto anatomia2 |
|
Konto Do Usunięcia. | 2008, mar 22 12:44
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
Szukam skryptu na tworzenie surowych strzał... |
|
Konto Do Usunięcia. | 2008, kwi 6 15:04
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
Ćwiczę sobie małego mago - druida i potrzebuje skryptu na przywoływanie a jeżeli by się dało przywoływanie i mądrość... dało by się tak zrobić ? |
|
Konto Do Usunięcia. | 2008, kwi 8 14:38
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
do przywoływania nie potrzeba worka nawet nie trzeba być druidem więc za bardzo niema czego opisywać...
Potrzebuje skryptu na przywoływanie wraz z mądrością lub wiedzą o zwierzętach... |
|
Konto Do Usunięcia. | 2008, kwi 8 22:09
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
|
|
Konto Do Usunięcia. | 2008, kwi 13 18:55
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
Mam pytanie co do skryptu kucia ;Autor: [nGz] ;Wersja: 3.6
Jak tu ustawić aby wszystko po ustaleniu metalu z jakiego ma być wykonywany przedmiot i przedmiotu wszystko już robiło sie automatycznie bo teraz wyskakuje mi menu z przedmiotami i ciągle muszę klikać " kuj to co ostatnio "
;Autor: [nGz] ;Wersja: 3.6 ;Wlacz Enable Event Sysmessage, aby widziec powiadomienia >>>ToolsOptionsGeneralEnable Event Sysmessage). ;Kombinacje opcji do zaznaczenia: ;1.Jesli chcesz przetapiac expy to zwykla opcja przetapiana tez musi byc zaznaczona. ;2.Opcja Kuj do expa z Przetapianiem - kuje az do wykucia expa(jesli zaznaczysz Przetapiaj ;expy to tez przetopi tego expa!). Pole edycji za napisem 'Kuj do expa' okresla ile tych expow ;chcemy. ;3.Opcja Kuj do expa bez Przetapiania - jesli skonczy sie ruda a expa nadal nie ma to skrypt ;sie i tak zatrzyma, nie bedzie przetapial tych zwyklych itemow. Jesli wyjdzie exp zanim ;sie ruda skonczy to zatrzyma sie po jego wykuciu, pozostawiajac wszystkie itemy. ;4.Opcja Kuj plyte - wybieramy rude, wybieramy przedmiot z przedzialu 1-7 i naciskamy start. ;Skrypt wtedy kuje pokolei czesci plyty od tej co zaznaczyliscie wzwyz(razem z pawezem), ;czyli jesli chcemy cala plyte to wybieramy karczek, jesli chcemy np cala plyte bez karczka ;i rekawic plytowych to wbieramy przedmiot nr 3(naramienniki). rzy zaznaczonej opcji Kuj plyte, reszte opcji nie trzeba ruszac ani nastawiac - nie sa brane od uwage - skrypt je sam ustawi(czyli na kucie do 1 expa z przetapianiem zwyklym). ;To chyba wszystko, jakies pytania - irc. ;Wszelkie bugi zglaszac na prv na ircu ;EasyUO wersja 1.42.00AB do pobrania - http://hoth.amu.edu.pl/~guniu/EasyUO00AB.rar ;Wcisnij poprostu play, a pojawi sie menu delux ;-D ;======================== set #lpc 2000 initevents menu hide menukowala: set %kolr 0set %przed 0set %ile_jest_expow 0set %byl_przy_piecu 0set %jest_exp3 0menu clear menu window color btnface menu window size 265 260 menu window title Menu Kowala by [nGz] v3.6 menu font name verdana menu shape prostokat1 6 135 145 41 3 7 1 black 2 black menu shape prostokat2 6 175 145 26 3 7 1 black 2 black menu shape prostokat3 6 200 145 25 3 7 1 black 2 black menu shape prostokat4 150 135 109 66 3 7 1 black 2 black menu shape kreska1 17 156 1 10 3 7 1 black 2 black menu shape kreska2 17 165 6 1 3 7 1 black 2 black ;========== Rudy menu font size 7 menu font color black menu font bgcolor white menu font style menu combo create crudy 10 10 100 menu combo add crudy Rudy: menu combo add crudy --------------- menu combo add crudy 1.Zelazo menu combo add crudy 2.Braz menu combo add crudy 3.Kalcyt menu combo add crudy 4.Miedz menu combo add crudy 5.Piryt menu combo add crudy 6.Malachit menu combo add crudy 7.Rusty menu combo add crudy 8.Rose menu combo add crudy 9.Stara Miedz menu combo add crudy 10.Shadow menu combo add crudy 11.Srebro menu combo add crudy 12.Zloto menu combo add crudy 13.Blackrock menu combo add crudy 14.Agapit menu combo add crudy 15.Valoryt menu combo add crudy 16.Veryt menu combo add crudy 17.Mytheril menu combo add crudy 18.Bloodrock menu combo add crudy 19.Azuryt menu combo add crudy 20.Royal menu combo add crudy 21.Mistyk menu combo select crudy 1 ;============ Przedmioty menu combo create cprzed 120 10 135 menu combo add cprzed Przedmioty: menu combo add cprzed ---------------------- menu combo add cprzed 1.Plyt. karczek menu combo add cprzed 2.Plyt. rekawice menu combo add cprzed 3.Plyt. naramienniki menu combo add cprzed 4.Plyt. nogawice menu combo add cprzed 5.Plyt. zbroja menu combo add cprzed 6.Helm plyt. menu combo add cprzed 7.Pawez menu combo add cprzed 8.Katana menu combo add cprzed 9.Wielki miecz menu combo add cprzed 10.Rekawice pier. menu combo add cprzed 11.Naramienniki pier. menu combo add cprzed 12.Nogawice pier. menu combo add cprzed 13.Tunika pier. menu combo add cprzed 14.Czepiec menu combo add cprzed 15.Nogawice kolcze menu combo add cprzed 16.Kolczuga menu combo add cprzed 17.Zamkniety helm menu combo add cprzed 18.Trojkatna tarcza menu combo add cprzed 19.Sztylet menu combo add cprzed 20.Kris menu combo add cprzed 21.Wojenne widly menu combo add cprzed 22.Halabarda menu combo add cprzed 23.Wlocznia menu combo add cprzed 24.Bitewny miecz menu combo add cprzed 25.Dlugi miecz menu combo add cprzed 26.Ogromny miecz menu combo add cprzed 27.Polokragle ostrze menu combo add cprzed 28.Pika menu combo add cprzed 29.Podwojne ostrza menu combo add cprzed 30.Kosa menu combo add cprzed 31.Laska z ostrzem menu combo add cprzed 32.Lanca menu combo add cprzed 33.Sai menu combo add cprzed 34.Daisho menu combo add cprzed 35.No-dachi menu combo add cprzed 36.Wakizashi menu combo add cprzed 37.Kama menu combo add cprzed 38.Lajatang menu combo add cprzed 39.Tetsubo menu combo add cprzed 40.Plyt. kabuto menu combo add cprzed 41.Plyt. mempo menu combo add cprzed 42.Plyt. hiro sode menu combo add cprzed 43.Plyt. suneate menu combo add cprzed 44.Plyt. Do menu combo add cprzed 45.Puklerz menu combo select cprzed 1 ;============== Skille menu font size 8 menu combo create cskill 50 110 110 menu combo add cskill Zaden menu combo add cskill Anatomia menu combo add cskill Wiedza o broni menu combo add cskill Ukrywanie menu combo add cskill Identyfikacja menu combo select cskill 1 ;============== Ilosc expow menu font size 7 menu edit iloscexpow 113 178 30 1 ;============== Ilosc wykutych expow menu font bgcolor btnface menu font color blue menu text ilwykexpow 9 206 Ilosc wykutych expow: menu font color black ;============== Numer expow wykutych sub liczba_wykutych_expow menu font color red menu font size 7 menu font style menu delete liczba_w_e menu text liczba_w_e 126 206 %ile_jest_expow menu font style b menu font size 10 menu font color black return ;============== Przetop menu check cprzeexp 25 157 98 18 0 Przetapiaj expy menu font size 10 menu check cprzet 10 138 87 18 1 Przetapiaj ;============== Kuj do expa menu check cexp 10 179 99 18 1 Kuj do expa ;============== Kuj plyte menu check ckujpt 160 138 80 18 0 Kuj Plyte ;============== Anuluj menu button anuluj 189 229 70 25 Anuluj ;============== Skill menu font style b menu text tskill 10 112 Skill: ;============== Numer wykutych expow
;============== Wybierz menu button wybierz 92 35 80 22 Wybierz ;============== Nr Rudy: menu text tnrrudy 57 65 Nr Rudy: ;============== Nr Przedmiotu: menu text tnrprzed 10 85 Nr Przedmiotu: ;============== goto wybierz menupokaz: menu show set #lpc 10 przyciski: set #menubutton n/a przycis: if #menubutton n/a goto #menubutton goto przycis ;============= closed: halt anuluj: menu hide halt ;============= bstart: menu font color black menu delete bstart menu button bstop 6 229 70 25 STOP goto bstart2 ;============= wybierz: menu get crudy set %kolr #menures - 2 menu get cprzed set %przed #menures - 2 menu delete tkolr menu delete tprzed menu font color green if %kolr > 0 menu text tkolr 125 65 %kolr if %przed > 0 menu text tprzed 125 85 %przed menu font color red if %kolr < 1 menu text tkolr 125 65 0if %przed < 1 menu text tprzed 125 85 0bstop: gosub liczba_wykutych_expow menu font color green if %kolr < 1 || %przed < 1 menu font color red menu delete bstart menu delete bstop menu button bstart 6 229 70 25 START if #menubutton = closed goto menupokaz if #menubutton = bstop set %ile_jest_expow 0goto przyciski ;===================================== czesci_plyty: if %przed = 7 { set #sysmsgcol 1264 event sysmessage Skonczono kuc czesci plyty goto bstop } set %no_plyty %przed + 3 menu combo select cprzed %no_plyty menu get cprzed set %przed #menures - 2 menu font color green menu delete tprzed menu text tprzed 125 85 %przed set %jest_exp3 1 ;===================================== bstart2: gosub liczba_wykutych_expow set #menubutton n/a menu get cskill set %skill #menures - 1 menu get cprzeexp set %przet_expy 0if #menures = -1 set %przet_expy 1 menu get cprzet set %przetop 1 if #menures = 0 { set %przetop 0 set %przet_expy 0 menu font color black menu font size 7 menu font style menu delete cprzeexp menu check cprzeexp 25 157 98 18 0 Przetapiaj expy menu font style b menu font size 10 } menu get cexp set %kujdoexpa 1 if #menures = 0 set %kujdoexpa 0set %kuj_plyte 0menu get ckujpt if #menures = -1 { if %przed > 7 || %przed < 1 { set #sysmsgcol 1080 event sysmessage Musisz wybrac przedmiot od 1 do 7 ! goto bstop } set %kuj_plyte 1 set %przetop 1 set %przet_expy 0 set %kujdoexpa 1 set %ile_ma_byc_expow 1 menu font color black menu font style menu font size 7 menu get cprzeexp if #menures = -1 { menu delete cprzeexp menu check cprzeexp 25 157 98 18 0 Przetapiaj expy } menu getnum iloscexpow 0 if #menures 1 { menu delete iloscexpow menu font bgcolor white menu edit iloscexpow 113 178 30 1 menu font bgcolor btnface } menu font size 10 menu get cprzet if #menures = 0 { menu delete cprzet menu check cprzet 10 138 87 18 1 Przetapiaj } menu get cexp if #menures = 0 { menu delete cexp menu check cexp 10 179 99 18 1 Kuj do expa } menu font style b } if %kujdoexpa = 1 && %kuj_plyte = 0 { menu getnum iloscexpow 0 if #menures < 1 { set #sysmsgcol 1080 event sysmessage Zly numer w polu 'Kuj do expa' goto bstop } set %ile_ma_byc_expow #menures } set %rud 0set %iler 0;set %jest_exp 0set %jest_exp2 0set %jest_exp4 0if %kolr = 1 2 set %rkol 0 set %rud zelaza if %kolr = 2 2 set %rkol 1118 set %rud brazu if %kolr = 3 2 set %rkol 1546 set %rud kalcytu if %kolr = 4 2 set %rkol 1548 set %rud miedzi if %kolr = 5 2 set %rkol 1720 set %rud pirytu if %kolr = 6 2 set %rkol 2130 set %rud malachitu if %kolr = 7 2 set %rkol 1541 set %rud rusty if %kolr = 8 2 set %rkol 1637 set %rud rose if %kolr = 9 2 set %rkol 1420 set %rud starejmiedzi if %kolr = 10 2 set %rkol 1107 set %rud shadowa if %kolr = 11 2 set %rkol 1301 set %rud srebra if %kolr = 12 2 set %rkol 1121 set %rud zlota if %kolr = 13 2 set %rkol 1109 set %rud blackrocka if %kolr = 14 2 set %rkol 1024 set %rud agapitu if %kolr = 15 2 set %rkol 2001 set %rud valorytu if %kolr = 16 2 set %rkol 1424 set %rud verytu if %kolr = 17 2 set %rkol 1320 set %rud mytherilu if %kolr = 18 2 set %rkol 1309 set %rud bloodrocka if %kolr = 19 2 set %rkol 1247 set %rud azurytu if %kolr = 20 2 set %rkol 1209 set %rud royala if %kolr = 21 2 set %rkol 1102 set %rud mistyka if %przed = 1 6 set %iler 10 set %typp nsh set %x 264 set %y 131 set %x2 130 set %y2 209 if %przed = 2 6 set %iler 12 set %typp ish set %x 264 set %y 131 set %x2 270 set %y2 209 if %przed = 3 6 set %iler 18 set %typp msh set %x 264 set %y 131 set %x2 410 set %y2 209 if %przed = 4 6 set %iler 20 set %typp lsh set %x 264 set %y 131 set %x2 130 set %y2 305 if %przed = 5 6 set %iler 25 set %typp hsh set %x 264 set %y 131 set %x2 270 set %y2 305 if %przed = 6 6 set %iler 15 set %typp osh set %x 444 set %y 131 set %x2 120 set %y2 305 if %przed = 7 6 set %iler 18 set %typp cik set %x 100 set %y 362 set %x2 420 set %y2 209 if %przed = 8 6 set %iler 8 set %typp omh set %x 185 set %y 362 set %x2 280 set %y2 178 if %przed = 9 6 set %iler 14 set %typp bph set %x 185 set %y 362 set %x2 370 set %y2 243 if %przed = 10 6 set %iler 10 set %typp kmh set %x 119 set %y 131 set %x2 160 set %y2 209 if %przed = 11 6 set %iler 14 set %typp ylh set %x 119 set %y 131 set %x2 310 set %y2 209 if %przed = 12 6 set %iler 16 set %typp imh set %x 119 set %y 131 set %x2 160 set %y2 305 if %przed = 13 6 set %iler 18 set %typp wlh set %x 119 set %y 131 set %x2 310 set %y2 305 if %przed = 14 6 set %iler 10 set %typp dph set %x 204 set %y 131 set %x2 160 set %y2 209 if %przed = 15 6 set %iler 18 set %typp aph set %x 204 set %y 131 set %x2 310 set %y2 209 if %przed = 16 6 set %iler 20 set %typp zoh set %x 204 set %y 131 set %x2 160 set %y2 305 if %przed = 17 6 set %iler 15 set %typp esh set %x 444 set %y 131 set %x2 421 set %y2 209 if %przed = 18 6 set %iler 16 set %typp aik set %x 100 set %y 362 set %x2 120 set %y2 305 if %przed = 19 6 set %iler 3 set %typp tsf set %x 185 set %y 362 set %x2 100 set %y2 178 if %przed = 20 6 set %iler 8 set %typp vrh set %x 185 set %y 362 set %x2 370 set %y2 178 if %przed = 21 6 set %iler 12 set %typp srh set %x 375 set %y 362 set %x2 320 set %y2 178 if %przed = 22 6 set %iler 20 set %typp yth set %x 375 set %y 362 set %x2 100 set %y2 243 if %przed = 23 6 set %iler 12 set %typp ltf set %x 375 set %y 362 set %x2 210 set %y2 178 if %przed = 24 6 set %iler 10 set %typp atf set %x 185 set %y 362 set %x2 190 set %y2 243 if %przed = 25 6 set %iler 12 set %typp ktf set %x 185 set %y 362 set %x2 280 set %y2 243 if %przed = 26 6 set %iler 16 set %typp upo set %x 185 set %y 362 set %x2 450 set %y2 178 if %przed = 27 6 set %iler 16 set %typp npo set %x 185 set %y 362 set %x2 100 set %y2 304 if %przed = 28 6 set %iler 15 set %typp cuo set %x 375 set %y 362 set %x2 100 set %y2 304 if %przed = 29 6 set %iler 10 set %typp buo set %x 375 set %y 362 set %x2 210 set %y2 243 if %przed = 30 6 set %iler 15 set %typp guo set %x 375 set %y 362 set %x2 320 set %y2 243 if %przed = 31 6 set %iler 14 set %typp zto set %x 375 set %y 362 set %x2 425 set %y2 243 if %przed = 32 6 set %iler 18 set %typp opo set %x 375 set %y 362 set %x2 210 set %y2 304 if %przed = 33 6 set %iler 12 set %typp qbp set %x 185 set %y 362 set %x2 450 set %y2 243 if %przed = 34 6 set %iler 18 set %typp cbp set %x 185 set %y 362 set %x2 190 set %y2 304 if %przed = 35 6 set %iler 16 set %typp tap set %x 185 set %y 362 set %x2 280 set %y2 304 if %przed = 36 6 set %iler 8 set %typp vap set %x 185 set %y 362 set %x2 370 set %y2 304 if %przed = 37 6 set %iler 12 set %typp obp set %x 277 set %y 362 set %x2 420 set %y2 208 if %przed = 38 6 set %iler 20 set %typp ibp set %x 375 set %y 362 set %x2 320 set %y2 304 if %przed = 39 6 set %iler 20 set %typp fbp set %x 459 set %y 362 set %x2 320 set %y2 304 if %przed = 40 6 set %iler 15 set %typp rbp set %x 379 set %y 131 set %x2 130 set %y2 209 if %przed = 41 6 set %iler 10 set %typp pwo set %x 379 set %y 131 set %x2 270 set %y2 209 if %przed = 42 6 set %iler 18 set %typp wbp set %x 379 set %y 131 set %x2 410 set %y2 209 if %przed = 43 6 set %iler 20 set %typp ecp set %x 379 set %y 131 set %x2 130 set %y2 305 if %przed = 44 6 set %iler 25 set %typp lwo set %x 379 set %y 131 set %x2 270 set %y2 305 if %przed = 45 6 set %iler 10 set %typp fik set %x 100 set %y 362 set %x2 118 set %y2 208 set #sysmsgcol 1080 if #menubutton n/a goto #menubutton if %rud = 0 { event sysmessage Zly numer rudy goto bstop } if %iler = 0 { event sysmessage Zly numer przedmiotu goto bstop } set %ostp 0set %wjt 0;===================================== start: set %sysm 0ignoreitem reset if %skill 0 && %ostp = 1 wait 15 mlot: if #menubutton n/a goto #menubutton finditem tlh C_ , #charid if #findkind = -1 { finditem gbg C_ , #charid if #findkind = -1 { set %sysm 3 if %jest_exp4 = 1 goto sysstop goto przetop2 } } set %lo #findid if %skill 2 goto identyfikacja wiedza: set %licz 0event macro 13 4 loop3: set #ltargetkind 1 set #ltargetid #findid set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto nexte if %licz > 5 goto wiedza goto loop3 identyfikacja: if %skill 4 goto ominw ident: set %licz 0event macro 13 3 petlaident: set #ltargetkind 1 set #ltargetid #findid set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto nexte if %licz > 5 goto ident goto petlaident ominw: if %skill 1 goto hid if %wjt = 1 goto anat set %licz 0event macro 13 1 petl: set %licz %licz + 1 if #targcurs = 1 { wait 2 wskter: set #sysmsgcol 1152 event sysmessage Wskaz teraz na czym ma byc robiona Anatomia set %licz 0 goto petl2 } if %licz > 50 goto ominw goto petl petl2: set %licz %licz + 1 set %wjt 1 if #targcurs = 0 goto wskaz if %licz > 300 goto wskter goto petl2 wskaz: wait 10 set %lta #ltargetid if Anulowano in #sysmsg { set #sysmsgcol 1080 event sysmessage Nie wskazano celu! set %wjt 0 } goto kowa anat: set %licz 0event macro 13 1 if #menubutton n/a goto #menubutton loop4: set #ltargetkind 1 set #ltargetid %lta set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto nexte if %licz > 5 goto anat goto loop4 nexte: event macro 22 event macro 22 event macro 22 hid: if %skill 3 goto kowa hid2: set %licz 0event macro 13 21 if #menubutton n/a goto #menubutton loop5: scanjournal 1 set %licz %licz + 1 wait 1 wait 1 if #charstatus = H goto kowa if ukryl in #journal goto kowa if nie_udalo_Ci_sie_ukryc in #journal goto kowa if %licz > 7 goto hid2 goto loop5 ;===================================== kowa: if #menubutton n/a goto #menubutton if %kujdoexpa = 1 && %ile_ma_byc_expow 1 { set %sysm 1 ignoreitem #findid goto kowa } wait 2 set %jest_exp3 0zelazo: finditem enk C if #findkind = -1 { set %sysm %sysm + 1 if %jest_exp4 = 1 || %byl_przy_piecu = 1 { set %byl_przy_piecu 0 set %ile_jest_expow 0 goto sysstop } goto przetop2 } if #findcol %rkol { ignoreitem #findid goto zelazo } set %lt #findid if #findstack < %iler { set %sysm 1 ignoreitem #findid goto zelazo } set %jest_exp2 0set %jest_exp4 0set %byl_przy_piecu 0goto ustawlt ;===================================== przetop2: str lower %rud set #sysmsgcol 1264 if %przetop = 0 { event sysmessage Nie przetapiam set %ile_jest_expow 0 goto sysstop } finditem %typp C if #findkind = -1 { event sysmessage Nie znaleziono przedmiotu do przetopienia set %ile_jest_expow 0 sysstop: if #menubutton n/a goto #menubutton if %ostp = 1 && ( %sysm = 1 || %sysm = 2 ) { event sysmessage Skonczyla sie ruda goto bstop } set #sysmsgcol 1080 if %sysm = 1 event sysmessage Nie znaleziono #strres if %sysm = 2 event sysmessage Za malo #strres if %sysm = 3 event sysmessage Nie znaleziono mlotka if %sysm = 4 event sysmessage Nie znaleziono kowadla if %sysm = 5 event sysmessage Stoisz za daleko kowadla goto bstop } przetop3: if #menubutton n/a goto #menubutton finditem jbg_ouj_kuj_wtj_hvj_suj G_1 if #findkind = -1 { set #sysmsgcol 1080 if %ostp = 1 && ( %sysm = 1 || %sysm = 2 ) { set #sysmsgcol 1264 event sysmessage Skonczyla sie ruda set #sysmsgcol 1080 goto nie_znaleziono_pieca: } if %sysm = 1 event sysmessage Nie znaleziono #strres if %sysm = 2 event sysmessage Za malo #strres if %sysm = 3 event sysmessage Nie znaleziono mlotka if %sysm = 4 event sysmessage Nie znaleziono kowadla if %sysm = 5 event sysmessage Stoisz za daleko kowadla nie_znaleziono_pieca: wait 1 event sysmessage Nie znaleziono pieca lub stoisz za daleko goto bstop } set %idpiec #findid set %idprz 0set %licz 0set %cpwj_jest 1 set %jest_exp4 0if #menubutton n/a goto #menubutton event sysmessage Przetapiam przedmioty przetop: scanjournal 1 set %licz %licz + 1 finditem %typp C if #findkind = -1 { if %jest_exp2 = 1 && %kujdoexpa = 1 && %ile_ma_byc_expow 100 goto bstop if #contname generic_gump || #contsize 188_118 goto tabliczka_prz_exp if %przet_expy = 0 { ignoreitem #findid click 125 95 set %jest_exp4 1 } else click 70 95 set %jest_exp2 1 set %cpwj_jest 1 } if %licz > 60 goto znow if #findid = %idprz goto przetop set %idprz #findid set %licz2 0znow: set %cpwj_jest 0set %licz2 %licz2 + 1 if %licz2 > 3 click 125 95 set %licz 0set #lobjectid %idpiec event macro 17 loop2: if #menubutton n/a goto #menubutton set #ltargetkind 1 set #ltargetid #findid set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto targ if %licz > 6 goto znow goto loop2 targ: event macro 22 event macro 22 event macro 22 set %licz 0goto przetop ;===================================== ustawlt: set %licz 0set #lobjectid %lo if #menubutton n/a goto #menubutton event macro 17 if %ostp = 0 { wait 14 click %x %y wait 8 if #menubutton n/a goto #menubutton click %x2 %y2 } if %ostp = 1 { wait 14 if #menubutton n/a goto #menubutton click 78 390 } loop: if #menubutton n/a goto #menubutton set #ltargetkind 1 set #ltargetid %lt set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto dalej if %licz > 10 goto ustawlt goto loop dalej: event macro 22 event macro 22 event macro 22 set %ostp 1 set %licz #scnt + 9 wyk_przedmiot_loop: scanjournal 1 if s_przedmiot_i_wlozyl in #journal || s_troche_sztab in #journal goto start if s_wyjatkowej_jakosci_przedmiot_i_wlozyl in #journal { ;set %jest_exp 1 set %ile_jest_expow %ile_jest_expow + 1 gosub liczba_wykutych_expow goto start } if Oddaliles_sie. in #journal || Oddalilas_sie. in #journal goto bstop if #menubutton n/a goto #menubutton if %licz < #scnt goto start goto wyk_przedmiot_loop |
|
Konto Do Usunięcia. | 2008, kwi 14 19:08
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
Szukam skryptu na lowienie ryb i ukrywanie skryp niby tak uzywany a nigdzie go nie moge znalesc wszedzie tylko rybki + anatomia labo wiedza.... |
|
Konto Do Usunięcia. | 2008, kwi 19 14:12
|
|
|
|
|
| Brak postaci | |
|
2009, lis 4 |
A ja szukam DZIAŁAJĄCEGO skryptu na szynie + skill np: hiding.... Znalazłem już parę takich skryptów ale albo nie wykrywało mi tkaniny choć jej miałem setki lub kończyło się na " Odczytywanie danych " ... i tak do usra*** śmierci | | | | | | | | |
| | | |
|