vai var kads ludzu iedot skriptu uz tinkeringu lai nemtu taisitu un liktu soma pudeles mekleju krievu foruma nava!
Toggle shoutbox Chat
|
Tinkering
Started by CmPunk, Feb 17 2011 17:44
4 replies to this topic
#1
Posted 17 February 2011 - 17:44
#2
Posted 17 February 2011 - 17:53
Paņem parasto Carpentry scp uz blank scrooliem pamaini tik type i scp gatavs!
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#3
Posted 17 February 2011 - 18:12
nevaru o tip taja scripta atrast waja!ko tur jasamaina!?
CODE:
initevents
set %pila EGG ;pila
set %item MMF ;shto gotovim
set %chest NAKSLMD ; kuda klodom sunduk
set %log ZLK ;Logi
set %kolbaski GND ;bekon
set %milk ZBM
Display yesno Have you alredy made 1 scroll?
if #dispres = yes
goto start
if #dispres = no
{
display Make 1 scroll, and restart scrpt...
halt
}
start:
finditem %pila c_ , #backpackid
set #lobjectid #findid
event macro 17 0
wait 20
click 492 453
goto scaner
Scaner:
set %overt #scnt + 18
Scan:
DELETEJOURNAL
SCANJOURNAL 1
if You_put_ in #journal || Your_skill in #journal || You_fail in #journal || #scnt => %overt
goto start
if World_Save_has_ in #journal
{
wait 5s
goto Scaner
}
if You_need_ in #journal
{
goto reload
goto Scaner
}
if You_are_hungry! in #sysmsg
{
gosub eat
goto Scaner
}
wait 15
goto scan
Reload:
set #lobjectid %chest
event macro 17 0
while #contid <> %chest
wait 1
finditem %item c_ , #backpackid
exevent drag #findid #findstack
exevent dropc %chest
wait 15
finditem %log c_ , %chest
if #findkind = -1
{
Display Out of logs!
halt
}
exevent drag #findid 400
exevent dropc #backpackid
wait 10
goto start
sub eat
finditem %milk c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 15s
finditem %milk c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 15s
finditem %kolbaski c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 5s
finditem %kolbaski c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 5s
return
CODE:
initevents
set %pila EGG ;pila
set %item MMF ;shto gotovim
set %chest NAKSLMD ; kuda klodom sunduk
set %log ZLK ;Logi
set %kolbaski GND ;bekon
set %milk ZBM
Display yesno Have you alredy made 1 scroll?
if #dispres = yes
goto start
if #dispres = no
{
display Make 1 scroll, and restart scrpt...
halt
}
start:
finditem %pila c_ , #backpackid
set #lobjectid #findid
event macro 17 0
wait 20
click 492 453
goto scaner
Scaner:
set %overt #scnt + 18
Scan:
DELETEJOURNAL
SCANJOURNAL 1
if You_put_ in #journal || Your_skill in #journal || You_fail in #journal || #scnt => %overt
goto start
if World_Save_has_ in #journal
{
wait 5s
goto Scaner
}
if You_need_ in #journal
{
goto reload
goto Scaner
}
if You_are_hungry! in #sysmsg
{
gosub eat
goto Scaner
}
wait 15
goto scan
Reload:
set #lobjectid %chest
event macro 17 0
while #contid <> %chest
wait 1
finditem %item c_ , #backpackid
exevent drag #findid #findstack
exevent dropc %chest
wait 15
finditem %log c_ , %chest
if #findkind = -1
{
Display Out of logs!
halt
}
exevent drag #findid 400
exevent dropc #backpackid
wait 10
goto start
sub eat
finditem %milk c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 15s
finditem %milk c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 15s
finditem %kolbaski c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 5s
finditem %kolbaski c_ , %chest
exevent drag #findid 1
exevent dropc #backpackid
set #lobjectid #findid
event macro 17 0
event macro 17 0
wait 5s
return
#4
Posted 17 February 2011 - 18:36
set %pila EGG ;pila - te uzliec tinker tools type
set %item MMF ;shto gotovim - te ko taisisi piemeram flash type
set %chest NAKSLMD ; kuda klodom sunduk - kur stav resursi i nems
set %log ZLK ;Logi - ingu type
set %kolbaski GND ;bekon
set %milk ZBM
set %item MMF ;shto gotovim - te ko taisisi piemeram flash type
set %chest NAKSLMD ; kuda klodom sunduk - kur stav resursi i nems
set %log ZLK ;Logi - ingu type
set %kolbaski GND ;bekon
set %milk ZBM
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#5
Posted 17 February 2011 - 23:58
paldiesset %pila EGG ;pila - te uzliec tinker tools type
set %item MMF ;shto gotovim - te ko taisisi piemeram flash type
set %chest NAKSLMD ; kuda klodom sunduk - kur stav resursi i nems
set %log ZLK ;Logi - ingu type
set %kolbaski GND ;bekon
set %milk ZBM
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users