if injournal 'That creature is already in discord'
clearjournal
unsetalias 'todiscord'
else
if not findalias 'todiscord'
sysmsg 'Target an todiscord'
promptalias 'todiscord'
endif
useskill 'Discordance'
waitfortarget 10000
target! 'todiscord'
while not inrange 'todiscord' 2
if @x 'todiscord' > x 'self' and @y 'todiscord' > y 'self'
walk 'Southeast'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' > y 'self'
walk 'Southwest'
elseif @x 'todiscord' > x 'self' and @y 'todiscord' < y 'self'
walk 'Northeast'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' < y 'self'
walk 'Northwest'
elseif @x 'todiscord' > x 'self' and @y 'todiscord' == y 'self'
walk 'East'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' == y 'self'
walk 'West'
elseif @x 'todiscord' == x 'self' and @y 'todiscord' > y 'self'
walk 'South'
elseif @x 'todiscord' == x 'self' and @y 'todiscord' < y 'self'
walk 'North'
endif
endwhile
pause 500
endif
Sorry it took me so long, I fixed the target issue and now it is fully automated:
usetype 0xe9c
pause 3000
if injournal 'That creature is already in discord'
clearjournal
unsetalias 'todiscord'
else
if not findalias 'todiscord'
sysmsg 'Target an todiscord'
//promptalias 'todiscord'
//pause 3000
getenemy 'gray' 'criminal' 'enemy' 'nearest'
pause 2000
autotargetobject! 'enemy'
pause 2000
setalias 'todiscord' 'enemy'
pause 2000
endif
useskill 'Discordance'
waitfortarget 8000
target! 'todiscord'
while not inrange 'todiscord' 2
if @x 'todiscord' > x 'self' and @y 'todiscord' > y 'self'
walk 'Southeast'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' > y 'self'
walk 'Southwest'
elseif @x 'todiscord' > x 'self' and @y 'todiscord' < y 'self'
walk 'Northeast'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' < y 'self'
walk 'Northwest'
elseif @x 'todiscord' > x 'self' and @y 'todiscord' == y 'self'
walk 'East'
elseif @x 'todiscord' < x 'self' and @y 'todiscord' == y 'self'
walk 'West'
elseif @x 'todiscord' == x 'self' and @y 'todiscord' > y 'self'
walk 'South'
elseif @x 'todiscord' == x 'self' and @y 'todiscord' < y 'self'
walk 'North'
endif
endwhile
pause 500
endif