UO-Dev Arama

 

İçerde : 1 misafir, 0 üye : --- Sayfalar: 1
Yazar
Skill Title: Adept
Toplam Mesaj: 622
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: World Builder
Yaş: 28
Beğeni: 1
Mesaj #14084   07-03-2010 11:25 GMT    
     
Arkadaşlar Acik Arttirma Sistemimde bir problem var.
Bankamda yeterince para olmasına rağmen teklif yapamıyorum.


Script Kodu:
[itemdef i_acikarttirma]
id i_grave_stone
name acik arttirma

on=@create
color 49

on=@dclick
if (<var.acikarttirmabasla> = 1 )
sdialog d_acikarttirma
return 1
else
src.sysmessage Acik arttirma su an icin baslamamis.
endif
return 1


[dialog d_acikarttirma]
50,50
nomove
resizepic               0 0 5054 550 300         0 0 5054 550 300
dtext 150 20 1152 <serv.name> Acik Arttirma Menusu
dtext 40 60 1152 Ihaleye sunulan esya: <var.ihaleesyasi>
dtext 40 80 1152 En yuksek teklif: <eval <var.enyuksek>>
dtext 40 100 1152 En yuksek teklifi yapan: <var.enyuksekyapan>
dtextentry 50 152 90 20 990 1 <eval <var.enyuksek> +50000>
dtext 40 120 1152 Bitis Fiyati: <eval <var.bitisfiyati>>
button 150 150 4005 4006 1 0 1
dtext 190 150 1152 Teklif Yap
dtext 200 250 00 By" KeLL


[dialog d_acikarttirma button]
on=0
src.sysmessage @07a1 Acik arttirmaya katilmaktan vazgectiniz.
return 1


on=1
if !(<isnum <argtxt[1]>>)
src.sysmessage Sadece rakam kullanabilirsiniz.
elseif (<eval <argtxt[1]>> < 1)
src.sysmessage Hatali bir rakam girdiniz.
elseif (<eval <argtxt[1]>> < <eval <var.enyuksek>+50000> )
src.sysmessage En yuksek tekliften 50k daha fazla teklif etmelisiniz
elseif (<eval <argtxt[1]>> > <src.totalgold>)
src.sysmessage Bankanizda <eval <argtxt[1]>> kadar altin bulunmuyor.
else
var.enyuksekyapan <src.name>
var.enyuksek <eval <argtxt[1]>>
var.enyuksekyapanuid <src.uid>
serv.allclients sysmessage @49 <serv.name> Acik Arttirma Duyuru:
serv.allclients sysmessage @49 <var.enyuksekyapan> , <var.ihaleesyasi> icin <eval <var.enyuksek>> teklifi yapti.
f_ihale_bittimi <eval <argtxt[1]>>
endif
endif

