Toggle shoutbox Chat
|
Neatradu
#1
Posted 01 April 2011 - 13:04
Paldies jau ieprieks !
#3
Posted 01 April 2011 - 16:28
Ok paldies un kad tas varetu but ?Būšu mājās iemetīšu.
#4
Posted 01 April 2011 - 17:32
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#5
Posted 01 April 2011 - 17:40
Nu bet man vaig lai sakuma untrapo un tad unloko , man neder tas scp kuru tu domaMeklet nemaki.foruma kur gatavi scripti ir tads.vinsh no sakuma unlock visas pandoras un tad prasa pats taisisi vala vai automatiksi.
#6
Posted 01 April 2011 - 19:29
set %pan CUD_HKF
finditem %loc c_ , #backpackid
set #lobjectid #findid
event macro 17 0
finditem %pan c_ , #backpackid
set #ltargetid #findid
set #ltargetkind 1
event macro 22 0
finditem %pan c_ , #backpackid
set #lobjectid #findid
event macro 17 0
wait 5
return
#7
Posted 01 April 2011 - 20:10
set %lockpick NWH
set %pandora CUD
;Script unlocks all Pandora Boxes in your backpack.
;After unlocking script will ask for opening Pandora Box too.
;Script shows how many Pandora Box you have, how many are unlocked and opened.
;Added protection for maximal weight. If your weight will be full, just follow the instructions.
;Set %maxweight by yourself or use default.
;© EnFlame
set %maxweight #maxweight; #maxweight in EasyUO default is Str*3,7
;---------------------------------
finditem %pandora c_ , #backpackid
event Sysmessage In your backpack is #findcnt Pandora Box!
if #findcnt = 0
halt
gosub unlock
gosub open
halt
sub unlock
set %unlockedboxes 0
event Sysmessage Unlocking...
wait 20
scanjournal
repeat
{
finditem %lockpick c_ , #backpackid
if #findcnt = 0
gosub lockpicks
set #lobjectid #findid
event macro 17 0
target 4s
finditem %pandora c_ , #backpackid
if #findcnt = 0
{
gosub pandora
return
}
set #ltargetid #findid
set #ltargetkind 1
event macro 22 0
deletejournal
gosub scan
}
until #false
return
sub scan
set %overTime #scnt + 15
repeat
{
for %i 1 3
{
scanjournal %i
if you_fail in #journal || must_wait in #journal
{
wait 20
return
}
if box_unlocked in #journal || is_already in #journal
{
set %unlockedboxes %unlockedboxes + 1
event Sysmessage %unlockedboxes box(es) unlocked!
ignoreitem #ltargetid
wait 20
return
}
}
}
until #scnt > %overTime
return
sub open
set %openedboxes 0
ignoreitem reset
repeat
{
if #weight > %maxweight
gosub weight
finditem %pandora c_ , #backpackid
if #findcnt = 0
{
event Sysmessage There aren't any Pandora Box in you backpack!
return
}
set %pandoraCount #findcnt
set #lobjectID #findid
while #findcnt = %pandoraCount
{
event macro 17 0
wait 15
finditem %pandora c_ , #backpackid
}
set %openedboxes %openedboxes + 1
event Sysmessage %openedboxes box(es) opened!
}
until #false
return
sub lockpicks
display ok Sysmessage Please buy more lockpicks and hit Play! $
+ Script is paused! $
pause
finditem %lockpick c_ , #backpackid
return
sub pandora
set #targcurs 0
event Sysmessage All of the Pandora Box have been unlocked!
wait 30
display yesno Do you want open Pandora Box automaticaly?
if #dispres = yes
{
wait 20
return
}
if #dispres = no
{
event Sysmessage Good luck opening boxes by Yourself #smc , )
halt
}
return
sub weight
display ok Your weight is full! $
+ Please make some free space in your backpack and hit Play! $
+ Script is paused! $
pause
return
#8
Posted 01 April 2011 - 23:48
EASY UO...
set %lockpick NWH
set %pandora CUD
;Script unlocks all Pandora Boxes in your backpack.
;After unlocking script will ask for opening Pandora Box too.
;Script shows how many Pandora Box you have, how many are unlocked and opened.
;Added protection for maximal weight. If your weight will be full, just follow the instructions.
;Set %maxweight by yourself or use default.
;© EnFlame
set %maxweight #maxweight; #maxweight in EasyUO default is Str*3,7
;---------------------------------
finditem %pandora c_ , #backpackid
event Sysmessage In your backpack is #findcnt Pandora Box!
if #findcnt = 0
halt
gosub unlock
gosub open
halt
sub unlock
set %unlockedboxes 0
event Sysmessage Unlocking...
wait 20
scanjournal
repeat
{
finditem %lockpick c_ , #backpackid
if #findcnt = 0
gosub lockpicks
set #lobjectid #findid
event macro 17 0
target 4s
finditem %pandora c_ , #backpackid
if #findcnt = 0
{
gosub pandora
return
}
set #ltargetid #findid
set #ltargetkind 1
event macro 22 0
deletejournal
gosub scan
}
until #false
return
sub scan
set %overTime #scnt + 15
repeat
{
for %i 1 3
{
scanjournal %i
if you_fail in #journal || must_wait in #journal
{
wait 20
return
}
if box_unlocked in #journal || is_already in #journal
{
set %unlockedboxes %unlockedboxes + 1
event Sysmessage %unlockedboxes box(es) unlocked!
ignoreitem #ltargetid
wait 20
return
}
}
}
until #scnt > %overTime
return
sub open
set %openedboxes 0
ignoreitem reset
repeat
{
if #weight > %maxweight
gosub weight
finditem %pandora c_ , #backpackid
if #findcnt = 0
{
event Sysmessage There aren't any Pandora Box in you backpack!
return
}
set %pandoraCount #findcnt
set #lobjectID #findid
while #findcnt = %pandoraCount
{
event macro 17 0
wait 15
finditem %pandora c_ , #backpackid
}
set %openedboxes %openedboxes + 1
event Sysmessage %openedboxes box(es) opened!
}
until #false
return
sub lockpicks
display ok Sysmessage Please buy more lockpicks and hit Play! $
+ Script is paused! $
pause
finditem %lockpick c_ , #backpackid
return
sub pandora
set #targcurs 0
event Sysmessage All of the Pandora Box have been unlocked!
wait 30
display yesno Do you want open Pandora Box automaticaly?
if #dispres = yes
{
wait 20
return
}
if #dispres = no
{
event Sysmessage Good luck opening boxes by Yourself #smc , )
halt
}
return
sub weight
display ok Your weight is full! $
+ Please make some free space in your backpack and hit Play! $
+ Script is paused! $
pause
return
Nau iespejams uzlikt kad sakuma untrapo un tad tikai unloko
#9
Posted 03 April 2011 - 21:09
Nau iespejams uzlikt kad sakuma untrapo un tad tikai unloko
izdzes to dalju, kur skripts unloko un palaidi. tad tikai attrapos
Nothing is heavy for those who have wings
#10
Posted 03 April 2011 - 22:32
#11
Posted 06 April 2011 - 19:35
nevari man palidzet un uztaisit kipa tapat un unlock bet tikai untrapo ? pldstik viegli pārveidot nevar, ieciklēsies uz 1 box'u un visu laiku radīs, ka vajag unlokot.
#12
Posted 06 April 2011 - 21:58
#13
Posted 07 April 2011 - 00:09
set %loc NWH set %pan CUD_HKF finditem %loc c_ , #backpackid set #lobjectid #findid event macro 17 0 wait 10 finditem %pan c_ , #backpackid set #ltargetid #findid set #ltargetkind 1 event macro 22 0 wait 10 finditem %pan c_ , #backpackid set #lobjectid #findid event macro 17 0 wait 5 return
Pliks kods, bez nekādām pārbaudēm.
:damaged beyond repair:
skype - sermuli
#14
Posted 07 April 2011 - 08:42
nu davai bet 1. es nedosu , pec scp tikai dosu, jo esmu dzirdejis kad tu apkrisi playerusPar 1nu loterijas biļeti(5rp) uztaisīљu.
#15
Posted 07 April 2011 - 10:32
set %loc NWH set %pan CUD_HKF finditem %loc c_ , #backpackid set #lobjectid #findid event macro 17 0 wait 10 finditem %pan c_ , #backpackid set #ltargetid #findid set #ltargetkind 1 event macro 22 0 wait 10 finditem %pan c_ , #backpackid set #lobjectid #findid event macro 17 0 wait 5 return
Pliks kods, bez nekādām pārbaudēm.
man vaidzetu tadu ka enflame iedeva tikai lai vinjs untrapo tikai
#16
Posted 07 April 2011 - 17:21
#17
Posted 07 April 2011 - 17:45
neceriKabaci, tā gan mums nesanāks sarunāt. Biļete, tad scp.
#18
Posted 07 April 2011 - 18:38
#19
Posted 07 April 2011 - 19:11
OkNu tad sēdi bez skripta un ceri uz kādu labdari.
1 user(s) are reading this topic
0 members, 1 guests, 0 anonymous users