Просмотр полной версии : Помогите! Очень нужен скрипт на тэйлоринг. (уох или пилот)
DobermanN aka Sneaky
21.03.2007, 15:11
Если вас не затруднит и у вас есть этот скрипт, отзовитесь пажалуйсто в этом топике, или кинте мне ссылочку где его можно найти. Заранее благодарю.
Windows Xp
21.03.2007, 15:16
set #checklag 1 // включаем/выключаем проверку лагов.
set #lags 0
set #escr 0 // включаем/выключаем остановку скрипта
set #n 10 // количество предметов, через которое хотим делать проверку на лаги. Если #escr = 1, то количество предметов, которое хотим произвести.
:begin
if #checklag = 1
gosub chlg
end_if
gosub settime
:craft
repeat #n
send F2 #wt // LastObject
if lastmsg You can't make
alarm
end_script
end_if
double_left 69, 58
wait #wt
left 268, 68
wait #wt
double_left 233, 64
wait 4000
end_repeat
if #escr = 1
alarm
end_script
else
goto begin
end_if
:settime
if #checklag = 0
:lags0
set #wt 750
gosub swtc
return
end_if
if #lags = 0
goto lags0
end_if
if #lags = 1
set #wt 1000
gosub swtc
return
end_if
if #lags = 2
set #wt 1500
gosub swtc
return
end_if
if #lags = 3
set #wt 2500
gosub swtc
return
end_if
:chlg
set timer
say lags?
while_not lastmsg lags?
if timer > 60000
goto chlg
end_if
if lastmsg error
goto chlg
end_if
end_while
set #tis timer
if #tis < 200
set #lags 0
end_if
if #tis > 300
set #lags 1
end_if
if #tis > 700
set #lags 2
end_if
if #tis > 1500
set #lags 3
end_if
return
:swtc
set #swt #wt * 3
set #ct 4000 - #swt
if #wt > 1500
set #ct 1000
end_if
return
cуда загляни http://www.uoo.ru/phpBB/viewtopic.php?t=179357&029026
DobermanN aka Sneaky
21.03.2007, 16:47
Благодарю судрь за помощь. Да хранит вас вашь мечь, копье, топор и молот. :D
Powered by vBulletin™ Version 4.0.3 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved. Перевод: zCarot