|
|
|
| JetBoy | 2008, mar 21 21:56
|
|
|
 |
|
| Brak postaci | |
|
| 2008, maj 14 |
Dołączam sie do prośby hali  | |
|
| JetBoy | 2008, mar 21 22:03
|
|
|
|
|
|
| Brak postaci | |
|
| 2008, maj 14 |
; przerabianie welny by Raist
; przerabia welne na bele materialu, po czym
; tnie bele na tkanine, moze to robic z hidem
;------------------------------------------------------------------------------------
set %hajd 0 ; 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 Pociales in #sysmsg || Pociales 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
}
}
Teraz bedzie Ci dzialac | |
|
| Demi | 2008, mar 22 00:31
|
|
|
|
|
|
| Brak postaci | |
|
2015, wrz 17
| GRU | |
;Skrypt: ciecie bel materialu
;Autor: Dem
;Nalezy pierw pociac tkanine raz, po czym wlaczyc skrypt
Initevents
set #sysmsgcol 1283
event sysmessage Skrypt by Dem
sub ciecie
finditem kag C
if #findkind = -1
{
set #sysmsgcol 1080
event sysmessage Nie masz nozyczek!
halt
}
if #findkind = 1
set #lobjectid #findid
event macro 17
finditem oag_zzf_mag_lag
set #ltargetid #findid
wait 5
event macro 22
wait 6s
gosub ciecie | |
|
| Sylab | 2008, mar 22 10:46
|
|
|
|
|
|
| Brak postaci | |
|
2008, maj 6
| Szczecininga... | |
Bardzo prosze o poprawienie tego skryptu na robienie czystych strzał. Za każdym razem trzeba wybierać kłody i do tego nie ćwiczy anatomi.
;Autor: [nGz]
;%Skill - defaultowo 0 - nic, 1 - Ukrywanie, 2 - Anatomia, 3 - Wiedza o Broni, 4 - Wiedza o Zwierzetach, 5 - Wykrywanie.
;%Skill_powtorzenia - defaultowo 1 - okresla co ile powtorzen ma robic skilla.
;============
set %Skill 2
set %Skill_powtorzenia 1
;============
if %Skill
0set %Licznik_powtorzen %Skill_powtorzenia
if %Skill = 1
set %Nazwa_skilla Ukrywanie
if %Skill = 2
set %Nazwa_skilla Anatomia
if %Skill = 3
set %Nazwa_skilla Armslore
if %Skill = 4
set %Nazwa_skilla Animallore
if %Skill = 5
set %Nazwa_skilla Wykrywanie
set %Cel_skilla
0set #targcurs 1
set #sysmsgcol 1152
Wybierz_klody:
event sysmessage Wybierz klody.
set %Timer_2 #scnt2 + 90
repeat
if %Timer_2 < #scnt2
goto Wybierz_klody
onhotkey ESC
goto Wybierz_klody_ESC
until #targcurs =
0onhotkey ESC
{
Wybierz_klody_ESC:
set #sysmsgcol 1080
event sysmessage Musisz wybrac klody.
halt
}
finditem #ltargetid
if #findtype zlk
;goto Wybierz_klody_ESC
set %Id_klod #findid
Start:
if %Licznik_powtorzen = %Skill_powtorzenia && %Skill
0gosub %Nazwa_skilla
if %Skill
0set %Licznik_powtorzen %Licznik_powtorzen - 1
if %Licznik_powtorzen
start:
event macro 17
target 5s
event macro 22
wait 20
click 270 70 d
weit 3s
click 270 70 d
weit 3s
click 136 390 d
weit 3s
click 240 60 d
wait 10s
key f4
wait 10
go to start: | |
|
| Konto Do Usunięcia. | 2008, mar 22 12:44
|
|
|
|
|
|
| Brak postaci | |
|
| 2009, lis 4 |
Szukam skryptu na tworzenie surowych strzał... | |
|
| larz | 2008, mar 22 13:00
|
|
|
|
|
|
| Brak postaci | |
|
2014, kwi 25
| Ostrołęka | |
initevents
for %20 1 10
{
event macro 17
target 5s
event macro 22
wait 1s
click 135 390 d
wait 9s
key f2
wait 1
}
msg $
wait 1
click 70 96
Powiedz mi ILE RAZY TRZEBA WKLEIC?
|
| Sortris napisał: "Dla ludzi, którzy tworzą takie tematy, jak już kiedyś pisałem, powinien być perm, śmierć w realu i skazanie do Piekła, z uprzednim podpisaniem papierka na oddanie chorym narządów z wyjątkiem mózgu."|
|
| Valth | 2008, mar 23 07:07
|
|
|
|
|
|
| Brak postaci | |
|
2008, mar 31
| Chorzów | |
Witam
Już kiedyś pisałem z problemem w tym temacie jednakże nikt nie był w stanie mi pomóc. Chciałbym ponowić moją prośbe i prosić o napisanie działajacego skryptu na łowienie + hid. Wszystie skrypty na łowienie ktore sprawdzałem albo wogóle nie działają albo nie znajdują ryb (wszędzie jest komunikat "wyglada jakby tu juz nie bylo wiecej ryb" - kiedy klikam recznie w to miejsce wylawiam pelną liczbe ryb). Bardzo proszę o rozwiązanie mojego jak i innych problemu.
Pozdrawiam | |
|
| zajec | 2008, mar 23 12:30
|
|
|
|
|
|
| Brak postaci | |
|
| 2008, mar 25 |
dolaczam sie do prosby | | | | | | | | | |
| | | |
|
