MirroR :
Kod:
on=@TargOn_Ground
IF ( <SRC.DIR> == 0 ) || ( <SRC.DIR> == 4 ) || ( <SRC.DIR> == 5 ) || ( <SRC.DIR> == 7 )
LOCAL._POSITION = <EVAL <SRC.TARGP.X>+4>
LOCAL._STATUS = 1
ELIF ( <SRC.DIR> == 6 ) || ( <SRC.DIR> == 2 ) || ( <SRC.DIR> == 1 ) || ( <SRC.DIR> == 3 )
LOCAL._POSITION = <EVAL <SRC.TARGP.Y>+4>
ENDIF
FOR 1 6
SERV.NEWITEM = 080
IF ( <dLOCAL._FOR> < 1 )
LOCAL._POSITION ++
ELSE
LOCAL._POSITION --
ENDIF
IF ( <dLOCAL._STATUS> == 1 )
NEW.P = <dLOCAL._POSITION>,<SRC.TARGP.Y>
ELSE
NEW.P = <SRC.TARGP.X>,<dLOCAL._POSITION>
ENDIF
NEW.TIMER = 3
ENDFOR
RETURN 1
Destek olan olmaya çalışan herkese çok teşekkürler. Bu şekilde istediğimi elde edebildim. Ayrıca kurcalayıp yeni şeyler öğrenmeme de faydası oldu, başlığı da güncelliyorum belki ileride birileri faydalanabilir. Emeğine sağlık.
