wiki:UoPilot/makr/Mining

Version 1 (modified by Support, 11 years ago) (diff)

--

Скрипт обкапывает вокруг персанажа все тайлы ( 2 на 2 )

for #y -2 2 1
	for #x -2 2 1
		:mining
		set lasttargetx charposx + #x
		set lasttargety charposy + #y
		set lasttargetkind 2
		send F9 1200 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет
		set timer 0
		while (lastmsg do you want) and (timer < 10000)
			wait 100
		end_while
		
		if_not (lastmsg no ore) or (lastmsg mining in) or (lastmsg have no line) or (lastmsg you put)
			wait 500
			if (lastmsg you see) or (lastmsg targeting) or (lastmsg you have)
				// дает сигнал о том что появился гард руды или игрок и остонавливает скрип или антимакрос
				alarm
				flash
				alarm
				flash
				alarm
				flash
				end_script
			end_if
			
			goto mining
		end_if
	end_for
end_for

alarm
flash

end_script