|
|
Lordinio Adnes | 2009, paź 21 20:47
|
|
|
|
|
| Brak postaci | |
|
2014, kwi 25
Gorzów Wlkp. | |
Mam taki sobie skrypt i chcialbym zeby postac nie tylko darla jape ale jeszcze szla na zachod gdy zobaczy zywiolaka Dopisze ktos co tam trzeba? ^^
set #sysmsgcol 1281 event sysmessage Skrypt [zywiolak] odpalony (by SabiK) wait 1
while #true { for %tmp 1 3 { scanjournal %tmp if ( zywiolak_wody in #journal && #enemyid n/a ) || #enemyid n/a { gosub krzycz wait 600 } } }
sub krzycz event macro 1 0 STRAZ!!! POMOCY!!! STRAZ!!! wait 100
|
| Full of Rage...
|
hali | 2008, mar 20 13:18
|
|
|
|
|
| Brak postaci | |
|
2009, kwi 15
BDG | |
Mam takie makro przydatne dla krawca tylko ze ma problem z cieciam bali na material. Pierwszy raz czynnosc jest wykonana dobrze ale juz nie powtarza sie. Moze ktos potrafil by naprawic ten skrypt. Z gory dziekuje.
rzerabianie welny by Raist rzerabia welne na bele materialu, po czym ;tnie bele na tkanine, moze to robic z hidem ;------------------------------------------------------------------------------------ set %hajd 1 ; 0-bez hida 1-z hidem ;------------------------------------------------------------------------------------ initevents
finditem xeg_jfg_GFG_mkg G_1 ; znajduje kolowrotek set #ltargetid #findid
welna: finditem off C ; znajduje welne if #findkind = -1 goto przedza set #lobjectid #findid event macro 17 0 ;lobject target 20s event macro 22 0 ;ltarget
czekaj: if Stworzylas in #sysmsg || Stworzyles in #sysmsg { if %hajd = 1 gosub hid goto welna } else goto czekaj
przedza: finditem plf C ; znajduje przedze if #findkind = -1 { finditem idg_vcg G_1 ; znajduje narzedzie tkackie set #ltargetid #findid goto nici } set #lobjectid #findid event macro 17 0 ;lobject target 20s event macro 22 0 ;ltarget
czekaj2: if Zwinalas in #sysmsg || Zwinales in #sysmsg { if %hajd = 1 gosub hid goto przedza } else goto czekaj2
nici: finditem uag C ; znajduje nici if #findkind = -1 { finditem kag C ; znajduje nozyczki set #ltargetid #findid goto ciecie } set #lobjectid #findid event macro 17 0 ;lobject target 20s event macro 22 0 ;ltarget
czekaj3: if Stworzylas in #sysmsg || Stworzyles in #sysmsg { if %hajd = 1 gosub hid goto nici } if Masz_za in #sysmsg { goto ciecie } else goto czekaj3
ciecie: finditem kag C ; znajduje nozyczki set #lobjectid #findid finditem oag_mag_lag_zzf C ; znajduje tkanine if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Welna przerobiona halt } set #ltargetid #findid event macro 17 0 ;lobject target 20s event macro 22 0 ;ltarget
czekaj4: if Pocielas in #sysmsg || Pocieles in #sysmsg { if %hajd = 1 gosub hid goto ciecie } else goto czekaj4
sub hid set %jrnl #jindex event macro 1 0 .um ukrywanie start: while #true { if #jindex > %jrnl { set %jrnl %jrnl + 1 scanjournal %jrnl if Juz_cos in #journal || ukrylas in #journal || ukryles in #journal || Nie_udalo in #journal return } } |
|
Hanax | 2008, mar 8 21:47
|
|
|
|
|
| Brak postaci | |
|
2008, mar 20 |
Mam takie male pytanko przy rolnictwie ze strony www.sn00p.republika.pl jak scinam to takowych moich plonow do juczniaka nie wrzuca chociaz mam go kolo siebie. Moglby mi ktos to wytlumaczyc?
|
| Każdy może przeżyć ale nie każdy może się schronić... Wojna Atomowa
|
szokoloko | 2008, cze 11 01:52
|
|
|
|
|
| Brak postaci | |
|
2014, kwi 25 |
Mam to samo, w chwili pojawienia sie komunikatu "przeszukiwanie zakończone" wywala mi błąd klienta uo.Najpierw myślałem, że to przez makro na makroczeka , ale bez niego też tak sie dzieje. |
|
Kokosso | 2009, lut 28 13:30
|
|
|
|
|
| Brak postaci | |
|
2009, mar 1 |
Mam wielki problem ze skryptem kowalstwa . Od razu zaznaczę ze mam kowalstwo - 93% wiedza o broni 95% i korzystam ze skryptu kucie z stronki mw-pomoc. Wcześniej wszystko normalnie działało wybierałem rude, przedmiot, co chce trenować dodatkowo i kułem sobie w najlepsze . Teraz jak wybiorę rude, przedmiot i co chce trenować pojawiają się komunikaty NIE MOŻESZ TEGO UŻYĆ albo TO NIE JEST PRZEDMIOT. Nie umiem sobie z tym poradzić bo nie umiem pisać skryptów, bardzo proszę o pomoc lub o jakiś nowy skrypt . Bo teraz to kowalstwo staje się po prostu męczarnia. |
|
Variat | 2006, wrz 23 17:49 | 2007, lut 14 23:46
|
|
|
|
| Brak postaci | |
|
2019, lut 22 |
MANA VAMPIRE W SIEBIE initevents hop: if #mana < 45 ;; ponizje 45 many medytuje (ustaw sobie tylko to) { event macro 13 46 wait 16s } if #mana >= 45 { event macro 15 52 ;; numer czaru - Mana vampire target 6s event macro 23 wait 2s }
|
| "(..)dzielę się zatem z Wami czterema zaklęciami(..) Abra: "Trzy rzeczy nigdy nie zyskują wiary: to, co prawdziwe, to, co prawdopodobne i to, co logiczne." Kadabra: "Zło plus zło to więcej zła zaledwie." Hokus: "Świat jest dla nas tylko prawdą możliwą, nie prawdą konieczną." Pokus: "Gotowość udzielenia odpowiedzi na wszystkie pytania jest nieomylnym dowodem głupoty."
|
Kenskin | 2006, paź 28 21:12
|
|
|
|
|
| Brak postaci | |
|
2007, lut 27
Bydgoszcz | |
Masz oto skrypt na krawca i madrosc
;Macro bY SabiK ;krawiec-menu.txt ;Wersja 1.0 ;!!!!!UWAGA!!!!! rzerzucanie expów do innego pojemnika ;Aby to zrobić musisz podac jego wspolrzedne w okna menu ;Jesli najedziesz na ikone plecaka (ZAMKNIETY PLECAK) kursorem to wpisz w okna #CORSORX i #CURSORY initevents menu hide
krawiecmenu: set %xr 0set %yr 0set %mat 0set %mat1 0set %item 0set %skill 0set %skill1 0set %ciecie 0set %ciecie_trwa 0set %rzut 0set %licz 0set %id n/a set %lt n/a set #sysmsg n/a set #scnt 0set #menubutton n/a menu clear menu window title Menu Krawca bY SabiK menu window size 250 240 menu window color btnface ;Material menu font name verdana menu font size 9 menu font color black menu font bgcolor btnface menu font style b menu text wersja 85 214 Wersja 1.0 menu text 1material 21 12 Materiał: menu font size 8 menu font bgcolor white menu font style menu combo create material 85 10 155 menu combo add material Wybierz: menu combo add material ---------------------------------- menu combo add material Tkanina menu combo add material Skóra menu combo select material 1 goto menuskille rzedmioty z tkaniny menukrawca1: menu delete sprzedmioty menu font size 9 menu font color black menu font bgcolor btnface menu font style b menu text 1przedmioty 9 47 Przedmiot: menu font size 8 menu font bgcolor white menu font style menu combo create tprzedmioty 85 45 155 menu combo add tprzedmioty Wybierz: menu combo add tprzedmioty ---------------------------------- menu combo add tprzedmioty To co ostatnio ;menu combo add tprzedmioty Koszulka ;menu combo add tprzedmioty Koszula ;menu combo add tprzedmioty Oponcza ;menu combo add tprzedmioty Tunika ;menu combo add tprzedmioty Plaszcz ;menu combo add tprzedmioty Stroj blazenski ;menu combo add tprzedmioty Kubrak ;menu combo add tprzedmioty Jin-baori ;menu combo add tprzedmioty Hakama-skita ;menu combo add tprzedmioty Krotkie spodnie ;menu combo add tprzedmioty Dlugie spodnie ;menu combo add tprzedmioty Tettsuke-hakama ;menu combo add tprzedmioty Kilt ;menu combo add tprzedmioty Spodniczka ;menu combo add tprzedmioty Hakama ;menu combo add tprzedmioty Sukienka ;menu combo add tprzedmioty Spodnica ;menu combo add tprzedmioty Kimono(m) ;menu combo add tprzedmioty Kimono(f) ;menu combo add tprzedmioty Toga ;menu combo add tprzedmioty Kimshimo ;menu combo add tprzedmioty Szarfa ;menu combo add tprzedmioty Oib ;menu combo add tprzedmioty Koc ;menu combo add tprzedmioty Plotno ;menu combo add tprzedmioty Krotki fartuch ;menu combo add tprzedmioty Fartuch ;menu combo add tprzedmioty Mata ;menu combo add tprzedmioty Juka ;menu combo add tprzedmioty Bandana ;menu combo add tprzedmioty Mycka ;menu combo add tprzedmioty Czarodziejska czapka ;menu combo add tprzedmioty Czapka ;menu combo add tprzedmioty Beret ;menu combo add tprzedmioty Czapka z piorkiem ;menu combo add tprzedmioty Kesa ;menu combo add tprzedmioty Kapelusz okragly ;menu combo add tprzedmioty Kapelusz ;menu combo add tprzedmioty Trojkatny kapelusz ;menu combo add tprzedmioty Blazenska czapka menu combo select tprzedmioty 1 set %mat1 1 goto czekaj rzedmioty ze skóry menukrawca2: menu delete tprzedmioty menu font size 9 menu font color black menu font bgcolor btnface menu font style b menu text 1przedmioty 9 47 Przedmiot: menu font size 8 menu font bgcolor white menu font style menu combo create sprzedmioty 85 45 155 menu combo add sprzedmioty Wybierz: menu combo add sprzedmioty ---------------------------------- menu combo add sprzedmioty To co ostatnio ;menu combo add sprzedmioty Sk. Czapka ;menu combo add sprzedmioty Sk. Karczek ;menu combo add sprzedmioty Sk. Rekawiczki ;menu combo add sprzedmioty Sk. Narramienniki ;menu combo add sprzedmioty Sk. Nogawice ;menu combo add sprzedmioty Sk. Tunika ;menu combo add sprzedmioty Sk. Jingasa ;menu combo add sprzedmioty Ut. Karczek ;menu combo add sprzedmioty Ut. Rekawiczki ;menu combo add sprzedmioty Ut. Narramienniki ;menu combo add sprzedmioty Ut. Nogawice ;menu combo add sprzedmioty Ut. Tunika ;menu combo add sprzedmioty Ut. Jingasa ;menu combo add sprzedmioty Sk. Kabuto ;menu combo add sprzedmioty Sk. Mempo ;menu combo add sprzedmioty Sk. Hiro sode ;menu combo add sprzedmioty Sk. Suneate ;menu combo add sprzedmioty Sk. Do ;menu combo add sprzedmioty Ut. Kabuto ;menu combo add sprzedmioty Ut. Mempo ;menu combo add sprzedmioty Ut. Hiro sode ;menu combo add sprzedmioty Ut. Suneate ;menu combo add sprzedmioty Ut. Do ;menu combo add sprzedmioty Biustonosz ;menu combo add sprzedmioty Ut. Biustonosz ;menu combo add sprzedmioty Spodnie ;menu combo add sprzedmioty Spodniczka ;menu combo add sprzedmioty Damska zbroja ;menu combo add sprzedmioty Ut. Damska zbroja ;menu combo add sprzedmioty Sandaly ;menu combo add sprzedmioty Sandaly samuraja ;menu combo add sprzedmioty Buty ;menu combo add sprzedmioty Wysokie buty ;menu combo add sprzedmioty Wysokie buty2 ;menu combo add sprzedmioty Worek ;menu combo add sprzedmioty Skrzynka ;menu combo add sprzedmioty Plecak ;menu combo add sprzedmioty W. na wilkolackie runa ;menu combo add sprzedmioty W. na wampirze runa menu combo select sprzedmioty 1 set %mat1 2 goto czekaj ;Skille menuskille: menu font size 9 menu font color black menu font bgcolor btnface menu font style b menu text 1skille 46 83 Skill: menu font size 8 menu font bgcolor white menu font style menu combo create skille 85 80 155 menu combo add skille Wybierz: menu combo add skille ---------------------------------- menu combo add skille Zaden menu combo add skille Ukrywanie menu combo add skille Madrosc menu combo add skille Anatomia menu combo add skille Identyfikacja menu combo add skille Rozmowa z duchami menu combo add skille Wykrywanie menu combo add skille Wiedza o zwierzetach menu combo add skille Wiedza o broni menu combo select skille 1 ;Ciecie menu font size 8 menu font color black menu font style menu font bgcolor btnface menu check ciecie 20 120 205 15 0 Wlacz opcje ciecia przedmiotow rzezucanie expow menu font size 8 menu font color black menu font style menu font bgcolor btnface menu check rzut 20 148 210 15 0 Wlacz opcje przerzucania expow goto startianuluj rzucanietak: menu font size 8 menu font color black menu font style menu font bgcolor btnface menu text 1rzut 8 176 "X" PLECAKA: menu edit rzutx 90 172 28 xxx menu text 1rzut 123 176 "Y" PLECAKA: menu edit rzuty 205 172 28 xxx set %rzut1 1 goto czekaj ;Start i anuluj startianuluj: menu font size 10 menu font color black menu font style b menu font bgcolor btnface menu button startp 10 210 60 25 START menu button anuluj 178 210 60 25 Anuluj
menu hideEuo menupokaz: set #menubutton n/a menu show
czekaj: if #str = N/A || #dex = N/A || #int = N/A event macro 8 2 if #menubutton <> n/a goto #menubutton menu get material set %mat #menures - 2 menu get rzut set %rzut 1 if #menures <> -1 set %rzut 0if %rzut = 0{ menu delete 1rzut menu delete rzutx menu delete rzuty set %rzut1 0} if %rzut1 = 1 goto czekaj2 if %rzut = 1 goto rzucanietak czekaj2: if %mat <= 0 { menu delete tprzedmioty menu delete sprzedmioty menu delete 1przedmioty set %mat1 0} if %mat1 = 1 && %mat = 2 goto czekaj4 if %mat1 = 2 && %mat = 1 goto czekaj3 if %mat1 = 1 || %mat1 = 2 goto czekaj czekaj3: if %mat = 1 goto menukrawca1 czekaj4: if %mat = 2 goto menukrawca2 goto czekaj
closed: set #targcurs 0halt anuluj: set #targcurs 0set #menubutton n/a goto krawiecmenu stopp: set #targcurs 0menu delete startp menu delete stopp menu font size 10 menu font color black menu font style b menu font bgcolor btnface menu button startp 10 210 60 25 START if #menubutton = closed menu show set #menubutton n/a goto czekaj
startp: menu delete ramka menu delete blad menu window size 250 240 menu font color black menu delete startp menu font size 10 menu font color black menu font style b menu font bgcolor btnface menu button stopp 10 210 60 25 STOP set #menubutton n/a if #str = N/A || #dex = N/A || #int = N/A event macro 8 2 if %mat = 1 { menu get tprzedmioty set %item #menures - 2 } if %mat = 2 { menu get sprzedmioty set %item #menures - 2 }
menu get skille set %skill #menures - 3
menu get ciecie set %ciecie 1 if #menures <> -1 set %ciecie
0if %rzut = 1 { menu get rzutx set %xr #menures menu get rzuty set %yr #menures }
if %mat < 1 && %skill < 0 && %item < 1 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany material, przedmiot i skill! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany materiał, przedmiot i skill! if #menubutton = closed goto menupokaz goto czekaj }
if %mat < 1 && %item < 1 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany material i przedmiot! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany materiał i przedmiot! if #menubutton = closed goto menupokaz goto czekaj }
if %mat < 1 && %skill < 0 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany material i skill! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany materiał i skill! if #menubutton = closed goto menupokaz goto czekaj }
if %item < 1 && %skill < 0 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany przedmiot i skill! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany przedmiot i skill! if #menubutton = closed goto menupokaz goto czekaj }
if %mat < 1 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany material! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany materiał! if #menubutton = closed goto menupokaz goto czekaj }
if %item < 1 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany przedmiot! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany przedmiot! if #menubutton = closed goto menupokaz goto czekaj }
if %skill < 0 { menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START set #sysmsgcol 1080 event sysmessage Zle wybrany skill! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Źle wybrany skill! if #menubutton = closed goto menupokaz goto czekaj }
if #menubutton <> n/a goto #menubutton
if %mat = 1 { if %item = 2 { set %x 120 set %y 131 set %x1 218 set %y1 178 } if %item = 3 { set %x 120 set %y 131 set %x1 318 set %y1 178 } if %item = 4 { set %x 120 set %y 131 set %x1 418 set %y1 178 } if %item = 5 { set %x 120 set %y 131 set %x1 118 set %y1 243 } if %item = 6 { set %x 120 set %y 131 set %x1 218 set %y1 243 } if %item = 7 { set %x 120 set %y 131 set %x1 318 set %y1 243 } if %item = 8 { set %x 120 set %y 131 set %x1 118 set %y1 313 } if %item = 9 { set %x 120 set %y 131 set %x1 218 set %y1 313 } if %item = 10 { set %x 270 set %y 130 set %x1 158 set %y1 209 } if %item = 11 { set %x 270 set %y 130 set %x1 308 set %y1 209 } if %item = 12 { set %x 270 set %y 130 set %x1 428 set %y1 209 } if %item = 13 { set %x 270 set %y 130 set %x1 158 set %y1 302 } if %item = 14 { set %x 270 set %y 130 set %x1 308 set %y1 302 } if %item = 15 { set %x 270 set %y 130 set %x1 428 set %y1 302 } if %item = 16 { set %x 432 set %y 131 set %x1 158 set %y1 189 } if %item = 17 { set %x 432 set %y 131 set %x1 288 set %y1 189 } if %item = 18 { set %x 432 set %y 131 set %x1 158 set %y1 285 } if %item = 19 { set %x 432 set %y 131 set %x1 288 set %y1 xxx xxx } if %item = 20 { set %x 432 set %y 131 set %x1 158 set %y1 xxx xxx } if %item = 21 { set %x 432 set %y 131 set %x1 158 set %y1 xxx xxx } if %item = 22 { set %x 200 set %y 360 set %x1 118 set %y1 209 } if %item = 23 { set %x 200 set %y 360 set %x1 218 set %y1 209 } if %item = 24 { set %x 200 set %y 360 set %x1 318 set %y1 209 } if %item = 25 { set %x 200 set %y 360 set %x1 408 set %y1 209 } if %item = 26 { set %x 200 set %y 360 set %x1 118 set %y1 302 } if %item = 27 { set %x 200 set %y 360 set %x1 218 set %y1 302 } if %item = 28 { set %x 200 set %y 360 set %x1 318 set %y1 302 } if %item = 29 { set %x 200 set %y 360 set %x1 408 set %y1 302 } if %item = 30 { set %x 380 set %y 360 set %x1 118 set %y1 178 } if %item = 31 { set %x 380 set %y 360 set %x1 208 set %y1 178 } if %item = 32 { set %x 380 set %y 360 set %x1 328 set %y1 178 } if %item = 33 { set %x 380 set %y 360 set %x1 418 set %y1 178 } if %item = 34 { set %x 380 set %y 360 set %x1 118 set %y1 248 } if %item = 35 { set %x 380 set %y 360 set %x1 208 set %y1 248 } if %item = 36 { set %x 380 set %y 360 set %x1 328 set %y1 248 } if %item = 37 { set %x 380 set %y 360 set %x1 418 set %y1 248 } if %item = 38 { set %x 380 set %y 360 set %x1 118 set %y1 318 } if %item = 39 { set %x 380 set %y 360 set %x1 268 set %y1 318 } if %item = 40 { set %x 380 set %y 360 set %x1 418 set %y1 318 } }
if %mat = 2 { if %item = 2 { set %x set %y set %x1 set %y1 } if %item = 3 { set %x set %y set %x1 set %y1 } if %item = 4 { set %x set %y set %x1 set %y1 } if %item = 5 { set %x set %y set %x1 set %y1 } if %item = 6 { set %x set %y set %x1 set %y1 } if %item = 7 { set %x set %y set %x1 set %y1 } if %item = 8 { set %x set %y set %x1 set %y1 } if %item = 9 { set %x set %y set %x1 set %y1 } if %item = 10 { set %x set %y set %x1 set %y1 } if %item = 11 { set %x set %y set %x1 set %y1 } if %item = 12 { set %x set %y set %x1 set %y1 } if %item = 13 { set %x set %y set %x1 set %y1 } if %item = 14 { set %x set %y set %x1 set %y1 } if %item = 15 { set %x set %y set %x1 set %y1 } if %item = 16 { set %x set %y set %x1 set %y1 } if %item = 17 { set %x set %y set %x1 set %y1 } if %item = 18 { set %x set %y set %x1 set %y1 } if %item = 19 { set %x set %y set %x1 set %y1 } if %item = 20 { set %x set %y set %x1 set %y1 } if %item = 21 { set %x set %y set %x1 set %y1 } if %item = 22 { set %x set %y set %x1 set %y1 } if %item = 23 { set %x set %y set %x1 set %y1 } if %item = 24 { set %x set %y set %x1 set %y1 } if %item = 25 { set %x set %y set %x1 set %y1 } if %item = 26 { set %x set %y set %x1 set %y1 } if %item = 27 { set %x set %y set %x1 set %y1 } if %item = 28 { set %x set %y set %x1 set %y1 } if %item = 29 { set %x set %y set %x1 set %y1 } if %item = 30 { set %x set %y set %x1 set %y1 } if %item = 31 { set %x set %y set %x1 set %y1 } if %item = 32 { set %x set %y set %x1 set %y1 } if %item = 33 { set %x set %y set %x1 set %y1 } if %item = 34 { set %x set %y set %x1 set %y1 } if %item = 35 { set %x set %y set %x1 set %y1 } if %item = 36 { set %x set %y set %x1 set %y1 } if %item = 37 { set %x set %y set %x1 set %y1 } if %item = 38 { set %x set %y set %x1 set %y1 } if %item = 39 { set %x set %y set %x1 set %y1 } }
skill1: if #menubutton <> n/a goto #menubutton if %skill = 0 || %skill = 1 || %skill = 5 || %skill = 6 goto start if %skill = 2 set %skill1 Madrosc if %skill = 3 set %skill1 Anatomia if %skill = 4 set %skill1 Identyfikacja if %skill = 7 set %skill1 Wiedza , #spc , o , #spc , zwierzetach if %skill = 8 set %skill1 Wiedza , #spc , o , #spc , broni
if %lt = n/a { lt: set #targcurs 1 set #sysmsgcol 1090 event sysmessage Wskaz teraz na czym ma byc robiona %skill1 menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 35 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Stan: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Wskaz teraz na czym ma byc robiona menu font color blue menu text blad 15 277 %skill1 if #menubutton = closed menu show set #menubutton n/a set %licz 0 czekaj_lt: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 0 goto dalej_lt if %licz > 300 goto lt goto czekaj_lt } dalej_lt: set %lt #ltargetid set #sysmsgcol 1082 event sysmessage Zapisano. menu delete ramka menu delete blad menu window size 250 240 goto start
start: if #menubutton <> n/a goto #menubutton
skille: if #menubutton <> n/a goto #menubutton if %skill = 0 goto start1
ukrywanie: if %skill <> 1 goto madrosc event macro 13 21 set %licz 0czekaj_ukrywanie: scanjournal 1 set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if H in #charstatus goto start1 if Nie_udalo_Ci_sie in #journal goto start1 if %licz > 50 goto ukrywanie goto czekaj_ukrywanie
madrosc: if %skill <> 2 goto anatomia event macro 13 16 set %licz 0czekaj_madrosc: set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #targcurs = 1 goto dalej_madrosc if %licz > 50 goto madrosc goto czekaj_madrosc dalej_madrosc: set #ltargetid %lt event macro 22 goto start1
anatomia: if %skill <> 3 goto identyfikacja event macro 13 1 set %licz 0czekaj_anatomia set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #targcurs = 1 goto dalej_anatomia if %licz > 50 goto anatomia goto czekaj_anatomia dalej_anatomia: set #ltargetid %lt event macro 22 goto start1
identyfikacja: if %skill <> 4 goto rozmowa event macro 13 3 set %licz 0czekaj_identyfikacja: set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #targcurs = 1 goto dalej_identyfikacja if %licz > 50 goto identyfikacja goto czekaj_identyfikacja dalej_identyfikacja: set #ltargetid %lt event macro 22 goto start1
rozmowa: if %skill <> 5 goto wykrywanie event macro 13 32 set %licz 0czekaj_rozmowa: scanjournal 1 set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #sex = 0{ if Porozumiales_sie in #journal goto start1 } if #sex = 1 { if Porozumialas_sie in #journal goto start1 } if Nie_udalo_Ci_sie in #journal goto start1 if %licz > 50 goto rozmowa goto czekaj_rozmowa
wykrywanie: if %skill <> 6 goto wiedzaozw event macro 13 14 set %licz 0czekaj_wykrywanie: set %licz %licz + 1 if #menubutton <> n/a goto #menubutton scanjournal 1 if #sex = 0{ if Znalazles_kogos in #journal goto start1 if Nie_znalazles_nikogo in #journal goto start1 } if #sex = 1 { if Znalazlas_kogos in #journal goto start1 if Nie_znalazlas_nikogo in #journal goto start1 } if %licz > 50 goto wykrywanie goto czekaj_wykrywanie
wiedzaozw: if %skill <> 7 goto wiedzaobr event macro 13 2 set %licz 0czekaj_wiedzaozw: set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #targcurs = 1 goto dalej_wiedzaozw if %licz > 50 goto wiedzaozw goto czekaj_wiedzaozw dalej_wiedzaozw: set #ltargetid %lt event macro 22 goto start1
wiedzaobr: if %skill <> 8 goto start1 event macro 13 4 set %licz 0czekaj_wiedzaobr: set %licz %licz + 1 if #menubutton <> n/a goto #menubutton if #targcurs = 1 goto dalej_wiedzaobr if %licz > 50 goto wiedzaobr goto czekaj_wiedzaobr dalej_wiedzaobr: set #ltargetid %lt event macro 22 goto start1
start1: if #menubutton <> n/a goto #menubutton if %ciecie_trwa = 1 goto ciecie
szycie: if #menubutton <> n/a goto #menubutton finditem hag C if #findkind = 0{ set #lobjectid #findid event macro 17 } if #findkind = 1 { ignoreitem #findid goto szycie } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie masz narzedzi szewskich! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz narzedzi szewskich! if #menubutton = closed menu show set #menubutton n/a goto czekaj } set %licz 0czekaj_narzedzia: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 1 goto dalej_narzedzia if %licz > 50 goto szycie goto czekaj_narzedzia dalej_narzedzia: if #menubutton <> n/a goto #menubutton if %mat = 1 { finditem cui C if #findkind = 0 { set #ltargetid #findid event macro 22 set %licz 0 goto czekaj_szycie } if #findkind = 1 { ignoreitem #findid goto dalej_narzedzia } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie masz tkaniny! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz tkaniny! if #menubutton = closed menu show set #menubutton n/a goto czekaj } } if %mat = 2 { finditem ddg C if #findkind = 0 { set #ltargetid #findid event macro 22 set %licz 0 goto czekaj_szycie } if #findkind = 1 { ignoreitem #findid goto dalej_narzedzia } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie masz skory! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz skóry! if #menubutton = closed menu show set #menubutton n/a goto czekaj } } czekaj_szycie: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #contsize = 560_460 goto szyj_ostatni_przedmiot if %licz > 100 goto szycie goto czekaj_szycie szyj_ostatni_przedmiot: if #menubutton <> n/a goto #menubutton if %item = 1 || %last = 1 { click 135 390 goto koniec } click %x %y set %licz 0czekaj_tabela: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #contsize = 560_460 goto dalej_tabela if %licz > 100 goto szycie goto czekaj_tabela dalej_tabela: click %x1 %y1 set %last 1 goto koniec
koniec: if #menubutton <> n/a goto #menubutton if Masz_za_malo in #sysmsg { if %mat = 1 { set #sysmsgcol 1080 if %ciecie = 1 { event sysmessage Masz za malo tkaniny! Skrypt zaczyna ciac przedmioty! goto ciecie } set #sysmsgcol 1080 event sysmessage Nie masz tkaniny! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz tkaniny! if #menubutton = closed menu show set #menubutton n/a goto czekaj } if %mat = 2 { set #sysmsgcol 1080 if %ciecie = 1 { event sysmessage Masz za malo skory! Skrypt zaczyna ciac przedmioty! goto ciecie } set #sysmsgcol 1080 event sysmessage Nie masz skory! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz skóry! if #menubutton = closed menu show set #menubutton n/a goto czekaj } } if Uszyl in #sysmsg { if %ciecie = 0 goto omin_id if %id1 = 1 goto omin_id id: set #targcurs 1 set #sysmsgcol 1090 event sysmessage Wskaz teraz uszyty przedmiot, aby skrypt mogl pozniej pociac przedmioty! menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 35 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Stan: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Wskaz teraz uszyty przedmiot menu font color blue menu text blad 15 277 aby skrypt mogl pozniej pociac przedmioty! if #menubutton = closed menu show set #menubutton n/a set %licz 0 czekaj_id: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 0 goto dalej_id if %licz > 100 goto id goto czekaj_id dalej_id: set %id #ltargetid set #sysmsgcol 1082 event sysmessage Zapisano. menu delete ramka menu delete blad menu window size 250 240 set %id1 1 omin_id: scanjournal 2 wait 1s if W_pojemniku in #journal { set #sysmsgcol 1080 if %ciecie = 1 { event macro 1 .grab event sysmessage W pojemniku nie ma juz miejsca! Skrypt zaczyna ciac przedmioty! wait 10 goto ciecie } set #sysmsgcol 1080 event sysmessage W pojemniku nie ma juz miejsca! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 W pojemniku nie ma juz miejsca! if #menubutton = closed menu show set #menubutton n/a goto czekaj } goto start } if Zniszczyl in #sysmsg goto start if Your in #sysmsg goto start goto koniec
ciecie: if #menubutton <> n/a goto #menubutton set %ciecie_trwa 1 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! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz nożyczek! if #menubutton = closed menu show set #menubutton n/a goto czekaj } set %licz 0czekaj_nozyczki: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 1 goto dalej_nozyczki if %licz > 50 goto ciecie goto czekaj_nozyczki dalej_nozyczki: finditem %id C if #findkind = 0{ set #lobjectid #findid event macro 22 } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie znaleziono przedmiotu do ciecia! Skrypt zaczyna szyc! set %ciecie_trwa 0 goto start } koniec1: if #menubutton <> n/a goto #menubutton if Nie_mozesz_pociac in #sysmsg { if %rzut = 0 goto koniec11 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie } if #CONTSIZE = 188_118 { if %rzut = 0 goto koniec11 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie } koniec11: if Pociales in #sysmsg goto ciecie2 if Nie_udalo_Ci in #sysmsg goto ciecie2 goto koniec1
ciecie2: if #menubutton <> n/a goto #menubutton 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! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz nożyczek! if #menubutton = closed menu show set #menubutton n/a goto czekaj } set %licz 0czekaj_nozyczki2: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 1 goto dalej_nozyczki2 if %licz > 50 goto ciecie2 goto czekaj_nozyczki2 dalej_nozyczki2: finditem %id C if #findkind = 0{ set #lobjectid #findid event macro 22 } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie znaleziono przedmiotu do ciecia! Skrypt zaczyna szyc! set %ciecie_trwa 0 goto start } koniec2: if #menubutton <> n/a goto #menubutton if Nie_mozesz_pociac in #sysmsg { if %rzut = 0 goto koniec11 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie2 } if #CONTSIZE = 188_118 { if %rzut = 0 goto koniec11 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie2 } koniec22: if Pociales in #sysmsg goto ciecie3 if Nie_udalo_Ci in #sysmsg goto ciecie3 goto koniec2
ciecie3: if #menubutton <> n/a goto #menubutton 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! menu font size 10 menu font color red menu font style b menu font bgcolor btnface menu delete startp menu delete stopp menu button startp 10 210 60 25 START menu shape ramka 10 240 230 18 3 6 1 blue 7 $98FB98 menu shape ramka 10 257 230 30 3 6 1 blue 7 $FFF8DC menu font size 9 menu font color red menu font style b menu font bgcolor $98FB98 menu window size 250 300 menu text blad 110 241 Błąd: menu font size 7 menu font bgcolor $FFF8DC menu font color black menu text blad 15 265 Nie masz nożyczek! if #menubutton = closed menu show set #menubutton n/a goto czekaj } set %licz 0czekaj_nozyczki3: if #menubutton <> n/a goto #menubutton set %licz %licz + 1 if #targcurs = 1 goto dalej_nozyczki3 if %licz > 50 goto ciecie3 goto czekaj_nozyczki3 dalej_nozyczki3: finditem %id C if #findkind = 0{ set #lobjectid #findid event macro 22 } if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie znaleziono przedmiotu do ciecia! Skrypt zaczyna szyc! set %ciecie_trwa 0 goto start } koniec3: if #menubutton <> n/a goto #menubutton if Nie_mozesz_pociac in #sysmsg { if %rzut = 0 goto koniec33 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie3 } if #CONTSIZE = 188_118 { if %rzut = 0 goto koniec33 click 126 94 event Drag #findID wait 20 click %xr %yr p goto ciecie3 } koniec33: if Pociales in #sysmsg goto start if Nie_udalo_Ci in #sysmsg goto start goto koniec3
|
| eheheheehe
|
..::zMy::.. | 2009, lis 25 10:42 | 2009, lis 25 10:52
|
|
|
|
| Brak postaci | |
|
2012, sie 5
Kwidzyn | |
masz tu dobre makro Sabika na krawca.
http://www.sendspace.com/file/61l4k7
edit: skrypt działa wzorowo, bo sam właśnie na nim kończę kox krawca z identem ;]
|
| ...Oh my Lord, tell me what I\'m livin for Everybody\'s droppin got me knockin on heaven\'s door And all my memories, of seein brothers bleed And everybody grieves, but still nobody sees Recollect your thoughts don\'t get caught up in the mix Cause the media is full of dirty tricks Only God can judge me... | | | | | | | | | | | | |
| | | |
|