PDA

Просмотр полной версии : ламбер


zenter
17.12.2005, 15:22
Выложите макр на ламбер ,по возможности чтоб он реколился от лог гвардов ,реколился домой и относил логи

Elric
17.12.2005, 15:28
скачан с какого-то форума. не тестил
:start
//************************************************** *
// ***** L_A_M_B_E_R_J_A_C_K_I_N_G ****
//************************************************** *
set $nothide You can't seem to hide here.
set $hideon You have hidden yourself well //захайдился
set $atack attacking
set $put in your pack.
set $wood any useable wood.
set $away That's too far away to chop.
set $left There are no logs here to chop.
set $reaper oh my
set #c 0
set #shag 1
set #hom 1074102103 //ID runi domoy
set #les1 1074102104 // ID runi v les 1
set #les2 1074102105 // ID runi v les 2
set #mas 0
set #run 0
set #xregs 401 // координаты твоего мешка с регами и киркой в паке.
set #yregs 260
while 1 = 1
if_not #run = 1
gosub les
end_if

while 1 = 1
set #cx %chx[100 #shag]
if #cx = 0
break
end_if

while #c = 0
gosub perehod
if #c = 1
break
end_if
gosub rubit
if #c = 2
break
end_if
end_while

if #c = 1
gosub guard
end_if
if #c = 2
gosub home
break
end_if

end_while
set #shag 1

end_while
end_script

