Üye ol    Giriş
  1. Forumlar
  2. Oyunlar
  3. Ultima Online
  4. Kendi Vendorum Dialog hatası

Kendi Vendorum Dialog hatası

kedi777
kedi777
Banned
-1
Ya arkadaşlar Serverde Animal Trainer Vendoru Yoktu vardıda ayı felan satıordu Bende Böle bşy yaptım Bi adam yaptım Bi serverden dialog aldım ama Bi kac bişy deiştim calısmamaya basladı bi göz atarmısınz 


//////////////////%100 Wrighting By YKP /////////////////
///////////////Yeni basladım Adım Yayılsın ismi Deişmeyin////////////////////
//////////////////////Emege Saygı Ltfn////////////////////////////
//////////////////////////   \\\\////   /////////////////////////////
/////////////////////////     @ @    /////////////////////////////
///////////////////////     \____/   ////////////////////////////
////////////////////////////////////////////////////////////////

[Chardef c_animalci]
defname=c_animalci
id=c_man
name @07a1 Omar


on=@create
invul 1
str 100
dex 100
mana 100
int 100
color 0455
itemnewbie=i_hat_floppy
color=0846
itemnewbie=i_apron_half
color=0846
itemnewbie=i_pants_short
color=0455
itemnewbie=i_shirt_fancy
color=0455
itemnewbie=i_shoes_plain
color=0846
itemnewbie=i_staff_taming
color=0

on=@click
message @1153 [ Animal Trainer  ]
endif

on=@Dclick
src.dialog d_animal_satiss
message @70,1,, Evet Efendim Ne Alirdiniz ?
endif


//////////////////////////////////Dialog///////////////////////////////////

[Dialog d_animal_satiss] 
0,0 
NOMOVE 
PAGE 0 
Resizepic 10 5 5054 380 430 
Resizepic 15 10 3000 370 420 
Dtext 130 15 096d Animal Trainer Vendor 
Dtext 60 45 01c6 Esya 
Dtext 230 45 01c6 Fiyat 
Dtext 310 45 01c6 Adet 
Resizepic 60 70 9300 300 3 // Cizgi 
Tilepic 23 80 8486 //phorseh 
Tilepic 23 110 8487 // plamality 
Tilepic 23 158 8481 // bhorse 
Dtext 60 157 0357 Horse 
Dtext 230 157 0357 80000gp
Resizepic 310 155 9300 50 20 
Textentry 312 156 42 25 0 3 3 
Tilepic 20 183 8479 // chorse 
Dtext 60 182 0357 Horse 
Dtext 230 182 0357 80000gp
Resizepic 310 180 9300 50 20 
Textentry 312 181 42 25 0 4 4 
Tilepic 23 205 8484// dhorseson 
Dtext 60 207 0357 Horse 
Dtext 230 207 0357 80000gp
Resizepic 310 205 9300 50 20 
Textentry 312 206 42 25 0 5 5 
Tilepic 23 235 3714// gnar 
Dtext 60 232 0357 Herding Sopasi 
Dtext 230 232 0357 134gp 
Resizepic 310 230 9300 50 20 
Textentry 312 231 42 25 0 6 6 
Tilepic 20 260 3722// taming 
Dtext 60 257 0357 Taming Staff 
Dtext 230 257 0357 196gp 
Resizepic 310 255 9300 50 20 
Textentry 312 256 42 25 0 7 7 
Tilepic 25 285 014f0 // animal 
Dtext 60 282 0357 Animal Deed 
Dtext 230 282 0357 157gp 
Resizepic 310 280 9300 50 20 
Textentry 312 281 42 25 0 8 8 
Tilepic 21 310 4108 // samana 
Dtext 60 307 0357 Saman 
Dtext 230 307 0357 118gp 
Resizepic 310 305 9300 50 20 
Textentry 312 306 42 25 0 9 9 
Tilepic 23 337 4108 // pic 
Dtext 60 332 0357 Saman 
Dtext 230 332 0357 118gp 
Resizepic 310 330 9300 50 20 
Textentry 312 331 42 25 0 10 10 
// Satin AL 
Resizepic 60 362 9300 100 33 
Button 63 365 4030 4031 1 0 23 
Dtext 88 368 08a5 Satin Al 
// Iptal 
Resizepic 170 362 9300 72 33 
Button 173 365 4030 4031 1 0 24 
Dtext 198 368 08a5 Iptal 


// Satin AL 
Resizepic 60 362 9300 100 33 
Button 63 365 4030 4031 1 0 23 
Dtext 88 368 08a5 Satin Al 
// Iptal 
Resizepic 170 362 9300 72 33 
Button 173 365 4030 4031 1 0 24 
Dtext 198 368 08a5 Iptal 

