nu tak vilozi =) a mi ocenim =]Mogu vilozitj "svoj universalnij na dobi4u libo logov libo rudi" rabotaet bez otkazno + vse fiwki.
Toggle shoutbox Chat
|
Mining v skalax
#21
Posted 14 September 2007 - 19:40
#22
Posted 15 September 2007 - 07:54
Да пришли в личку мне на лумбер скрипт буду оч рад=)nu tak vilozi =) a mi ocenim =]
#23
Posted 15 September 2007 - 09:40
esli ti mne, to ja vikladival script na lumber =)Да пришли в личку мне на лумбер скрипт буду оч рад=)
#24
Posted 05 October 2007 - 12:53
Я понятия не имею, какой у меня IQ. Те, кого интересует их IQ, — просто неудачники.
Стивен Хокинг, физик
Русский человек ради "хуй знает зачем" способен на удивительные поступки.
#25
Posted 05 October 2007 - 13:52
#26
Posted 05 October 2007 - 16:52
Надоел, ей богу. Не хочешь - не выкладывай, но не надо об этом везде писать.Net,bolse ni4evo vikladivatj ne budu,sami znaete po4emu...
#27
#28
Posted 20 November 2007 - 22:11
#29
Posted 21 November 2007 - 00:14
#30
Posted 21 November 2007 - 00:56
#31
Posted 21 November 2007 - 00:58
initeventsljudi skinjte progu ili lailer tot kotorij skali videt a to ja ne mogu 4erez lailer kordinati skali polu4itj on va6e kakbudto ejo ne videt
set %tree 0
set %pick NPF
start:
finditem %pick
set #lobjectid #findid
event macro 17 0
targloop:
vot izpravlj v prostom lailere.. ilje vabshe mozhno v ruchnu kak mnogie delajut
GOSUB LJING "5355 2579 - koardinati rjadom s skaloj"
#32
Posted 21 November 2007 - 01:10
set %ljtool NPF_qpf
start:
gosub ljing 4625 2676 0
gosub ljing 4624 2675 0
gosub ljing 4622 2673 0
gosub ljing 4620 2672 0
gosub ljing 4619 2671 0
gosub ljing 4618 2670 0
gosub ljing 4610 2661 0
gosub ljing 4608 2660 0
gosub ljing 4606 2659 0
gosub ljing 4603 2657 0
gosub ljing 4602 2656 0
gosub ljing 4599 2652 0
gosub ljing 4602 2655 0
gosub ljing 4594 2649 0
gosub ljing 4592 2648 0
gosub ljing 4591 2647 0
gosub ljing 4590 2646 0
gosub ljing 4588 2645 0
gosub ljing 4587 2644 0
gosub ljing 4585 2642 0
gosub ljing 4584 2641 0
gosub ljing 4588 2644 0
gosub ljing 4581 2639 0
gosub ljing 4580 2638 0
gosub ljing 4577 2636 0
gosub ljing 4575 2635 0
gosub ljing 4573 2634 0
gosub ljing 4571 2632 0
gosub ljing 4569 2631 0
gosub ljing 4567 2630 0
gosub ljing 4565 2629 0
gosub ljing 4563 2628 0
gosub ljing 4560 2626 0
gosub ljing 4559 2625 0
gosub ljing 4558 2624 0
gosub ljing 4557 2623 0
gosub ljing 4556 2622 0
gosub ljing 4554 2621 0
gosub ljing 4552 2620 0
gosub ljing 4551 2619 0
gosub ljing 4550 2618 0
gosub ljing 4548 2617 0
gosub ljing 4547 2616 0
gosub ljing 4546 2615 0
gosub ljing 4545 2614 0
gosub ljing 4542 2613 0
gosub ljing 4540 2611 0
gosub ljing 4539 2610 0
gosub ljing 4536 2608 0
gosub ljing 4535 2607 0
gosub ljing 4534 2606 0
gosub ljing 4532 2605 0
gosub ljing 4533 2605 0
gosub ljing 4529 2602 0
gosub ljing 4526 2600 0
gosub ljing 4522 2597 0
gosub ljing 4520 2596 0
gosub ljing 4518 2595 0
gosub ljing 4519 2595 0
gosub ljing 4516 2593 0
gosub ljing 4515 2592 0
gosub ljing 4513 2590 0
gosub ljing 4511 2588 0
gosub ljing 4508 2586 0
gosub ljing 4506 2585 0
gosub ljing 4507 2585 0
gosub ljing 4502 2581 0
gosub ljing 4499 2579 0
gosub ljing 4497 2577 0
gosub ljing 4501 2580 0
gosub ljing 4500 2579 0
gosub ljing 4499 2578 0
gosub ljing 4492 2572 0
gosub ljing 4489 2570 0
gosub ljing 4487 2569 0
gosub ljing 4481 2559 0
gosub ljing 4480 2558 0
gosub ljing 4471 2550 0
gosub ljing 4475 2553 0
gosub ljing 4470 2549 0
goto start
sub ljing
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 > 770
gosub home $
sub scan
scan:
scanjournal %cnt
if #hits < 188
msg .arm$
wait 7
if #hits < 188
msg .camp heal $
gosub follow&kill
wait 2
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_
return
if Try mining elsewhere in #sysmsg
return
if #scnt >= %overtime
return
goto scan
sub home
move 4523 2639
move 4521 2639
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 LOXOLMD
set !to SJCJLMD
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
}
return
sub follow&kill
repeat
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
}
until #findcnt = 0
wait 2
return
#33
Posted 21 November 2007 - 10:31
#34
Posted 21 November 2007 - 11:34
Вот выкладываю пользуйтесь... Чар копает по скале бегает за мобом не кидает кемп !!!
set %ljtool NPF_qpf
start:
goto start
sub ljing
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 > 770
gosub home $
sub scan
scan:
scanjournal %cnt
if #hits < #maxhits
{
msg .arm$
wait 5
gosub follow&kill
wait 5
}
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_
return
if Try mining elsewhere in #sysmsg
return
if Capture_the_flag in #sysmsg
return
if Blackthorne's_Castle_Quest in #sysmsg
return
if World_Save_in_15_seconds in #sysmsg
return
if #scnt >= %overtime
return
goto scan
sub home
move 4523 2639
move 4521 2639
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 LOXOLMD
set !to SJCJLMD
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
}
return
sub follow&kill
repeat
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
until #findcnt = 0
wait 2
return
#35
Posted 21 November 2007 - 15:11
prigoditsja ^____^
помер и разлагаицо
#36
Posted 23 November 2007 - 14:37
Разобрался, отредактировал!
Теперь такая проблема когда долго неподхожу к компу он останавливается
#37
Posted 15 December 2007 - 00:59
1 user(s) are reading this topic
0 members, 1 guests, 0 anonymous users