|
|
3,1415... | 2008, mar 26 16:59 | 2008, mar 26 17:00
|
|
|
|
| Brak postaci | |
|
2014, lis 19 |
[Heka mode on] Szukam skryptu na rysowanie map i identa. [Heka mode off] |
|
rosak | 2008, mar 27 12:55
|
|
|
|
|
| Brak postaci | |
|
2009, lut 16
Gdynia City | |
Witam, mam pewien problem z skryptem na kopanie, mianowicie, ustawiam ze ma sie chowac... wlaczam "play" raz kopnie i potem ciagle sie ukrywa... a oto skrypt:
;Autor: [nGz] ;Wersja: 3.7 ;wersja 3.7 - dodana mozliwosc kopania z golemem jako 'juczniakiem'. ;Ten skrypt powiadamia Cie poprzez sysmessage dlaczego sie zatrzymal lub dlaczego nie przeniosl rudy. ;Aby widziec te powiadomienia musisz wlaczyc w Easyuo opcje Enable Event >Sysmessage(Options--Configuration). ;Kopie rude w 25 miejscach dookola postaci, jak nie ma rudy w 1 miejscu to zaczyna kopac w 2, ;jak sie skonczy w 2 to kopie w 3 itd. Jak juz nigdzie dookola postaci nie bedzie rudy to ;skrypt SAM SIE ZATRZYMA i wtedy nalezy pojsc kopac w inne miejsce. ;Zatrzyma sie rowniez jesli bedziecie wazyc ponad 1000 kamieni. rzerzuca rowniez rude do plecaka(musi on byc calkowicie odsloniety) CHODZI TU O IKONE PLECAKA, A NIE O JEGO WNETRZE), ;KTORY MOZNA UMIESCIC NA KONIU/LAMIE jucznej(NIE BEDZIE PRZEZUCAL RUDY DO PLECAKA ;KONIA/LAMY.CHODZI TU O DRUGI PLECAK KTORY UMIESZCZACIE W PLECAKU KONIA/LAMY). ;Musisz jednak ustawic pewne zmienne, inaczej nie bedzie przenosil rudy. ;Aby to zrobic musisz miec liste zmiennych po prawej stronie >>Easyuo(View--Variables--Standart nastepnie nacisnij Ctrl+R) ;Teraz otworz plecak do ktorego ma byc ruda przezucana i nacisnij raz ;lewym przyciskiem myszy na wnetrze tego plecaka(chodzi tu o to aby ten plecak byl na wierzchu) ;Znajdz na tej liscie po prawo #CONTID - to bedzie id tego plecaka. Zeby dowiedziec sie ;id twojego plecaka kliknij lewym myszki na jego wnetrze wtedy #CONTID bedzie pokazywalo id twojego plecaka. lecak do ktorego bedzie przezucana ruda nie musi byc otwarty ale MUSI byc odsloniety. ;W zaleznosci na ktorym shardzie grasz tam wprowadz te zmiany. ;Mozesz tez ustawic czy ma cwiczyc Anatomie(%skill 1), Armslore(%skill 2), ;Ukrywanie(%skill 3) lub Wykrywanie(%skill 4), czy tez ma nic nie cwiczyc(%skill 0). ;Anatomie robi na lamie/koniu jucznym ktory stoi w poblizu, jesli takiego nie ma ;to skrypt poprosi Cie o wskazanie celu. ;Armslore robi na kilofie. set %skill 1 ; / } if Your_strength_has in #sysmsg { scanjournal 1 if Your_strength_has in #journal { set %jrud 1 goto next } } if To_jest_za_daleko in #sysmsg goto next if %licz2 > 110 goto next goto wtym next: if %skill = 0 goto start if %runda = 1 { set %runda 0 goto start } wait 1 if %skill 1 goto armsal set %ltn 0anat: finditem wn if #findkind = -1 { finditem bo if #findkind = -1 set %ltn 1 } if #finddist > 3 { ignoreitem #findid goto anat } if %ltn = 0 goto anat2 if %wjt = 1 goto anat2 ltanat: 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 ltanat 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 %lt #ltargetid if Anulowano in #sysmsg { set #sysmsgcol 1080 event sysmessage Nie wskazano celu! set %wjt 0 } goto srund anat2: set %licz 0event macro 13 1 loop2: set #ltargetkind 1 if %ltn = 0 set #ltargetid #findid if %ltn = 1 set #ltargetid %lt set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto adalej if %licz > 5 goto anat2 goto loop2 armsal: if %skill 2 goto identyfikacja wiedza: set %licz 0event macro 13 4 loop3: set #ltargetkind 1 set #ltargetid %kilofek set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto adalej if %licz > 5 goto wiedza goto loop3 identyfikacja: if %skill 5 goto hid ident: set %licz 0event macro 13 3 identloop: set #ltargetkind 1 set #ltargetid %kilofek set %licz %licz + 1 wait 1 wait 1 if #targcurs = 1 goto adalej if %licz > 5 goto ident goto identloop adalej: event macro 22 event macro 22 event macro 22 hid: if %skill 3 goto wykryw hid2: set %licz 0event macro 13 21 loop4: scanjournal 1 set %licz %licz + 1 wait 1 wait 1 if #charstatus = H goto srund if nie_udalo_Ci_sie_ in #journal goto srund if %licz > 10 goto hid2 goto loop4 wykryw: if %skill 4 goto srund event macro 13 14 srund: set %runda 1 goto start
sub otworz finditem %idLamy if #findtype wn && #findtype bo && #findtype yab return if #finddist > 1 { set #sysmsgcol 1080 event sysmessage Juczniak stoi za daleko. return } set #lobjectid #findid event macro 17 return |
|
growin | 2008, mar 27 16:45
|
|
|
|
|
| Postać ukryta | |
|
2006, gru 28
Elbląg | |
e. Nie wiem skąd wziąłeś ten skrypt, ale radzę wziąć oryginalny ze strony www.sn00p.republika.pl strona było nie raz reklamowana w tym topicu. Jeśli ten skrypt wziąłeś właśnie stamtąd to poćwicz nad kopiowaniem.
|
| "I murzyn bywa oczerniony." Antoni Regulski
|
Mes | 2008, mar 27 20:29
|
|
|
|
|
| Brak postaci | |
|
2014, gru 7 |
Czy ktos ma moze dobre makro na palladyna? (((( |
|
Goeff | 2008, mar 27 21:04
|
|
|
|
|
| Brak postaci | |
|
2009, lut 23 |
www.sabik.prv.pl |
|
Abry | 2008, mar 28 09:26
|
|
|
|
|
| Brak postaci | |
|
2008, kwi 20
Szczecin | |
chciałem sie zapytac czy istnieje jakis skrypt gdy podczas walki koksamy anatomie słyszałem cos o tym ma ktos takie makro ?? |
|
Goeff | 2008, mar 28 19:40
|
|
|
|
|
| Brak postaci | |
|
2009, lut 23 |
Leczenie + anata -kto napisal skrypt, nie wiem
initevents set %Hiding 0ignoreitem reset ignoreitem #charid start: if #hits < #maxhits { finditem ZLF if #findKind = -1 goto anatomia if #findKind = 0{ healing: if #targCurs = 1 goto healing if %LockTime > #scnt goto anatomia set #lObjectID #FindID set #lTargetID #CharID set #lTargetKind 1 event macro 17 target event macro 22 set %a 0sprawdz: set %a %a + 1 wait 5 scanJournal 1 if Wyleczyles in #journal || Nie_udalo_Ci in #journal || Przestales in #journal || Stoisz_za in #journal || Nie_mozesz in #journal || %a = 75 { if Nie_mozesz in #journal set %LockTime #scnt + 5 goto anatomia } else goto sprawdz } } else { anatomia: if #targCurs = 1 goto anatomia set %czas #scnt - %LastTime if %czas > 12 { finditem * G_3 str Len #findtype if #strRes = 2 { wait 10 set %LastTime #scnt set #lTargetID #findID set #lTargetKind 1 event macro 13 1 target 4s event macro 22 } else { ignoreitem #findid if %Hiding = 1 { set %hid %hid + 1 if %hid = 10 { set %LastTime #scnt set %hid 0event macro 13 21 } else wait 1 } } goto start } else goto start } |
|
Scar | 2008, mar 30 19:50 | 2008, mar 30 20:18
|
|
|
|
| Brak postaci | |
|
2008, kwi 4
Olecko | |
Jako ze nikt mi nie mogl pomoc postanowilem sam uporac sie z tym problemem hehehe powiem tylko tyle, ze dziala to nawet niezle ale do idealu jeszcze daleko. Przedza i welna az do nici oraz do wyboru kilka skili. Podziekowania dla osob ktore stworzyly skrypty na ktorych sie wzorowalem
;%Skill - Wykonywany jest miedzy pisaniem czarow(runebookow), gdy nie medytuje, 0-Nic, 1-Anatomia, 2-Madrosc, 3-Wiedza o zwierzetach, 4-Ukrywanie, 5-Wiedza o broni, 6-Wykrywanie, 7-Rozmowa z duchami. ;======================== set %Skill 2 ;========================
gosub Weryfikuj2
donici: if %Skill > 0 gosub %SkillName finditem xeg_jfg_GFG_mkg G_1 ; znajduje kolowrotek set #ltargetid #findid finditem off_plf C ; znajduje welne lub przedze if #findkind = -1 { set #sysmsgcol 1080 event sysmessage Nie masz welny. halt } set #lobjectid #findid event macro 17 0 ;lobject target 15s event macro 22 0 ;ltarget target 8s goto donici
;==========SPRAWDZENIE==============================================
sub Weryfikuj2 if %Skill > 0{ set %CelSkilla 0 if %Skill = 1 set %SkillName Anatomia if %Skill = 2 set %SkillName Madrosc if %Skill = 3 set %SkillName AnimalLore if %Skill = 4 set %SkillName Ukrywanie if %Skill = 5 set %SkillName ArmsLore if %Skill = 6 set %SkillName Wykrywanie if %Skill = 7 set %SkillName SpiritSpeak if %Skill in 1_2_3_5 gosub WskazCel } return
;==============SKILE=============================================
sub Anatomia if %CelSkilla = 0 gosub WskazCel set %SkroconaNazwa ana gosub ObsluzCelownikSkilla return
sub Madrosc if %CelSkilla = 0 gosub WskazCel set %SkroconaNazwa mad gosub ObsluzCelownikSkilla return
sub AnimalLore if %CelSkilla = 0 gosub WskazCel set %SkroconaNazwa wie gosub ObsluzCelownikSkilla set %TimerAL #scnt2 + 30 repeat scanjournal 1 until _na_oswojenie_tego_zwierza in #journal || Nie_masz_szans_by_je_oswoic in #journal || To_stworzenie_ in #journal || Nie_udalo_Ci_sie_ocenic_tego_zwierzecia in #journal || Nie_wiesz_jak_to_ocenic in #journal || Stoisz_za_daleko in #journal || %TimerAL < #scnt2 if _na_oswojenie_tego_zwierza in #journal || Nie_masz_szans_by_je_oswoic in #journal { set %TimerAL #scnt2 + 9 repeat scanjournal 1 until To_stworzenie_ in #journal || %TimerAL < #scnt2 } if To_stworzenie_ in #journal { set %TimerAL #scnt2 + 8 repeat until %TimerAL < #scnt2 } return
sub Ukrywanie SkillUkrywanie: event macro 1 0 .um ukr set %TimerUkr #scnt2 + 3 repeat if %TimerUkr < #scnt2 goto SkillUkrywanie scanjournal 1 if Zapisywanie_Stanu_Swiata in #journal wait 120 until ukryl in #journal || nie_udalo_Ci_sie_ukryc in #journal || Wrog_Cie_juz in #journal || Nie_uda_Ci_sie_schowac_wierzchowca in #journal || Your_skill_in_Ukr in #journal || Your_skill_in_Hid in #journal return
sub ArmsLore if %CelSkilla = 0 gosub WskazCel set %SkroconaNazwa bro gosub ObsluzCelownikSkilla return
sub Wykrywanie SkillWykrywanie: event macro 1 0 .um wyk set %TimerWykr #scnt2 + 3 repeat if %TimerWykr < #scnt2 goto SkillWykrywanie scanjournal 1 if Zapisywanie_Stanu_Swiata in #journal wait 120 until Nie_znalazl in #journal || :_Znalazl in #journal || Your_skill_in_Wyk in #journal || Your_skill_in_Det in #journal return
sub SpiritSpeak set %JIndexSkillSS #jindex SkillSpiritSpeak: event macro 1 0 .um roz set %TimerSpiritS #scnt2 + 10 repeat if %TimerSpiritS < #scnt2 goto SkillSpiritSpeak until #jindex %JIndexSkillSS set %TimerSpiritS #scnt2 + 4 repeat if %TimerSpiritS < #scnt2 goto SkillSpiritSpeak scanjournal 1 if Zapisywanie_Stanu_Swiata in #journal wait 120 until _z_drugim_swiatem. in #journal || Your_skill_in_Roz in #journal || Your_skill_in_Spi in #journal return
;==============CELOWNIKI=============================================
sub ObsluzCelownikSkilla UzyjSkilla: event macro 1 0 .um %SkroconaNazwa set %TimerUSK #scnt2 + 3 repeat if %TimerUSK < #scnt2 goto UzyjSkilla scanjournal 1 if Zapisywanie_Stanu_Swiata in #journal wait 120 until #targcurs = 1 CelownikSkilla: set #ltargetkind 1 set #ltargetid %CelSkilla event macro 22 set %TimerUSK #scnt2 + 3 repeat if %TimerUSK < #scnt2 goto CelownikSkilla until #targcurs = 0return
sub WskazCel set #targcurs 1 set #sysmsgcol 1152 WskazCelSkilla: event sysmessage Wskaz cel dla skilla: %SkillName , #dot set %TimerWC #scnt2 + 100 repeat if %TimerWC < #scnt2 goto WskazCelSkilla onhotkey ESC goto WcisnietoESC until #targcurs = 0onhotkey ESC { WcisnietoESC: set #sysmsgcol 1080 event sysmessage Nie wskazales celu. halt } set %CelSkilla #ltargetid if #ltargetkind = 0{ set #sysmsgcol 1080 event sysmessage Zle wskazany cel. halt } return
|
| Buba spark | | | | | | | | | |
| | | |
|