Toggle shoutbox Chat
|
Bowkraft
#1
Posted 28 August 2008 - 13:42
1.Britānijā atveram banku
2.No konkrētas lādes paņemu 500-1000 aspen logus
3.Sataisu lokus
4.Aizeju līdz vendoram un pārdodu lokus
Esmu daudz mēģinājis un eksperimentējis, bet līdz galam nekas nesanāk.
Kaut kāda projekta daļa:
___________________________________
set %safe XXXXX ;aspen logu lāde bankā
set %dager XXXX ;nazis
set %logi XXX;koki
Banka:
move XXX XXX ;eju pie banku
msg bank $
finditem %safe
finditem %logs C_ , #safe ;Dikti šaubos par šamās rindas pareizumu
;Te visticamāk ar drag un drop jādabū tie 500-1000 logi somaa - man tas neizdodas
goto Loop
Loop:
if You_have_no in #sysmsg
{
Display You have no resources.
stop
}
goto Vendor
if You_can't_make_it in #sysmsg
{
Display You can't make it.
stop
}
goto Vendor
if world_save in #sysmsg
{
wait 30s
goto Make
}
if You_fail_to in #sysmsg
goto Make
if You_toss_the_failed in #sysmsg
goto Make
if You_put_the in #sysmsg
goto Make
if Your_skill_in in #sysmsg
goto Make
goto Loop
Make: ;Daļā Make 100% ir kļūdas
Finditem %dager C_, #backpack
set %dager
event Macro 17
wait 100; Cik jāliek laiks aptuveni lokiem??
click %x 455
goto Loop
Vendor:
move XXX XXX; eju pie vendora
msg Sell$
Finditem %logi C_, #backpack
Target %logi
click XXX XXX; Klik vietā, kur apstiprina pārdošanu
goto Banka
____________________________________
Diemžēl zināšanas par skriptiem easyUO valodā ir samērā niecīgas. Lūdzu palīdziet tikt galā! Lūdzu dikti nerāt par daudzajām kļūdām
#2
Posted 28 August 2008 - 17:15
ну мне почему то кажетса што первий вариант лутше
#3
Posted 28 August 2008 - 17:16
set %bag FUYEMMD; ID, kur staav logi set %aspenLogs 10; Cik daudz njemt mainLoop: gosub bank gosub make gosub sell goto mainLoop sub bank move 2884 670 0 repeat { msg bank$ wait 30 } until #conttype = IKF finditem %bag C if #findcnt = 0 { event sysmessage Wrong bag's ID! halt } set #lobjectid %bag event macro 17 0 while #contid <> %bag wait 1 finditem ZLK C_ , %bag exevent drag #findid %aspenLogs wait 10 exevent dropc #backpackid wait 20 return sub sell move 2902 669 0 repeat { finditem TOH C_ , #backpackid set #ltargetid #findid set #ltargetkind 1 msg Vendor Sell$ set %lag #scnt + 20 target while #targcurs = 0 && #scnt < %lag wait 1 event macro 22 0 } until #scnt < %lag && #contsize = 200_150 click 326 257 wait 20 return sub make set %end #false scanjournal finditem TSF C_ , #charid set #lobjectid #findid repeat { event macro 17 0 while #contkind <> UCHB wait 1 click 491 452 gosub scan } until %end return sub scan deletejournal set %lag #scnt + 20 repeat { for %i 1 5 { scanjournal %i if you_put in #journal || fail in #journal return if aspen_logs in #journal || can't_make_it in #journal set %end #true } } until %end returntiec pats ar viņu galā
#4
Posted 28 August 2008 - 18:08
EnFlame milzu paldies! Diezgan tehniski skriptus raksti skatos daudzas fīčas par kurām nepadomāju.
Vēl ir viena lieta - gadienā pašam nav skripts uz žagaru vākšanu, citādi mirstu nost katru dienu 1000 reizes uz koku spaidiit ar dadžeri...
Ja ir iedod lūdzu - mazam stimulam simboliska kompensācija miljons Tev par palīdzību uz xl. Tavs nick?
#5
Posted 28 August 2008 - 18:55
set %box HCBUKMD set %fullweight 200 set %x 1212 set %y 2121 start: GOSUB LJING xxxx zzzz tttt GOSUB LJING xxxx zzzz tttt GOSUB LJING xxxx zzzz tttt goto start sub ljing if #weight > %fullweight gosub moveItems move %1 %2 1 finditem TSF set #lobjectid #findid event macro 17 0 target 10s set #ltargetx %1 set #ltargety %2 set #ltargetkind 3 set #ltargettile %3 event macro 22 0 gosub chop set %overtime #scnt + 100 return sub chop scanjournal deletejournal repeat { for %i 1 3 { event macro 17 0 target event macro 22 0 wait 10 if wood_left_to_harvest in #sysmsg return } } until #scnt >= %overtime return sub moveItems move %x %y 0 drop: finditem PEF c_ , #backpackid if #findkind = -1 return exevent Drag #Findid #findstack wait 10 exevent Dropc %box wait 10 goto drop sub ghost if #charGhost = YES { terminate uo halt } return
#6
Posted 28 August 2008 - 19:04
#7
Posted 28 August 2008 - 19:07
#8
Posted 28 August 2008 - 19:12
Ap 22.00 būšu. Starp citu mans čars šobrīd varbūt MP nodarbojas ar netradicionālu beggingu no spēlētājiemvisbiežāk mp 1lvl mage Mapuwka
#9
Posted 28 August 2008 - 19:15
āhh zinuAp 22.00 būšu. Starp citu mans čars šobrīd varbūt MP nodarbojas ar netradicionālu beggingu no spēlētājiem
#10
Posted 28 August 2008 - 20:06
Ap 22.00 būšu. Starp citu mans čars šobrīd varbūt MP nodarbojas ar netradicionālu beggingu no spēlētājiem
es jau 1,5k esmu izterejis... Cik kopa jau esi dabuujis?
#11
Posted 28 August 2008 - 21:20
ну мне почему то кажетса што первий вариант лутше
#12
Posted 28 August 2008 - 22:02
prasa 500gp par joku...ko ta šamais dara?
#13
Posted 29 August 2008 - 08:48
viens vienreiz pie brit teica, iedod 500 gp pateikshu joku, es iedevu 500 gp, shis kko pa krieviski nomuldeeja neko nesapratu.. ap 3 gadiem atpakalj tas notika, vel tagad atceros, ja nemaldos tas bija uz main !prasa 500gp par joku...
#14
Posted 29 August 2008 - 09:06
Kamēr darbā biju ar visiem sūdiem kopā kas bija somā samesti - 250k bijaes jau 1,5k esmu izterejis... Cik kopa jau esi dabuujis?
#15
Posted 29 August 2008 - 10:05
Kamēr darbā biju ar visiem sūdiem kopā kas bija somā samesti - 250k bija
lol tur visadus itemus ar var mest?
#16
Posted 02 September 2008 - 11:12
Skripts veidots tā, ka trade tiek automātiski apstiprināts. Pēc tam salīdzina iepriekšējo naudas daudzumu ar jauno - lai noskaidrotu vai iedots par maz, precīzi vai par daudz. Citas pārbaudes navlol tur visadus itemus ar var mest?
#17
Posted 02 September 2008 - 20:38
lol, lapsSkripts veidots tā, ka trade tiek automātiski apstiprināts. Pēc tam salīdzina iepriekšējo naudas daudzumu ar jauno - lai noskaidrotu vai iedots par maz, precīzi vai par daudz. Citas pārbaudes nav
1 user(s) are reading this topic
0 members, 1 guests, 0 anonymous users