[function f_ihale_bittimi]
if (<eval <args>> >= <eval <var.bitisfiyati>>
src.sysmessage Acik arttirmayi kazandiniz.
f_ihalebitti
serv.allclients sysmessage @49 <serv.name> Acik arttirma Duyuru:
serv.allclients sysmessage @49 <var.enyuksekyapan> acik arttirmayi kazandi..
endif

[function ayarihale]
if (<account.plevel> < 6)
src.sysmessage Sadece admin ve ownerlar kullanabilir.
else
sdialog d_ihaleayar
endif
endif

[dialog d_ihaleayar]
50,50
nomove
resizepic               0 0 5054 550 300         0 0 5054 550 300
dtext 150 20 1152 Acik Arttirma Ayar menusu
dtext 40 50 1152 binegin idsi:
dtextentry 120 50 90 20 49 1 c_m_unicorn
dtext 40 70 1152 binegin ismi:
dtextentry 120 70 90 20 49 2 Unicorn
dtext 40 90 1152 baslangic fiyati:
dtextentry 150 90 150 20 49 3 2500000
dtext 40 110 1152 bitis fiyati:
dtextentry 150 110 150 20 49 4 7000000

button 100 210 2473 2474 1 0 1
dtext 150 250 00 By Scripter KeLL
dtext 140 213 1153 Ihaleyi baslat!


[dialog d_ihaleayar button]
on=1
var.binek <argtxt[1]>
var.ihaleesyasi <argtxt[2]>
var.enyuksek <argtxt[3]>
var.bitisfiyati <argtxt[4]>
acikal <var.bitisfiyati>
var.acikarttirmabasla 1
serv.allclients sysmessage @49 <serv.name> Acik arttirma Duyuru:
serv.allclients sysmessage @49 Acik arttirma baslamistir.Satilan binek:<var.ihaleesyasi>.Baslangic fiyati <eval <var.enyuksek>>tir.
return 1

[function f_ihalebitti]
serv.newitem i_deed_ihalebinek
new.tag.binekid <var.binek>
new.cont <var.enyuksekyapanuid>
var.acikarttirmabasla 0
var.enyuksekyapan
var.enyuksekuid
var.enyuksek


[ITEMDEF i_deed_ihalebinek]
DEFNAME=i_deed_ihalebinek
NAME=Binek Deed
ID=i_deed
WEIGHT=5.0
TYPE=t_script

On=@Create
color 0fb4
attr 04

on=@Dclick
if !(<topobj.uid> = <src.uid>)
src.sysmessage @55 Hata : Bunu kullanabilmeniz icin cantanizda olmali.
return 1
else
src.newnpc <tag.binekid>
link <src.act.uid>
link.oskin <link.color>
link.newitem i_memory
link.act.attr 04
link.act.more1 04
link.act.more2 <serv.time>
link.act.morep <link.p>
link.act.color memory_ipet
link.act.timer -1
link.act.link <src.uid>
link.act.cont <link.uid>
link.flags <link.flags>&statf_pet
link.update
link.anim 5
link.bark 3
remove
return 1
endif

on=@click
message @07a1 <serv.name>
message @07a1 Acik Arttirma Binegi
return 1




[FUNCTION acikal]
IF (<totalgold> < <ARGN1>)
RETURN 1
ENDIF
LOCAL.AMOUNT=<ARGN1>
WHILE (<LOCAL.AMOUNT>)
IF (0<FINDLAYER.21.FINDID.i_gold>)
LOCAL.GOLD=<FINDLAYER.21.FINDID.i_gold.amount>
IF (<EVAL <LOCAL.AMOUNT>-<LOCAL.GOLD>> < 0)
FINDLAYER.21.FINDID.i_gold.AMOUNT -= <LOCAL.AMOUNT>
LOCAL.AMOUNT=0
ELSE
FINDLAYER.21.FINDID.i_gold.remove
LOCAL.AMOUNT -= <LOCAL.GOLD>
ENDIF
ELIF (0<FINDLAYER.29.FINDID.i_gold>)
LOCAL.GOLD=<FINDLAYER.29.FINDID.i_gold.amount>
IF (<EVAL <LOCAL.AMOUNT>-<LOCAL.GOLD>> < 0)
FINDLAYER.29.FINDID.i_gold.AMOUNT -= <LOCAL.AMOUNT>
LOCAL.AMOUNT=0
ELSE
FINDLAYER.29.FINDID.i_gold.remove
LOCAL.AMOUNT -= <LOCAL.GOLD>
ENDIF
ENDIF
ENDWHILE
UPDATE


//scriptleri kod içinde koyunuz.


Son güncelleme: basic tarafından 07-03-2010 11:29 GMT, önce düzenlendi.



Yazar
Skill Title: Expert
Toplam Mesaj: 410
Oyun Tarzı:
Emulatör:
Tecrübe: Diğer
Yaş: 29
Beğeni: 105
Mesaj #14085   07-03-2010 11:28 GMT    
     

Script Kodu:
elseif (<eval <argtxt[1]>> > <src.totalgold>
src.sysmessage Bankanizda <eval <argtxt[1]>> kadar altin bulunmuyor


yerine


Script Kodu:
elseif (<src.gold> < <dargtxt[1]>)
src.sysmessage Bankanizda <dargtxt[1]> altin bulunmuyor.


~

Yazar
Skill Title: Expert
Toplam Mesaj: 430
Oyun Tarzı: Pp
Emulatör:
Tecrübe: Scripter
Yaş: 31
Beğeni: 0
Mesaj #14086   07-03-2010 11:44 GMT    
     
bu bayağı eski ben bile unutmuştum, bir ara güncelini yazayım.


Yazar
Skill Title: Adept
Toplam Mesaj: 622
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: World Builder
Yaş: 28
Beğeni: 1
Mesaj #14094   07-03-2010 12:09 GMT    
     
sorunlu bir script


Son güncelleme: Strike tarafından 07-03-2010 12:17 GMT, önce düzenlendi.



Yazar
Skill Title: Adept
Toplam Mesaj: 569
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: Scripter
Yaş: 29
Beğeni: 15
Mesaj #14095   07-03-2010 12:11 GMT    
     
SCRIPTS DEĞİL SCRIPT


wellia.net


Hayat sana ekşi limonlar sunarsa, sen de tekila ve tuz iste ...

"Partners help each other undress before sex. After sex, they always dress on their own. Moral of the story: In life, no one helps you once you get fucked."

Yazar
Skill Title: Adept
Toplam Mesaj: 622
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: World Builder
Yaş: 28
Beğeni: 1
Mesaj #14096   07-03-2010 12:18 GMT    
     
Alcholic, k.bakma düzelttim.
bu kadar sorun etme böyle şeyleri.

Kralsın



Yazar
Skill Title: Adept
Toplam Mesaj: 626
Oyun Tarzı: Rp
Emulatör: 0.56b
Tecrübe: Player
Yaş: 29
Beğeni: 15
Mesaj #14098   07-03-2010 12:28 GMT    
     
Alıntı
Alcholic :
SCRIPTS DEĞİL SCRIPT




Birer birer neyim kalır, geriye baksamda

Yazar
Skill Title: Master
Toplam Mesaj: 2023
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 163
Mesaj #14105   07-03-2010 13:04 GMT    
     
Alıntı
Alcholic :
SCRIPTS DEĞİL SCRIPT



http://www.uo-developer.com......php?m=posts&q=1172&d=15

Alıntı
Alcholic :
türkçede olmayan kelimeler türetmek saçma ama yazım yanlışları küçük harf büyük harf forum ortamında gereksiz. free takılın.




bırakın lan.

bırakın lan o kadar da ölmedik bırakın

Yazar
Skill Title: Adept
Toplam Mesaj: 569
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: Scripter
Yaş: 29
Beğeni: 15
Mesaj #14109   07-03-2010 13:35 GMT    
     
@Strike
=( fazla tepki verdysm affola.
kral değil tanrısın desen söyleyen kişi sen olduğun için inan egomu biraz olsun tatmin edemezdin.

@affronola
yazım yanlışı değil bilgi yanlışıydı , ama anlamakta sorun yaşadın sanırım neyse " tanrı " böle yaratmış.


wellia.net


Hayat sana ekşi limonlar sunarsa, sen de tekila ve tuz iste ...

"Partners help each other undress before sex. After sex, they always dress on their own. Moral of the story: In life, no one helps you once you get fucked."

Yazar
Skill Title: Master
Toplam Mesaj: 2023
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 163
Mesaj #14113   07-03-2010 14:52 GMT    
     
tamam sen "tanrı"sın biz hep yanlış anlayan egoları olan küçük insanlar


bırakın lan.

bırakın lan o kadar da ölmedik bırakın

Yazar
Skill Title: Expert
Toplam Mesaj: 360
Oyun Tarzı: Pp
Emulatör: RunUO
Tecrübe: Scripter
Yaş: 30
Beğeni: 0
Mesaj #14115   07-03-2010 15:14 GMT    
     
UODev fight club'ı açsak mı?

çünkü bi geliştirme platformundan çok tartışma&kavga platformuna dönüşüyor. Moderatorlere sesleniyorum.


Yazar
Skill Title: Adept
Toplam Mesaj: 622
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: World Builder
Yaş: 28
Beğeni: 1
Mesaj #14131   07-03-2010 18:51 GMT    
     
alcholic, sen büyük ulu bir kişiliksin.
senin önünde saygıyla eğiliyorum.



Yazar
Skill Title: Master
Toplam Mesaj: 2023
Oyun Tarzı: Pp
Emulatör: Sphere
Tecrübe: Scripter
Yaş: 30
Beğeni: 163
Mesaj #14132   07-03-2010 18:52 GMT    
     
Gerek yok Furkan Alcholic bizi döver


bırakın lan.

bırakın lan o kadar da ölmedik bırakın

Yazar
Skill Title: Adept
Toplam Mesaj: 622
Oyun Tarzı: Pp
Emulatör: 0.56b
Tecrübe: World Builder
Yaş: 28
Beğeni: 1
Mesaj #14134   07-03-2010 19:06 GMT    
     
Alıntı
Afronola :
Gerek yok Furkan Alcholic bizi döver



Sayfalar: 1


Benzer Konular :

KonularMesajlarSon gönderenTarih
yardım futbol4helpmee21-10-2021
Debug hata yardım.4Gokku28-09-2021
Kredi Barbut Zar Sistemi2manolya11-07-2021
Japanese Rank Sistemi6Jada22-05-2021
Takas Sistemi Yapmak5UltimaOnlineList04-05-2021


Kullanıcı Adı:Parola: Beni Hatırla?


Mythic broadsword sphereserver modernuo runuo ServUO JustUO

Keywords:

ultima online, RunUO, ultima online download, sphere scripting, role play, uo grafik, second age ultima, uo loop, macroman, pvp server, server kurulumu, sphere, multool, ml mulls, 56b 55r 55i, htmlgumps, client 4x, client edit, sphere release, osi, rp server, sunucular, ghost mouse, inside uo, kingdom reborn, stygian abyss, uo nasıl oynanır, mondain's legacy, age of shadows, world build, grandmaster, ultima online pvp, player dosyaları, ultima online indir, frp game, RunUO 1.0.0, razor, uo rice, hue editör, skill tools, ultima online patch, axis, world build, verdata, verdata patcher, map editör, gump editör, mul patcher, aos mulls, scriptler, anim edit, anim publish, hues mul, hosting vps, event dialog, account sistemi, skill gain, static yapımı,

UO-Dev Footer UO-Dev Footer