|
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
MirroR :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.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
|
|
| Konu | Kategori | Son cevap | Son yazan | Mesaj | Görüntüleme | |
|---|---|---|---|---|---|---|
|
|
Çanta içindeki çantaya item aktarma
Son cevap: 02-05 22:33 · Son yazan: Karaoglan · Mesaj: 5 · Görüntü: 3095
|
Script Yardımı | 02-05 22:33 | Karaoglan |
5 | 3095 |
|
|
Üzerinde item varken ingot seçme
Son cevap: 24-01 23:01 · Son yazan: astor · Mesaj: 7 · Görüntü: 3543
|
ITEM Script Yardımı | 24-01 23:01 | astor |
7 | 3543 |
|
|
Verdoarlarda item arama
Son cevap: 04-08 22:33 · Son yazan: 4s3d3 · Mesaj: 4 · Görüntü: 2339
|
DIALOG Script Yardımı | 04-08 22:33 |  4s3d3 |
4 | 2339 |
|
|
İtem isimleri vs. sorunu
Son cevap: 10-04 01:41 · Son yazan: Athynas · Mesaj: 2 · Görüntü: 1911
|
ITEM Script Yardımı | 10-04 01:41 |  Athynas |
2 | 1911 |
|
Yere item atmamak
Son cevap: 19-02 14:02 · Son yazan: 4s3d3 · Mesaj: 9 · Görüntü: 3318
|
Script Yardımı | 19-02 14:02 | 4s3d3 |
9 | 3318 |