Elric
17.12.2005, 15:29
продолжение
//************************************************** *
//************************************************** *
//************************************************** *
:perehod //*******ходим**************************
for #i 1 30 1
if lastmsg $atack
set #c 1
break
end_if
end_for
if #c = 1
goto end_perehod
end_if
set #cx %chx[100 #shag]
set #cy %chy[100 #shag]
if_not #cx = 0
set timer 0
while_not ( charposx = #cx ) and ( charposy = #cy )

if ( charposx = #cx ) and ( charposy < #cy )
set #step ( #cy - charposy ) + 1
repeat #step
send End
for #i 1 10
if lastmsg $atack
set #c 1
break 2
end_if
end_for
end_repeat
end_if

if ( charposx > #cx ) and ( charposy = #cy )
set #step ( charposx - #cx ) + 1
repeat #step
send Home
for #i 1 10
if lastmsg $atack
set #c 1
break 2
end_if
end_for
end_repeat
end_if

if ( charposx = #cx ) and ( charposy > #cy )
set #step ( charposy - #cy ) + 1
repeat #step
send PageUp
for #i 1 10
if lastmsg $atack
set #c 1
break 2
end_if
end_for
end_repeat
end_if

if ( charposx < #cx ) and ( charposy = #cy )
set #step ( #cx - charposx ) + 1
repeat #step
send PageDown
for #i 1 10
if lastmsg $atack
set #c 1
break 2
end_if
end_for
end_repeat
end_if

if timer > 25000
set #c 1
break
end_if

for #i 1 50
if lastmsg $atack
set #c 1
break 2
end_if
end_for

end_while
else
set #c 1
set #run 0
end_if
:end_perehod
return

Elric
17.12.2005, 15:29
продолжение
:rubit //************************************
:hiding
set lastskill 21 //hiding
send f8
set timer 0
set #v 0
while 1 = 1
if lastmsg = $nothide
set #v 1
end_if
if (lastmsg = $hideon)
break
end_if
if (lastmsg = $atack)
set #c 1
break
end_if
if (lastmsg = $reaper)
set #c 1
break
end_if
if timer > 4000
break
end_if
end_while
if #c > 0
goto end_rubit
end_if
if #v = 1
goto hiding
end_if
if #c = 1
goto end_rubit
end_if
set #j 1
set #tx %ltx[100 #shag]
set #ty %lty[100 #shag]
set laststatictype %lst[100 #shag]
set lasttargetx #tx
set lasttargety #ty
//set laststatictype #st
set lasttargetkind 3
set lastobjectid 1074157126 // топор
set lastobjecttype 3907
//msg laststatictype
:rep
set #m 0
send f11 // lastobject
wait 500
if lastmsg reaper
say guards
wait 1500
say guards
send tab
wait 1500
end_if
for #i 1 350
if (lastmsg = $left ) or (lastmsg = $away)
break
end_if
if lastmsg = $atack
set #c 1
break
end_if
if (lastmsg = $put ) or (lastmsg = $wood ) or (lastmsg Lumberjacking)
set #m 1
break
end_if
if target = 1
break
set #m 1
end_if
end_for
set target 0
if wght > 460
set #c 2
end_if
if #c > 0
goto end_rubit
end_if
if #m = 1
goto rep
end_if
set #shag #shag + 1
:end_rubit
return

Elric
17.12.2005, 15:30
продолжение
//*************************************************
// H O M E
//*************************************************
:home
set target 0
set %dom [2 1] charposx
set %dom [2 2] charposy
set $v %dom [2]

:kniga
set #kn 0
set target 0
set lastspell 31 // recall
set lasttargetkind 1
set lasttargetid #hom
send f9 // lastspell waitfortarget lasttarget
wait 5000
set timer 0
while 1 = 1
set %les [2 1] charposx
set %les [2 2] charposy
set $vv %les [2]
if_not $vv = $v
break
end_if
if lastmsg = fizzles
set #c 2
say ,
break
end_if
if timer > 12000
set target 0
set #kn 1
break
end_if
end_while
end_if
if #kn = 1
goto kniga
end_if

Elric
17.12.2005, 15:30
продолжение
// *************RAZGRUZKA*********
send f10
set #vert 7 // шаг по вертикали
set #goriz 5 // шаг по горизонтали

set #x1 823
set #x2 966
set #y1 98
set #y2 165
:pov_drag2
set #drg 0
set lastobjectid 11111111
for #i #y1 #y2 #vert
for #j #x1 #x2 #goriz
double_left #j #i
double_left #j #i
if_not lastobjectid = 11111111
drag #j #i 382, 339 all
send f10
wait 1000
set #drg 1
break 2
end_if
end_for
set #x1 823
end_for
if #drg = 1
set #x1 #j
set #y1 #i
goto pov_drag2
end_if
set #run 1

Elric
17.12.2005, 15:31
продолжение
//******* R E G I ************


wait 1500
drag 387, 317 #xregs, #yregs 10 // BP - откуда
move #xregs, #yregs
wait 300
send enter
wait 300
left #xregs, #yregs
wait 1000
drag 379, 317 #xregs, #yregs 10 // MR - откуда
move #xregs, #yregs
wait 300
send enter
wait 300
left #xregs, #yregs
wait 1000
drag 354, 342 #xregs, #yregs 10 // BM - откуда
move #xregs, #yregs
wait 300
send enter
wait 300
goto start
set #c 0
return

//***********************************************
// L E S
//***********************************************
:les
set #mas #mas + 1
if #mas = 3
set #mas 1
end_if
gosub #mas

set target 0
set %dom [2 1] charposx
set %dom [2 2] charposy
set $v %dom [2]

:kniga
set #kn 0
set target 0
set lastspell 31 // recall
set lasttargetkind 1
//set lasttargetid #les1
send f9 // lastspell waitfortarget lasttarget
wait 5000
set timer 0
while 1 = 1
set %les [2 1] charposx
set %les [2 2] charposy
set $vv %les [2]
if_not $vv = $v
set #run 1
break
end_if
if lastmsg = fizzles
set #kn 1
say ,
break
end_if
if timer > 12000
set target 0
set #kn 1
break
end_if
end_while
end_if
if #kn = 1
goto kniga
end_if
return

zenter
17.12.2005, 15:31
это для пилота?

Elric
17.12.2005, 15:31
продолжение
//************************************************** **
// G U A R D
//************************************************** **
:guard
set target 0
repeat 6
set lastskill 14 //detect hiden
send f8 // lastskill
say guards
wait 200
end_repeat
set #c 0
return

:1
set %chx[100 1] 662 // ********* 1
set %chy[100 1] 1025
set %ltx[100 1] 660
set %lty[100 1] 1023
set %lst[100 1] 3299
set %chx[100 2] 662 // ********* 2
set %chy[100 2] 1025
set %ltx[100 2] 660
set %lty[100 2] 1026
set %lst[100 2] 3296
set %chx[100 3] 662 // ********* 3
set %chy[100 3] 1025
set %ltx[100 3] 664
set %lty[100 3] 1026
set %lst[100 3] 3291
set %chx[100 4] 662 // ********* 4
set %chy[100 4] 1032
set %ltx[100 4] 660
set %lty[100 4] 1029
set %lst[100 4] 3280
set %chx[100 5] 662 // ********* 5
set %chy[100 5] 1032
set %ltx[100 5] 664
set %lty[100 5] 1032
set %lst[100 5] 3277
set %chx[100 6] 662 // ********* 6
set %chy[100 6] 1032
set %ltx[100 6] 660
set %lty[100 6] 1032
set %lst[100 6] 3302
set %chx[100 7] 662 // ********* 7
set %chy[100 7] 1032
set %ltx[100 7] 664
set %lty[100 7] 1035
set %lst[100 7] 3296
set %chx[100 8] 662 // ********* 8
set %chy[100 8] 1038
set %ltx[100 8] 664
set %lty[100 8] 1041
set %lst[100 8] 3289
set %chx[100 9] 662 // ********* 9
set %chy[100 9] 1038
set %ltx[100 9] 664
set %lty[100 9] 1038
set %lst[100 9] 3277
set %chx[100 10] 662 // ********* 10
set %chy[100 10] 1038
set %ltx[100 10] 660
set %lty[100 10] 1038
set %lst[100 10] 3299
set %chx[100 11] 662 // ********* 11
set %chy[100 11] 1038
set %ltx[100 11] 660
set %lty[100 11] 1041
set %lst[100 11] 3277
set %chx[100 12] 662 // ********* 12
set %chy[100 12] 1050
set %ltx[100 12] 660
set %lty[100 12] 1047
set %lst[100 12] 3294
set %chx[100 13] 662 // ********* 13
set %chy[100 13] 1050
set %ltx[100 13] 664
set %lty[100 13] 1050
set %lst[100 13] 3299
set %chx[100 14] 662 // ********* 14
set %chy[100 14] 1050
set %ltx[100 14] 664
set %lty[100 14] 1053
set %lst[100 14] 3291
set %chx[100 15] 662 // ********* 15

Elric
17.12.2005, 15:32
продолжение
set %chy[100 15] 1058
set %ltx[100 15] 664
set %lty[100 15] 1056
set %lst[100 15] 3296
set %chx[100 16] 661 // ********* 16
set %chy[100 16] 1058
set %ltx[100 16] 660
set %lty[100 16] 1056
set %lst[100 16] 3286
set %chx[100 17] 661 // ********* 17
set %chy[100 17] 1058
set %ltx[100 17] 660
set %lty[100 17] 1059
set %lst[100 17] 3291
set %chx[100 18] 661 // ********* 18
set %chy[100 18] 1068
set %ltx[100 18] 660
set %lty[100 18] 1065
set %lst[100 18] 3302
set %chx[100 19] 662 // ********* 19
set %chy[100 19] 1068
set %ltx[100 19] 660
set %lty[100 19] 1068
set %lst[100 19] 3299
set %chx[100 20] 662 // ********* 20
set %chy[100 20] 1068
set %ltx[100 20] 664
set %lty[100 20] 1071
set %lst[100 20] 3296
set %chx[100 21] 662 // ********* 21
set %chy[100 21] 1076
set %ltx[100 21] 660
set %lty[100 21] 1074
set %lst[100 21] 3277
set %chx[100 22] 662 // ********* 22
set %chy[100 22] 1076
set %ltx[100 22] 664
set %lty[100 22] 1077
set %lst[100 22] 3283
set %chx[100 23] 662 // ********* 23
set %chy[100 23] 1083
set %ltx[100 23] 664
set %lty[100 23] 1080
set %lst[100 23] 3283
set %chx[100 24] 662 // ********* 24
set %chy[100 24] 1083
set %ltx[100 24] 664
set %lty[100 24] 1083
set %lst[100 24] 3280
set %chx[100 25] 662 // ********* 25
set %chy[100 25] 1092
set %ltx[100 25] 664
set %lty[100 25] 1089
set %lst[100 25] 3286
set %chx[100 26] 662 // ********* 26
set %chy[100 26] 1092
set %ltx[100 26] 664
set %lty[100 26] 1089
set %lst[100 26] 3286
set %chx[100 27] 662 // ********* 27
set %chy[100 27] 1092
set %ltx[100 27] 664
set %lty[100 27] 1092
set %lst[100 27] 3302
set %chx[100 28] 662 // ********* 28
set %chy[100 28] 1092
set %ltx[100 28] 664
set %lty[100 28] 1095
set %lst[100 28] 3286
set %chx[100 29] 662 // ********* 29
set %chy[100 29] 1101
set %ltx[100 29] 660
set %lty[100 29] 1098
set %lst[100 29] 3302
set %chx[100 30] 662 // ********* 30
set %chy[100 30] 1101
set %ltx[100 30] 660
set %lty[100 30] 1101
set %lst[100 30] 3302
set %chx[100 31] 662 // ********* 31
set %chy[100 31] 1101
set %ltx[100 31] 660
set %lty[100 31] 1101
set %lst[100 31] 3302
set %chx[100 32] 662 // ********* 32
set %chy[100 32] 1107
set %ltx[100 32] 660
set %lty[100 32] 1104
set %lst[100 32] 3296
set %chx[100 33] 662 // ********* 33
set %chy[100 33] 1107
set %ltx[100 33] 664
set %lty[100 33] 1107
set %lst[100 33] 3277
set %chx[100 34] 662 // ********* 34
set %chy[100 34] 1110
set %ltx[100 34] 660
set %lty[100 34] 1107
set %lst[100 34] 3289
set %chx[100 35] 662 // ********* 35
set %chy[100 35] 1111
set %ltx[100 35] 664
set %lty[100 35] 1110
set %lst[100 35] 3296
set %chx[100 36] 658 // ********* 36
set %chy[100 36] 1111
set %ltx[100 36] 660
set %lty[100 36] 1110
set %lst[100 36] 3277
set %chx[100 37] 658 // ********* 37
set %chy[100 37] 1116
set %ltx[100 37] 660
set %lty[100 37] 1113
set %lst[100 37] 3286
set %chx[100 38] 658 // ********* 38
set %chy[100 38] 1116
set %ltx[100 38] 656
set %lty[100 38] 1116
set %lst[100 38] 3291
set %chx[100 39] 658 // ********* 39
set %chy[100 39] 1116
set %ltx[100 39] 656
set %lty[100 39] 1119
set %lst[100 39] 3299
set %chx[100 40] 670 // ********* 40
set %chy[100 40] 1116
set %ltx[100 40] 672
set %lty[100 40] 1119
set %lst[100 40] 3277
set %chx[100 41] 670 // ********* 41
set %chy[100 41] 1116
set %ltx[100 41] 672
set %lty[100 41] 1116
set %lst[100 41] 3302
set %chx[100 42] 670 // ********* 42
set %chy[100 42] 1116
set %ltx[100 42] 672
set %lty[100 42] 1113
set %lst[100 42] 3302
set %chx[100 43] 670 // ********* 43
set %chy[100 43] 1116
set %ltx[100 43] 668
set %lty[100 43] 1113
set %lst[100 43] 3280
set %chx[100 44] 670 // ********* 44
set %chy[100 44] 1104
set %ltx[100 44] 672
set %lty[100 44] 1107
set %lst[100 44] 3277
set %chx[100 45] 670 // ********* 45

Elric
17.12.2005, 15:32
продолжение
set %chy[100 45] 1104
set %ltx[100 45] 672
set %lty[100 45] 1104
set %lst[100 45] 3302
set %chx[100 46] 670 // ********* 46
set %chy[100 46] 1104
set %ltx[100 46] 672
set %lty[100 46] 1101
set %lst[100 46] 3277
set %chx[100 47] 670 // ********* 47
set %chy[100 47] 1098
set %ltx[100 47] 668
set %lty[100 47] 1101
set %lst[100 47] 3277
set %chx[100 48] 670 // ********* 48
set %chy[100 48] 1098
set %ltx[100 48] 668
set %lty[100 48] 1098
set %lst[100 48] 3299
set %chx[100 49] 670 // ********* 49
set %chy[100 49] 1098
set %ltx[100 49] 668
set %lty[100 49] 1095
set %lst[100 49] 3294
set %chx[100 50] 670 // ********* 50
set %chy[100 50] 1092
set %ltx[100 50] 672
set %lty[100 50] 1095
set %lst[100 50] 3286
set %chx[100 51] 670 // ********* 51
set %chy[100 51] 1092
set %ltx[100 51] 668
set %lty[100 51] 1092
set %lst[100 51] 3302
set %chx[100 52] 670 // ********* 52
set %chy[100 52] 1092
set %ltx[100 52] 672
set %lty[100 52] 1092
set %lst[100 52] 3294
set %chx[100 53] 670 // ********* 53
set %chy[100 53] 1092
set %ltx[100 53] 672
set %lty[100 53] 1092
set %lst[100 53] 3294
set %chx[100 54] 670 // ********* 54
set %chy[100 54] 1092
set %ltx[100 54] 672
set %lty[100 54] 1089
set %lst[100 54] 3294
set %chx[100 55] 670 // ********* 55
set %chy[100 55] 1083
set %ltx[100 55] 672
set %lty[100 55] 1086
set %lst[100 55] 3296
set %chx[100 56] 670 // ********* 56
set %chy[100 56] 1083
set %ltx[100 56] 672
set %lty[100 56] 1083
set %lst[100 56] 3299
set %chx[100 57] 670 // ********* 57
set %chy[100 57] 1083
set %ltx[100 57] 668
set %lty[100 57] 1083
set %lst[100 57] 3296
set %chx[100 58] 670 // ********* 58
set %chy[100 58] 1075
set %ltx[100 58] 672
set %lty[100 58] 1074
set %lst[100 58] 3291
set %chx[100 59] 670 // ********* 59
set %chy[100 59] 1075
set %ltx[100 59] 668
set %lty[100 59] 1077
set %lst[100 59] 3289
set %chx[100 60] 670 // ********* 60
set %chy[100 60] 1068
set %ltx[100 60] 672
set %lty[100 60] 1068
set %lst[100 60] 3296
set %chx[100 61] 670 // ********* 61
set %chy[100 61] 1068
set %ltx[100 61] 668
set %lty[100 61] 1068
set %lst[100 61] 3296
set %chx[100 62] 670 // ********* 62
set %chy[100 62] 1065
set %ltx[100 62] 672
set %lty[100 62] 1065
set %lst[100 62] 3296
set %chx[100 63] 669 // ********* 63
set %chy[100 63] 1065
set %ltx[100 63] 668
set %lty[100 63] 1065
set %lst[100 63] 3280
set %chx[100 64] 669 // ********* 64
set %chy[100 64] 1059
set %ltx[100 64] 668
set %lty[100 64] 1059
set %lst[100 64] 3299
set %chx[100 65] 670 // ********* 65
set %chy[100 65] 1059
set %ltx[100 65] 672
set %lty[100 65] 1056
set %lst[100 65] 3280
set %chx[100 66] 670 // ********* 66
set %chy[100 66] 1053
set %ltx[100 66] 668
set %lty[100 66] 1056
set %lst[100 66] 3283
set %chx[100 67] 670 // ********* 67
set %chy[100 67] 1053
set %ltx[100 67] 672
set %lty[100 67] 1050
set %lst[100 67] 3302
set %chx[100 68] 670 // ********* 68
set %chy[100 68] 1053
set %ltx[100 68] 668
set %lty[100 68] 1053
set %lst[100 68] 3302
set %chx[100 69] 670 // ********* 69
set %chy[100 69] 1053
set %ltx[100 69] 668
set %lty[100 69] 1050
set %lst[100 69] 3291
set %chx[100 70] 670 // ********* 70
set %chy[100 70] 1045
set %ltx[100 70] 672
set %lty[100 70] 1047
set %lst[100 70] 3280
set %chx[100 71] 671 // ********* 71
set %chy[100 71] 1045
set %ltx[100 71] 672
set %lty[100 71] 1044
set %lst[100 71] 3296
set %chx[100 72] 671 // ********* 72
set %chy[100 72] 1041
set %ltx[100 72] 672
set %lty[100 72] 1041
set %lst[100 72] 3286
set %chx[100 73] 671 // ********* 73
set %chy[100 73] 1035
set %ltx[100 73] 668
set %lty[100 73] 1035
set %lst[100 73] 3299
set %chx[100 74] 669 // ********* 74
set %chy[100 74] 1035
set %ltx[100 74] 668
set %lty[100 74] 1032
set %lst[100 74] 3277
set %chx[100 75] 669 // ********* 75

Elric
17.12.2005, 15:33
продолжение
set %chy[100 75] 1026
set %ltx[100 75] 668
set %lty[100 75] 1029
set %lst[100 75] 3302
set %chx[100 76] 669 // ********* 76
set %chy[100 76] 1026
set %ltx[100 76] 672
set %lty[100 76] 1026
set %lst[100 76] 3299
set %chx[100 77] 669 // ********* 77
set %chy[100 77] 1025
set %ltx[100 77] 668
set %lty[100 77] 1026
set %lst[100 77] 3294
set %chx[100 78] 662 // ********* 78
set %chy[100 78] 1025
set %ltx[100 78] 660
set %lty[100 78] 1023
set %lst[100 78] 3299
set %chx[100 79] 0 // ********* 79
set %chy[100 79] 0
set %ltx[100 79] 0
set %lty[100 79] 0
set %lst[100 79] 0
set lasttargetid #les1
return
:2
set %chx[100 1] 539 // ********* 1
set %chy[100 1] 1260
set %ltx[100 1] 540
set %lty[100 1] 1260
set %lst[100 1] 3286
set %chx[100 2] 539 // ********* 2
set %chy[100 2] 1257
set %ltx[100 2] 540
set %lty[100 2] 1257
set %lst[100 2] 3296
set %chx[100 3] 539 // ********* 3
set %chy[100 3] 1257
set %ltx[100 3] 536
set %lty[100 3] 1257
set %lst[100 3] 3294
set %chx[100 4] 539 // ********* 4
set %chy[100 4] 1254
set %ltx[100 4] 536
set %lty[100 4] 1254
set %lst[100 4] 3291
set %chx[100 5] 539 // ********* 5
set %chy[100 5] 1253
set %ltx[100 5] 540
set %lty[100 5] 1254
set %lst[100 5] 3289
set %chx[100 6] 539 // ********* 6
set %chy[100 6] 1251
set %ltx[100 6] 540
set %lty[100 6] 1251
set %lst[100 6] 3299
set %chx[100 7] 539 // ********* 7
set %chy[100 7] 1251
set %ltx[100 7] 536
set %lty[100 7] 1251
set %lst[100 7] 3277
set %chx[100 8] 539 // ********* 8
set %chy[100 8] 1248
set %ltx[100 8] 540
set %lty[100 8] 1248
set %lst[100 8] 3286
set %chx[100 9] 539 // ********* 9
set %chy[100 9] 1245
set %ltx[100 9] 540
set %lty[100 9] 1245
set %lst[100 9] 3286
set %chx[100 10] 539 // ********* 10
set %chy[100 10] 1242
set %ltx[100 10] 540
set %lty[100 10] 1242
set %lst[100 10] 3277
set %chx[100 11] 537 // ********* 11
set %chy[100 11] 1242
set %ltx[100 11] 536
set %lty[100 11] 1242
set %lst[100 11] 3280
set %chx[100 12] 537 // ********* 12
set %chy[100 12] 1239
set %ltx[100 12] 536
set %lty[100 12] 1239
set %lst[100 12] 3286
set %chx[100 13] 537 // ********* 13
set %chy[100 13] 1236
set %ltx[100 13] 536
set %lty[100 13] 1236
set %lst[100 13] 3286
set %chx[100 14] 537 // ********* 14
set %chy[100 14] 1236
set %ltx[100 14] 540
set %lty[100 14] 1236
set %lst[100 14] 3294
set %chx[100 15] 537 // ********* 15

Elric
17.12.2005, 15:34
продолжение
set %chy[100 15] 1233
set %ltx[100 15] 536
set %lty[100 15] 1233
set %lst[100 15] 3277
set %chx[100 16] 538 // ********* 16
set %chy[100 16] 1233
set %ltx[100 16] 540
set %lty[100 16] 1233
set %lst[100 16] 3291
set %chx[100 17] 538 // ********* 17
set %chy[100 17] 1231
set %ltx[100 17] 540
set %lty[100 17] 1230
set %lst[100 17] 3302
set %chx[100 18] 534 // ********* 18
set %chy[100 18] 1231
set %ltx[100 18] 532
set %lty[100 18] 1230
set %lst[100 18] 3283
set %chx[100 19] 534 // ********* 19
set %chy[100 19] 1225
set %ltx[100 19] 536
set %lty[100 19] 1227
set %lst[100 19] 3299
set %chx[100 20] 534 // ********* 20
set %chy[100 20] 1225
set %ltx[100 20] 536
set %lty[100 20] 1224
set %lst[100 20] 3277
set %chx[100 21] 534 // ********* 21
set %chy[100 21] 1223
set %ltx[100 21] 536
set %lty[100 21] 1221
set %lst[100 21] 3277
set %chx[100 22] 534 // ********* 22
set %chy[100 22] 1219
set %ltx[100 22] 532
set %lty[100 22] 1221
set %lst[100 22] 3302
set %chx[100 23] 534 // ********* 23
set %chy[100 23] 1219
set %ltx[100 23] 532
set %lty[100 23] 1218
set %lst[100 23] 3286
set %chx[100 24] 534 // ********* 24
set %chy[100 24] 1216
set %ltx[100 24] 536
set %lty[100 24] 1215
set %lst[100 24] 3286
set %chx[100 25] 534 // ********* 25
set %chy[100 25] 1211
set %ltx[100 25] 536
set %lty[100 25] 1212
set %lst[100 25] 3286
set %chx[100 26] 534 // ********* 26
set %chy[100 26] 1211
set %ltx[100 26] 536
set %lty[100 26] 1209
set %lst[100 26] 3294
set %chx[100 27] 534 // ********* 27
set %chy[100 27] 1211
set %ltx[100 27] 532
set %lty[100 27] 1209
set %lst[100 27] 3291
set %chx[100 28] 534 // ********* 28
set %chy[100 28] 1201
set %ltx[100 28] 532
set %lty[100 28] 1203
set %lst[100 28] 3286
set %chx[100 29] 534 // ********* 29
set %chy[100 29] 1201
set %ltx[100 29] 536
set %lty[100 29] 1203
set %lst[100 29] 3286
set %chx[100 30] 534 // ********* 30
set %chy[100 30] 1201
set %ltx[100 30] 536
set %lty[100 30] 1200
set %lst[100 30] 3294
set %chx[100 31] 534 // ********* 31
set %chy[100 31] 1201
set %ltx[100 31] 532
set %lty[100 31] 1200
set %lst[100 31] 3291
set %chx[100 32] 534 // ********* 32
set %chy[100 32] 1195
set %ltx[100 32] 532
set %lty[100 32] 1197
set %lst[100 32] 3294
set %chx[100 33] 534 // ********* 33
set %chy[100 33] 1195
set %ltx[100 33] 536
set %lty[100 33] 1197
set %lst[100 33] 3280
set %chx[100 34] 530 // ********* 34
set %chy[100 34] 1195
set %ltx[100 34] 528
set %lty[100 34] 1194
set %lst[100 34] 3296
set %chx[100 35] 530 // ********* 35
set %chy[100 35] 1195
set %ltx[100 35] 528
set %lty[100 35] 1197
set %lst[100 35] 3280
set %chx[100 36] 530 // ********* 36
set %chy[100 36] 1201
set %ltx[100 36] 528
set %lty[100 36] 1200
set %lst[100 36] 3286
set %chx[100 37] 530 // ********* 37
set %chy[100 37] 1201
set %ltx[100 37] 528
set %lty[100 37] 1203
set %lst[100 37] 3302
set %chx[100 38] 530 // ********* 38
set %chy[100 38] 1208
set %ltx[100 38] 528
set %lty[100 38] 1206
set %lst[100 38] 3280
set %chx[100 39] 530 // ********* 39
set %chy[100 39] 1208
set %ltx[100 39] 532
set %lty[100 39] 1209
set %lst[100 39] 3291
set %chx[100 40] 530 // ********* 40
set %chy[100 40] 1210
set %ltx[100 40] 528
set %lty[100 40] 1212
set %lst[100 40] 3286
set %chx[100 41] 533 // ********* 41
set %chy[100 41] 1210
set %ltx[100 41] 536
set %lty[100 41] 1212
set %lst[100 41] 3286
set %chx[100 42] 533 // ********* 42
set %chy[100 42] 1219
set %ltx[100 42] 532
set %lty[100 42] 1218
set %lst[100 42] 3286
set %chx[100 43] 527 // ********* 43
set %chy[100 43] 1219
set %ltx[100 43] 528
set %lty[100 43] 1221
set %lst[100 43] 3283
set %chx[100 44] 518 // ********* 44
set %chy[100 44] 1219
set %ltx[100 44] 516
set %lty[100 44] 1221
set %lst[100 44] 3296
set %chx[100 45] 518 // ********* 45

Elric
17.12.2005, 15:34
продолжение
set %chy[100 45] 1214
set %ltx[100 45] 520
set %lty[100 45] 1215
set %lst[100 45] 3283
set %chx[100 46] 518 // ********* 46
set %chy[100 46] 1214
set %ltx[100 46] 516
set %lty[100 46] 1215
set %lst[100 46] 3294
set %chx[100 47] 518 // ********* 47
set %chy[100 47] 1208
set %ltx[100 47] 516
set %lty[100 47] 1209
set %lst[100 47] 3277
set %chx[100 48] 518 // ********* 48
set %chy[100 48] 1208
set %ltx[100 48] 520
set %lty[100 48] 1209
set %lst[100 48] 3302
set %chx[100 49] 518 // ********* 49
set %chy[100 49] 1205
set %ltx[100 49] 516
set %lty[100 49] 1203
set %lst[100 49] 3289
set %chx[100 50] 512 // ********* 50
set %chy[100 50] 1205
set %ltx[100 50] 512
set %lty[100 50] 1203
set %lst[100 50] 3299
set %chx[100 51] 512 // ********* 51
set %chy[100 51] 1205
set %ltx[100 51] 512
set %lty[100 51] 1206
set %lst[100 51] 3296
set %chx[100 52] 509 // ********* 52
set %chy[100 52] 1205
set %ltx[100 52] 508
set %lty[100 52] 1206
set %lst[100 52] 3294
set %chx[100 53] 506 // ********* 53
set %chy[100 53] 1205
set %ltx[100 53] 504
set %lty[100 53] 1206
set %lst[100 53] 3291
set %chx[100 54] 506 // ********* 54
set %chy[100 54] 1205
set %ltx[100 54] 504
set %lty[100 54] 1203
set %lst[100 54] 3283
set %chx[100 55] 506 // ********* 55
set %chy[100 55] 1199
set %ltx[100 55] 508
set %lty[100 55] 1200
set %lst[100 55] 3299
set %chx[100 56] 507 // ********* 56
set %chy[100 56] 1199
set %ltx[100 56] 508
set %lty[100 56] 1197
set %lst[100 56] 3291
set %chx[100 57] 507 // ********* 57
set %chy[100 57] 1189
set %ltx[100 57] 508
set %lty[100 57] 1188
set %lst[100 57] 3291
set %chx[100 58] 511 // ********* 58
set %chy[100 58] 1189
set %ltx[100 58] 512
set %lty[100 58] 1188
set %lst[100 58] 3296
set %chx[100 59] 511 // ********* 59
set %chy[100 59] 1189
set %ltx[100 59] 512
set %lty[100 59] 1191
set %lst[100 59] 3289
set %chx[100 60] 511 // ********* 60
set %chy[100 60] 1183
set %ltx[100 60] 512
set %lty[100 60] 1185
set %lst[100 60] 3286
set %chx[100 61] 511 // ********* 61
set %chy[100 61] 1177
set %ltx[100 61] 512
set %lty[100 61] 1176
set %lst[100 61] 3296
set %chx[100 62] 511 // ********* 62
set %chy[100 62] 1177
set %ltx[100 62] 512
set %lty[100 62] 1179
set %lst[100 62] 3286
set %chx[100 63] 514 // ********* 63
set %chy[100 63] 1177
set %ltx[100 63] 516
set %lty[100 63] 1179
set %lst[100 63] 3280
set %chx[100 64] 514 // ********* 64
set %chy[100 64] 1177
set %ltx[100 64] 516
set %lty[100 64] 1176
set %lst[100 64] 3294
set %chx[100 65] 514 // ********* 65
set %chy[100 65] 1183
set %ltx[100 65] 516
set %lty[100 65] 1182
set %lst[100 65] 3299
set %chx[100 66] 514 // ********* 66
set %chy[100 66] 1183
set %ltx[100 66] 516
set %lty[100 66] 1185
set %lst[100 66] 3286
set %chx[100 67] 521 // ********* 67
set %chy[100 67] 1183
set %ltx[100 67] 520
set %lty[100 67] 1182
set %lst[100 67] 3280
set %chx[100 68] 521 // ********* 68
set %chy[100 68] 1183
set %ltx[100 68] 524
set %lty[100 68] 1182
set %lst[100 68] 3286
set %chx[100 69] 521 // ********* 69
set %chy[100 69] 1183
set %ltx[100 69] 524
set %lty[100 69] 1185
set %lst[100 69] 3286
set %chx[100 70] 521 // ********* 70
set %chy[100 70] 1188
set %ltx[100 70] 520
set %lty[100 70] 1188
set %lst[100 70] 3283
set %chx[100 71] 521 // ********* 71
set %chy[100 71] 1188
set %ltx[100 71] 524
set %lty[100 71] 1188
set %lst[100 71] 3280
set %chx[100 72] 521 // ********* 72
set %chy[100 72] 1194
set %ltx[100 72] 520
set %lty[100 72] 1194
set %lst[100 72] 3296
set %chx[100 73] 521 // ********* 73
set %chy[100 73] 1195
set %ltx[100 73] 524
set %lty[100 73] 1194
set %lst[100 73] 3294
set %chx[100 74] 521 // ********* 74
set %chy[100 74] 1198
set %ltx[100 74] 520
set %lty[100 74] 1197
set %lst[100 74] 3299
set %chx[100 75] 521 // ********* 75

Elric
17.12.2005, 15:35
продолжение
set %chy[100 75] 1198
set %ltx[100 75] 520
set %lty[100 75] 1200
set %lst[100 75] 3302
set %chx[100 76] 525 // ********* 76
set %chy[100 76] 1198
set %ltx[100 76] 524
set %lty[100 76] 1200
set %lst[100 76] 3294
set %chx[100 77] 525 // ********* 77
set %chy[100 77] 1198
set %ltx[100 77] 528
set %lty[100 77] 1197
set %lst[100 77] 3280
set %chx[100 78] 525 // ********* 78
set %chy[100 78] 1198
set %ltx[100 78] 528
set %lty[100 78] 1200
set %lst[100 78] 3286
set %chx[100 79] 525 // ********* 79
set %chy[100 79] 1204
set %ltx[100 79] 528
set %lty[100 79] 1203
set %lst[100 79] 3302
set %chx[100 80] 525 // ********* 80
set %chy[100 80] 1208
set %ltx[100 80] 524
set %lty[100 80] 1206
set %lst[100 80] 3280
set %chx[100 81] 525 // ********* 81
set %chy[100 81] 1208
set %ltx[100 81] 524
set %lty[100 81] 1209
set %lst[100 81] 3277
set %chx[100 82] 525 // ********* 82
set %chy[100 82] 1208
set %ltx[100 82] 528
set %lty[100 82] 1206
set %lst[100 82] 3280
set %chx[100 83] 525 // ********* 83
set %chy[100 83] 1212
set %ltx[100 83] 524
set %lty[100 83] 1212
set %lst[100 83] 3299
set %chx[100 84] 527 // ********* 84
set %chy[100 84] 1212
set %ltx[100 84] 528
set %lty[100 84] 1212
set %lst[100 84] 3286
set %chx[100 85] 527 // ********* 85
set %chy[100 85] 1221
set %ltx[100 85] 528
set %lty[100 85] 1221
set %lst[100 85] 3283
set %chx[100 86] 527 // ********* 86
set %chy[100 86] 1224
set %ltx[100 86] 528
set %lty[100 86] 1224
set %lst[100 86] 3302
set %chx[100 87] 527 // ********* 87
set %chy[100 87] 1228
set %ltx[100 87] 528
set %lty[100 87] 1227
set %lst[100 87] 3291
set %chx[100 88] 527 // ********* 88
set %chy[100 88] 1228
set %ltx[100 88] 528
set %lty[100 88] 1230
set %lst[100 88] 3296
set %chx[100 89] 527 // ********* 89
set %chy[100 89] 1230
set %ltx[100 89] 528
set %lty[100 89] 1230
set %lst[100 89] 3296
set %chx[100 90] 525 // ********* 90
set %chy[100 90] 1230
set %ltx[100 90] 524
set %lty[100 90] 1230
set %lst[100 90] 3296
set %chx[100 91] 525 // ********* 91
set %chy[100 91] 1235
set %ltx[100 91] 524
set %lty[100 91] 1233
set %lst[100 91] 3280
set %chx[100 92] 525 // ********* 92
set %chy[100 92] 1241
set %ltx[100 92] 524
set %lty[100 92] 1239
set %lst[100 92] 3291
set %chx[100 93] 525 // ********* 93
set %chy[100 93] 1241
set %ltx[100 93] 528
set %lty[100 93] 1242
set %lst[100 93] 3286
set %chx[100 94] 518 // ********* 94
set %chy[100 94] 1241
set %ltx[100 94] 520
set %lty[100 94] 1239
set %lst[100 94] 3299
set %chx[100 95] 518 // ********* 95
set %chy[100 95] 1241
set %ltx[100 95] 516
set %lty[100 95] 1239
set %lst[100 95] 3299
set %chx[100 96] 512 // ********* 96
set %chy[100 96] 1241
set %ltx[100 96] 512
set %lty[100 96] 1239
set %lst[100 96] 3294
set %chx[100 97] 512 // ********* 97
set %chy[100 97] 1247
set %ltx[100 97] 512
set %lty[100 97] 1248
set %lst[100 97] 3283
set %chx[100 98] 514 // ********* 98
set %chy[100 98] 1247
set %ltx[100 98] 516
set %lty[100 98] 1248
set %lst[100 98] 3277
set %chx[100 99] 514 // ********* 99
set %chy[100 99] 1251
set %ltx[100 99] 512
set %lty[100 99] 1251
set %lst[100 99] 3302
set %chx[100 100] 0 // ********* 100
set %chy[100 100] 0
set %ltx[100 100] 0
set %lty[100 100] 0
set %lst[100 100] 0
set lasttargetid #les2
return

Elric
17.12.2005, 15:35
и последний штрих :)
set #r 1
for #i 1 101
set %chx [101 #i] 0
end_for
set #ii 1

while 1 = 1
set target 0
set lastobjectid 1074106325 // топор
set lastobjecttype 3907 //топор
send f11
wait 1000 // lastobject
set #u %chx [101 #ii]
while 1 = 1
send tab
if (lastmsg Try chopping) or (lastmsg can't) or (lastmsg Lumberjacking) or (lastmsg far away to chop.)
break
end_if
if (lastmsg put the logs in your pack.) or (lastmsg but fail to produce any useable wood.) or (lastmsg There are no logs here to chop.)
set %chx [101 #ii] charposx
set %chy [101 #ii] charposy
set %ltx [101 #ii] lasttargetx
set %lty [101 #ii] lasttargety
set %lst [101 #ii] laststatictype
say #ii
set #p %chx [101 #ii]
if #u = #p
set %next [#ii] 0
else
set %next [#ii] #ii
end_if
set #ii #ii + 1
break
end_if
end_while
if #ii > 100
break
end_if
end_while

msg #ii записей, писать в файл?

set $file c:\massiv.txt
set $slash /
for #f 1 100
set #ccc %chx[101 #f]
if #ccc = 0
break
end_if
set $str %chx ( 100 #f ) #ccc
exec cmd.exe /c >>$file echo $str $slash$slash ********* #f
wait 100
set #ccc %chy[101 #f]
set $str %chy ( 100 #f ) #ccc
exec cmd.exe /c >>$file echo $str
wait 100
set #ccc %ltx[101 #f]
set $str %ltx ( 100 #f ) #ccc
exec cmd.exe /c >>$file echo $str
wait 100
set #ccc %lty[101 #f]
set $str %lty ( 100 #f ) #ccc
exec cmd.exe /c >>$file echo $str
wait 100
set #ccc %lst[101 #f]
set $str %lst ( 100 #f ) #ccc
exec cmd.exe /c >>$file echo $str
wait 100
end_for
msg ЗАПИСАЛ!!!
end_script

Elric
17.12.2005, 15:36
да. это для пилота ;)

XAOC
17.12.2005, 15:58
Скоко постов то набил?))))))))
По теме, этот скрипт сделан через массив, там вроде еще скрипттик для создания массива должен быть

Elric
17.12.2005, 16:36
в середине. там сеты все стоят

XAOC
17.12.2005, 16:41
я тебе про что и говорю это и есть массив, токо мне интересно как чел скачавший твой скрипт узнает где эти деревья из массива находятся? по иду руны твоей? имхо к таким скриптам выкладывают скрипт на разметку массива самому


типа такого

set $fil c:\massiv.txt

set #i 1
set $fail you fail
set $put you put
set $Hack you hack
set $skill your skill
set $no There are
set $slash /
:snova
if (lastmsg = $fail) or (lastmsg = $put) or (lastmsg = $Hack) or (lastmsg = $skill) or (lastmsg = $no)
set #cx charposx
set #cy charposy
set #ltx lasttargetx
set #lty lasttargety
set #ltt laststatictype
exec cmd.exe /c >>$fil echo $slash$slash tree number #i
wait 100
exec cmd.exe /c >>$fil echo set %stand( #i 1 ) #cx
wait 100
exec cmd.exe /c >>$fil echo set %stand( #i 2 ) #cy
wait 100
exec cmd.exe /c >>$fil echo set %derevo( #i 1 ) #ltx
wait 100
exec cmd.exe /c >>$fil echo set %derevo( #i 2 ) #lty
wait 100
exec cmd.exe /c >>$fil echo set %static( #i ) #ltt
wait 100
set #i #i + 1
say Go to next tree - #i
end_if
wait 1000
Goto snova
end_script

Elric
17.12.2005, 17:22
я же говорю, что не тестил и не смотрел. взял его с форума какого-то. все руки не доходят -) для этого скрипта вроде нужно было сначала намакрить руны к своим деревьям

NeeDle
17.12.2005, 17:41
uuuuuuuuuuuh :D maniaki :D

VERTIK
17.12.2005, 18:29
судя по скрипту это ламбер ходилка.... тоесть в масив занесено расположение деревьев в мире и чар вырубая поочередно одно дерево за другим в хайде перемещаеться по миру....

Так что все что после метки
:1
надо перезабивать массив под своё место добычи древесины .... вообщем макрос грамоздкий и без пояснительных записей разобраться в нем трудновато
[Только зарегистрированные пользователи могут видеть ссылки.]
только не работает под версией пилота 2.05