[Dialog d_animal_satiss Text] 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

[Dialog d_animal_satiss Button] 
On=23 // Satin Al 
elseif !(<isnum <ARGTXT[0]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[1]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[2]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[3]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[4]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[5]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[6]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[7]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[8]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
endif 
Local.toplamsatis 0 
If (<eval <argtxt[0]>> > 0) 
Local.ToplamSatis (<eval <argtxt[0]> * 2145>) 
endif 
if (<eval <argtxt[1]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[1]> * 80000>) 
endif 
if (<eval <argtxt[2]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[2]> * 80000>) 
endif 
if (<eval <argtxt[3]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[3]> * 80000>) 
endif 
if (<eval <argtxt[4]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[4]> * 80000>) 
endif 
if (<eval <argtxt[5]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[5]> * 134>) 
endif 
if (<eval <argtxt[6]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[6]> * 134>) 
endif 
if (<eval <argtxt[7]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[7]> * 157>) 
endif 
if (<eval <argtxt[8]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[8]> * 118>) 
endif 
if (<eval <argtxt[9]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[9]> * 118>) 
endif 
If (<local.toplamsatis> == 0) 
Src.Sysmessage @38,,1 Herhangi bir esya satin almamissiniz! 
Return 1 
Elseif (<Src.Totalgold> < <eval <Local.ToplamSatis>>) 
Src.sysmessage @38,,1 Yeterli paraniz yok! 
Return 1 
Endif 
If (<eval <argtxt[0]>> > 5) || (<eval <argtxt[1]>> > 5) || (<eval <argtxt[2]>> > 5) || (<eval <argtxt[3]>> > 5) || (<eval <argtxt[4]>> > 5) || (<eval <argtxt[5]>> > 5) || (<eval <argtxt[6]>> > 5) || (<eval <argtxt[7]>> > 5) || (<eval <argtxt[8]>> > 5) || (<eval <argtxt[9]>> > 5) || (<eval <argtxt[10]>> > 5) 
src.sysmessage @38,,1 En fazla 5 adet alabilirsiniz! 
return 1 
endif 
If (<eval <argtxt[1]>> > 0) 
Src.EsyaVer i_horse_brown_dk,<eval <argtxt[1]>> 
ENDIF 
If (<eval <argtxt[2]>> > 0) 
Src.EsyaVer i_horse_gray,<eval <argtxt[2]>> 
ENDIF 
If (<eval <argtxt[3]>> > 0) 
Src.EsyaVer i_horse_tan,<eval <argtxt[3]>> 
ENDIF 
If (<eval <argtxt[4]>> > 0) 
Src.EsyaVer i_shepherds_Crook,<eval <argtxt[4]>> 
ENDIF 
If (<eval <argtxt[5]>> > 0) 
Src.EsyaVer i_staff_taming,<eval <argtxt[5]>> 
ENDIF 
If (<eval <argtxt[6]>> > 0) 
Src.EsyaVer i_shrink_deed,<eval <argtxt[6]>> 
ENDIF 
If (<eval <argtxt[7]>> > 0) 
Src.EsyaVer i_hay_sheaf,<eval <argtxt[7]>> 
ENDIF 
If (<eval <argtxt[8]>> > 0) 
Src.EsyaVer i_hay_Sheaf,<eval <argtxt[8]>> 
ENDIF 
src.sysmessage @54,,1 Toplam <eval <Local.ToplamSatis>>gp harcadiniz. 
endif
  • 2008-05-12 19:19
  • #1
tedbunndy
tedbunndy
Apprentice
1.1
Neresi Calısmıyo..
  • 2008-05-12 19:54
  • #2
kedi777
kedi777
Banned
-1
Ya İtem alıorsunya Ne item Geliorrr Nede hatalı Kod Girdiniz Dior sadece Öyle kalıor ...Birde Şmdy Topic Acmak istemiorum Eğer Bkarsanız...Ya Safe alana Ew Kuruluor Bunu nasıl Öneleye bilirim Yane Safe Alanda Ew Kurulmasın İstiorum :D
  • 2008-05-12 20:22
  • #3
&#65263;ilencer üyesi avatar
&#65263;ilencer
Members
0 
on=@Dclick
sdialog d_animal_satiss
src.sysmessage @70,1,, Evet Efendim Ne Alirdiniz ?
return 1
  • 2008-05-12 20:47
  • #4
kedi777
kedi777
Banned
-1
Tmm arkadaşım Öylede Denedim ama Yine Almadı :p
  • 2008-05-12 20:51
  • #5
Axons
Axons
Journeyman
13.6
Kac Tane Button Varda 23. buttonda bu işlemleri yazmişssin
//////////////////%100 Wrighting By YKP /////////////////
///////////////Yeni basladım Adım Yayılsın ismi Deişmeyin////////////////////
//////////////////////Emege Saygı Ltfn////////////////////////////
//////////////////////////   \\\\////   /////////////////////////////
/////////////////////////     @ @    /////////////////////////////
///////////////////////     \____/   ////////////////////////////
////////////////////////////////////////////////////////////////

[Chardef c_animalci]
defname=c_animalci
id=c_man
name @07a1 Omar


on=@create
invul 1
str 100
dex 100
mana 100
int 100
color 0455
itemnewbie=i_hat_floppy
color=0846
itemnewbie=i_apron_half
color=0846
itemnewbie=i_pants_short
color=0455
itemnewbie=i_shirt_fancy
color=0455
itemnewbie=i_shoes_plain
color=0846
itemnewbie=i_staff_taming
color=0

on=@click
message @1153 [ Animal Trainer  ]
endif

on=@Dclick
src.dialog d_animal_satiss
message @70,1,, Evet Efendim Ne Alirdiniz ?
endif


//////////////////////////////////Dialog///////////////////////////////////

[Dialog d_animal_satiss] 
0,0 
NOMOVE 
PAGE 0 
Resizepic 10 5 5054 380 430 
Resizepic 15 10 3000 370 420 
Dtext 130 15 096d Animal Trainer Vendor 
Dtext 60 45 01c6 Esya 
Dtext 230 45 01c6 Fiyat 
Dtext 310 45 01c6 Adet 
Resizepic 60 70 9300 300 3 // Cizgi 
Tilepic 23 80 8486 //phorseh 
Tilepic 23 110 8487 // plamality 
Tilepic 23 158 8481 // bhorse 
Dtext 60 157 0357 Horse 
Dtext 230 157 0357 80000gp
Resizepic 310 155 9300 50 20 
Textentry 312 156 42 25 0 3 3 
Tilepic 20 183 8479 // chorse 
Dtext 60 182 0357 Horse 
Dtext 230 182 0357 80000gp
Resizepic 310 180 9300 50 20 
Textentry 312 181 42 25 0 4 4 
Tilepic 23 205 8484// dhorseson 
Dtext 60 207 0357 Horse 
Dtext 230 207 0357 80000gp
Resizepic 310 205 9300 50 20 
Textentry 312 206 42 25 0 5 5 
Tilepic 23 235 3714// gnar 
Dtext 60 232 0357 Herding Sopasi 
Dtext 230 232 0357 134gp 
Resizepic 310 230 9300 50 20 
Textentry 312 231 42 25 0 6 6 
Tilepic 20 260 3722// taming 
Dtext 60 257 0357 Taming Staff 
Dtext 230 257 0357 196gp 
Resizepic 310 255 9300 50 20 
Textentry 312 256 42 25 0 7 7 
Tilepic 25 285 014f0 // animal 
Dtext 60 282 0357 Animal Deed 
Dtext 230 282 0357 157gp 
Resizepic 310 280 9300 50 20 
Textentry 312 281 42 25 0 8 8 
Tilepic 21 310 4108 // samana 
Dtext 60 307 0357 Saman 
Dtext 230 307 0357 118gp 
Resizepic 310 305 9300 50 20 
Textentry 312 306 42 25 0 9 9 
Tilepic 23 337 4108 // pic 
Dtext 60 332 0357 Saman 
Dtext 230 332 0357 118gp 
Resizepic 310 330 9300 50 20 
Textentry 312 331 42 25 0 10 10 
// Satin AL 
Resizepic 60 362 9300 100 33 
Button 63 365 4030 4031 1 0 23 
Dtext 88 368 08a5 Satin Al 
// Iptal 
Resizepic 170 362 9300 72 33 
Button 173 365 4030 4031 1 0 24 
Dtext 198 368 08a5 Iptal 


// Satin AL 
Resizepic 60 362 9300 100 33 
Button 63 365 4030 4031 1 0 23 
Dtext 88 368 08a5 Satin Al 
// Iptal 
Resizepic 170 362 9300 72 33 
Button 173 365 4030 4031 1 0 24 
Dtext 198 368 08a5 Iptal 

[Dialog d_animal_satiss Text] 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

[Dialog d_animal_satiss Button] 
On=1 // Satin Al 
elseif !(<isnum <ARGTXT[0]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[1]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[2]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[3]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[4]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[5]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[6]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[7]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
elseif !(<isnum <ARGTXT[8]>>) 
src.sysmessage @38,,1 Hatali karakter girdiniz. 
return 1 
endif 
Local.toplamsatis 0 
If (<eval <argtxt[0]>> > 0) 
Local.ToplamSatis (<eval <argtxt[0]> * 2145>) 
endif 
if (<eval <argtxt[1]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[1]> * 80000>) 
endif 
if (<eval <argtxt[2]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[2]> * 80000>) 
endif 
if (<eval <argtxt[3]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[3]> * 80000>) 
endif 
if (<eval <argtxt[4]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[4]> * 80000>) 
endif 
if (<eval <argtxt[5]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[5]> * 134>) 
endif 
if (<eval <argtxt[6]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[6]> * 134>) 
endif 
if (<eval <argtxt[7]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[7]> * 157>) 
endif 
if (<eval <argtxt[8]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[8]> * 118>) 
endif 
if (<eval <argtxt[9]>> > 0) 
Local.ToplamSatis (<eval <local.toplamsatis>> + <eval <argtxt[9]> * 118>) 
endif 
If (<local.toplamsatis> == 0) 
Src.Sysmessage @38,,1 Herhangi bir esya satin almamissiniz! 
Return 1 
Elseif (<Src.Totalgold> < <eval <Local.ToplamSatis>>) 
Src.sysmessage @38,,1 Yeterli paraniz yok! 
Return 1 
Endif 
If (<eval <argtxt[0]>> > 5) || (<eval <argtxt[1]>> > 5) || (<eval <argtxt[2]>> > 5) || (<eval <argtxt[3]>> > 5) || (<eval <argtxt[4]>> > 5) || (<eval <argtxt[5]>> > 5) || (<eval <argtxt[6]>> > 5) || (<eval <argtxt[7]>> > 5) || (<eval <argtxt[8]>> > 5) || (<eval <argtxt[9]>> > 5) || (<eval <argtxt[10]>> > 5) 
src.sysmessage @38,,1 En fazla 5 adet alabilirsiniz! 
return 1 
endif 
If (<eval <argtxt[1]>> > 0) 
Src.EsyaVer i_horse_brown_dk,<eval <argtxt[1]>> 
ENDIF 
If (<eval <argtxt[2]>> > 0) 
Src.EsyaVer i_horse_gray,<eval <argtxt[2]>> 
ENDIF 
If (<eval <argtxt[3]>> > 0) 
Src.EsyaVer i_horse_tan,<eval <argtxt[3]>> 
ENDIF 
If (<eval <argtxt[4]>> > 0) 
Src.EsyaVer i_shepherds_Crook,<eval <argtxt[4]>> 
ENDIF 
If (<eval <argtxt[5]>> > 0) 
Src.EsyaVer i_staff_taming,<eval <argtxt[5]>> 
ENDIF 
If (<eval <argtxt[6]>> > 0) 
Src.EsyaVer i_shrink_deed,<eval <argtxt[6]>> 
ENDIF 
If (<eval <argtxt[7]>> > 0) 
Src.EsyaVer i_hay_sheaf,<eval <argtxt[7]>> 
ENDIF 
If (<eval <argtxt[8]>> > 0) 
Src.EsyaVer i_hay_Sheaf,<eval <argtxt[8]>> 
ENDIF 
src.sysmessage @54,,1 Toplam <eval <Local.ToplamSatis>>gp harcadiniz. 
endif
  • 2008-05-12 20:56
  • #6
kedi777
kedi777
Banned
-1
Deişen Hiç Bişy yok :D Olmuor yaw ne yapsam Olmadı Bunu yapabilecek Yokmu amacım sadece pack llama ve pack horsei kaldımak ve Atların fiyatını 80k yapıp max 5 item satın alınmasını sağlamak :D
  • 2008-05-12 21:06
  • #7
tedbunndy
tedbunndy
Apprentice
1.1
Bı Sn Denıyımde Sana Bıldırırım
  • 2008-05-12 21:07
  • #8
kedi777
kedi777
Banned
-1
Tmm İnş... yapabilirsin :yes
  • 2008-05-12 21:17
  • #9
Axons
Axons
Journeyman
13.6
Konsolda Ne Hata Veriyor
  • 2008-05-14 15:52
  • #10
Dreamer
Dreamer
Adept
0
Sırf ayı felan sattığı içinmi menü yazma gereği duydun?
  • 2008-05-14 16:10
  • #11
HP-Nexiel
HP-Nexiel
Expert
14.3
Herşeyin orjinali güzeldir..
Scripts/sphere_template_vend scriptini açıyorsun.. şöyle bir yer bulunuyor ;

[TEMPLATE VENDOR_B_TRAINER]
CATEGORY=Vendor Templates
SUBSECTION=Buy Templates
DESCRIPTION=Animal Trainer
BUY=i_hay_sheaf,{22 48}
.
.
.
.
.

Buradan istediğini ekleyebilir veya kaldırabilirsin..
  • 2008-05-14 16:18
  • #12

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan