ink

Propali Newbie Sash + OLdp Wepon +10FS durab bil po 300 propala newbie roba+10Anatomy 140Dyraba ;Propal key ot korobla i Doma; +propali items Air... vse sto bilko na mne odeto + s BAck PAka paru items propali

set %logs ZLK; logu tips

set %safe MPCULMD; ID Sunduka, kuda skidivajem logi

set %ljtool FSF

set %Axe GFF; sitamais kuru izmantosim, lai izniicinaatu ljaunos juuras botus

start:



.....

....

....



goto start



sub ljing

move %1 %2 2

finditem %ljtool

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

wait 7

gosub backpack

return

sub backpack

set %overtime #scnt + 25

if #weight > #maxweight

{

   gosub razgr

return

}

scan:

if #hits < #maxhits

{

Finditem %Axe C_ , #BackpackId

set #lobjectID #findid

event macro 17 0

wait 5

gosub follow&kill; dodas uz subu, kurjsh seko un nogalina haha

wait 2

msg .usebandage $

}

if THERE_IS_NOTHING_HERE_TO_CHOP in #sysmsg

return

if It_appears_immune_to_your_blow in #sysmsg

return

if you_can't_reach_this in #sysmsg

return,

if #scnt >= %overtime

return



goto scan

sub razgr; Razgruzka

move ....

move ....

move ....

finditem %safe g_2

if #findkind = -1

goto razgr

set %kuda #findid

drop:

wait 5

finditem %logs c_ , #backpackid

if #findkind = -1

return

exevent Drag #Findid #findstack; Hvatajem vse logi

wait 5

msg $; Imitirujet nazatije ENTER

wait 5; Pri vzjatih logah

exevent Dropc %safe; Sgruzajem v Sunduk

goto drop

return



sub follow&kill

repeat

finditem #enemyid

event pathfind #FINDX #FINDY #FINDZ 1 3s

wait 1s

}

until #findcnt = 0

wait 2

return

Kak zdelat 6tobi on adeval staffa , ilji war axe ? on 6as kagda izpolzivaet .Arm to on adevaet Hatcheta ... no nado 6tobi adival staffa ilji war axe.. help~

irir

set %ljtool NPF_qpf



start:

....

...

...











goto start



sub MINING

move %1 %2 1

finditem %ljtool

set #lobjectid #findid

event macro 17 0

target 14s

set #ltargetx %1

set #ltargety %2

set #ltargetkind 3

set #ltargettile %3

event macro 22 0

wait 7

set %overtime #scnt + 25

gosub bp10

return



gosub bp10

sub bp10

if #weight > 600

gosub home $



sub scan

scan:

scanjournal %cnt

if #hits < 150

msg .arm$

if #hits < 150

msg .camp $

if #hits < 160

return

if THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg

return

if You_stop_Mining in #sysmsg

return

if YOu_CAN'T_REACH_THIS in #sysmsg

return

if You_fail_to_do_that in #sysmsg

return

if You_can`t_use_the in #sysmsg

return

if Try_mining_elsewhere in #sysmsg

return

if #scnt >= %overtime

return

goto scan







sub home

move 3367 349

move 3355 362

move 3350 357

gosub moveItems



sub moveItems

{

  set !dragTimeout 4;1/10 s

  set !dragTimer #scnt2

  set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  if %0 < 2

	set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF

  set !from QZXWJMD

  set !to DNNCKMD

  finditem !items C_ , !from

  for #findindex 1 #findcnt

  {

	if #findkind = 0

	{

	  set !amt 1

	  if #findstack > 1

		set !amt #findstack

	  while #scnt2 < !dragTimer

		wait 0

	  exevent drag #findid !amt

	  exevent dropc !to

	  set !dragTimer #scnt2 + !dragTimeout

	}

  }

  namespace clear



}

gosub vadadsa

sub vadadsa



return

Mne nado 6tobi script 6ol za Elementom i ubial ... 6tobi nestajal na meste no adel aruze i otokaal ivo.. patfilding ilji kak..

daite skri na drop itame, 6tobi rosto vikidaval fignju posle krafta na pol...