|
[itemdef i_duvarat]
id = i_box_wood
name = duvar at
on=@dClick
targetg Hedef?
return 1
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
[DEFNAME YONLER]
yon.1 s
yon.2 e
yon.3 n
yon.4 w
yon.5 se
yon.6 ne
yon.7 sw
yon.8 nw
for 1 8
serv.newitem i_wall_stone_7
new.p <targp>
new.move <def.yon.<dlocal._for>> <dlocal._for>
endforAkşam pazar aklıma ilk gelen yöntem.
RasmuS :Öncelikle dönüş için teşekkür ederim. Dediğin şekilde yaptığımda duvarları bu şekilde atabildim.Akşam pazar aklıma ilk gelen yöntem.[DEFNAME YONLER]
yon.1 s
yon.2 e
yon.3 n
yon.4 w
yon.5 se
yon.6 ne
yon.7 sw
yon.8 nw
for 1 8
serv.newitem i_wall_stone_7
new.p <targp>
new.move <def.yon.<dlocal._for>> <dlocal._for>
endfor
new.move <def.yon.<dlocal._for>> <dlocal._for> kısmında yazmış olduğun yon kısmını ' yonler ' yaptığımda bu sefer tek çizgi üzerinde gitti ancak yine istediğim yöne atamıyorum hep aynı yöne atıyor maalesef.[itemdef i_duvarat]
id = i_box_wood
name = duvar at
on=@dClick
targetg Hedef?
return 1
on=@TargOn_Ground
serv.NewItem = i_wall_stone_7
new.P = <src.targp>
return 1
B3LyRsy2 :Cevap için teşekkürler, o şekilde de denemiştim. Duvarı daha düzgün atıyor ancak tek bir yönde gidiyor. Aşağıdaki görselde görüleceği gibi, klasik renkte duvar yönünde atılmıyor hiçbir şekilde. Yalnızca 455 rengindeki duvar yönünde atabiliyorum.
araya for girince karakter kendi üzerinden farklı 8kare
görüyor sanırım resimde.
yon.1
yon.2
bunları yonler yaptıktan sonra
burda new.move <def.yonler.<dlocal._for>> <dlocal._for> değişti mi
MirroR :Farkettim teşekkürler
Tekrar dene güncelledim yanlış yazmışım
Bu şekilde denedim, duvarı atabildim fakat yalnızca bir adet duvar atılıyor. Birkaç tane yan yana atabilmesi için ne yapabiliriz?
on=@TargOn_Ground
FOR 1 6
serv.NewItem = 080
new.P = <EVAL <SRC.TARGP.X>+<dLOCAL._FOR>>,<SRC.TARGP.Y>
new.Type = t_Xx
new.Timer = 1
ENDFOR
return 1
[typedef t_Xx]
on=@Timer
remove
return 1anlaşılan sen bunu büyü gibi kullanmak istiyorsun wait.
|
|
| 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ü: 2983
|
Script Yardımı | 02-05 22:33 | 5 | 2983 | |
|
|
Üzerinde item varken ingot seçme
Son cevap: 24-01 23:01 · Son yazan: astor · Mesaj: 7 · Görüntü: 3434
|
ITEM Script Yardımı | 24-01 23:01 | 7 | 3434 | |
|
|
Verdoarlarda item arama
Son cevap: 04-08 22:33 · Son yazan: 4s3d3 · Mesaj: 4 · Görüntü: 2266
|
DIALOG Script Yardımı | 04-08 22:33 | 4 | 2266 | |
|
|
İtem isimleri vs. sorunu
Son cevap: 10-04 01:41 · Son yazan: Athynas · Mesaj: 2 · Görüntü: 1871
|
ITEM Script Yardımı | 10-04 01:41 | 2 | 1871 | |
|
|
Yere item atmamak
Son cevap: 19-02 14:02 · Son yazan: 4s3d3 · Mesaj: 9 · Görüntü: 3220
|
Script Yardımı | 19-02 14:02 | 9 | 3220 |