18 replies to this topic

[kabacis]

Kads nevaretu iedot scp kas pats untrapo un pec tam unloko pandoras , jo es tikai atradu tadu kurs tik unloko , bet neattrapo ...
Paldies jau ieprieks !

[Ganjakur]

Būšu mājās iemetīšu.

[kabacis]

Būšu mājās iemetīšu.

Ok paldies un kad tas varetu but ?

[ExTjUtY]

Meklet nemaki.foruma kur gatavi scripti ir tads.vinsh no sakuma unlock visas pandoras un tad prasa pats taisisi vala vai automatiksi.

[kabacis]

Meklet nemaki.foruma kur gatavi scripti ir tads.vinsh no sakuma unlock visas pandoras un tad prasa pats taisisi vala vai automatiksi.

Nu bet man vaig lai sakuma untrapo un tad unloko , man neder tas scp kuru tu doma

[Ganjakur]

set %loc NWH
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

[Point]

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

[kabacis]

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

[spyte]

Nau iespejams uzlikt kad sakuma untrapo un tad tikai unloko

izdzes to dalju, kur skripts unloko un palaidi. tad tikai attrapos

[EnFlame]

tik viegli pārveidot nevar, ieciklēsies uz 1 box'u un visu laiku radīs, ka vajag unlokot.

[kabacis]

tik viegli pārveidot nevar, ieciklēsies uz 1 box'u un visu laiku radīs, ka vajag unlokot.

nevari man palidzet un uztaisit kipa tapat un unlock bet tikai untrapo ? plds

[Ganjakur]

Par 1nu loterijas biļeti(5rp) uztaisīšu.

[..Sermulis..]

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.

[kabacis]

Par 1nu loterijas biļeti(5rp) uztaisīљu.

nu davai bet 1. es nedosu , pec scp tikai dosu, jo esmu dzirdejis kad tu apkrisi playerus

[kabacis]

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

[Ganjakur]

Kabaci, tā gan mums nesanāks sarunāt. Biļete, tad scp.

[kabacis]

Kabaci, tā gan mums nesanāks sarunāt. Biļete, tad scp.

neceri

[Ganjakur]

Nu tad sēdi bez skripta un ceri uz kādu labdari.

[kabacis]

Nu tad sēdi bez skripta un ceri uz kādu labdari.

Ok