|
|
| Yazar | Mesaj |
melih_aganiz
Nereden: Turkey Antalya |
#251016
2007-09-21 19:27 GMT  Kod: [itemdef i_borc_dis] name Disconnect id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@equip timer 1 src.sysmessage Baglandiniz Kesilcek. return 1 on=@timer attr attr_decay cont.disconnect remove return 1 [itemdef i_borc_ceza] name Cezalandirildi. id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 5 Gun Boyunca Cezalandirildiniz. src.newitem i_borc_dis src.act.equip return 1 on=@timer attr attr_decay cont.go 2706,2163 remove return 1 [DIALOG d_borc_ode1] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Odeme Sistemi dtext 50 50 0481 Suanda 100k Borcunuz Bulunmaktadir. if <src.rescount(i_gold).amount>>99000) dtext 70 90 0481 Tamam else dtext 70 90 0481 Yetersiz Para endif ////////////////////////////////////// if <src.rescount(i_gold).amount>>99000) button 50 90 210 211 1 0 1 else endif //////////////////////////////////// [dialog d_borc_ode1 button] onbutton=1 if !(<src.restest 100000 i_gold>) src.syshata Suanda Yaninizda Borcunuzu Oducek Kadar Para Yok. [ 100k ] else src.consume 50000 i_gold src.consume 50000 i_gold src.findid.i_borc_para1.remove src.tag.borcpara1 0 endif return 1 [DIALOG d_borc_ode2] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Odeme Sistemi dtext 50 50 0481 Suanda 200k Borcunuz Bulunmaktadir. if <src.rescount(i_gold).amount>>199000) dtext 70 90 0481 Tamam else dtext 70 90 0481 Yetersiz Para endif ////////////////////////////////////// if <src.rescount(i_gold).amount>>199000) button 50 90 210 211 1 0 1 else endif //////////////////////////////////// [dialog d_borc_ode2 button] onbutton=1 if !(<src.restest 200000 i_gold>) src.syshata Suanda Yaninizda Borcunuzu Oducek Kadar Para Yok. [ 200k ] else src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.findid.i_borc_para2.remove src.tag.borcpara2 0 endif return 1 [DIALOG d_borc_ode3] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Odeme Sistemi dtext 50 50 0481 Suanda 300k Borcunuz Bulunmaktadir. if <src.rescount(i_gold).amount>>299000) dtext 70 90 0481 Tamam else dtext 70 90 0481 Yetersiz Para endif ////////////////////////////////////// if <src.rescount(i_gold).amount>>299000) button 50 90 210 211 1 0 1 else endif //////////////////////////////////// [dialog d_borc_ode3 button] onbutton=1 if !(<src.restest 300000 i_gold>) src.syshata Suanda Yaninizda Borcunuzu Oducek Kadar Para Yok. [ 300k ] else src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.findid.i_borc_para3.remove src.tag.borcpara3 0 endif return 1 [DIALOG d_borc_ode4] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Odeme Sistemi dtext 50 50 0481 Suanda 400k Borcunuz Bulunmaktadir. if <src.rescount(i_gold).amount>>399000) dtext 70 90 0481 Tamam else dtext 70 90 0481 Yetersiz Para endif ////////////////////////////////////// if <src.rescount(i_gold).amount>>399000) button 50 90 210 211 1 0 1 else endif //////////////////////////////////// [dialog d_borc_ode4 button] onbutton=1 if !(<src.restest 400000 i_gold>) src.syshata Suanda Yaninizda Borcunuzu Oducek Kadar Para Yok. [ 400k ] else src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.findid.i_borc_para4.remove src.tag.borcpara4 0 endif return 1 [DIALOG d_borc_ode5] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Odeme Sistemi dtext 50 50 0481 Suanda 500k Borcunuz Bulunmaktadir. if <src.rescount(i_gold).amount>>499000) dtext 70 90 0481 Tamam else dtext 70 90 0481 Yetersiz Para endif ////////////////////////////////////// if <src.rescount(i_gold).amount>>499000) button 50 90 210 211 1 0 1 else endif //////////////////////////////////// [dialog d_borc_ode5 button] onbutton=1 if !(<src.restest 500000 i_gold>) src.syshata Suanda Yaninizda Borcunuzu Oducek Kadar Para Yok. [ 500k ] else src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.consume 50000 i_gold src.findid.i_borc_para5.remove src.tag.borcpara5 0 endif return 1 [itemdef i_borc_para1] name Borc Para1 id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 Borcunuzu 5Gun Icersininde Odemeniz Lazim return 1 on=@unequip src.newitem i_borc_ceza src.act.equip return 1 on=@timer attr attr_decay cont.go jail remove return 1 [itemdef i_borc_para2] name Borc Para2 id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 Borcunuzu 5Gun Icersininde Odemeniz Lazim return 1 on=@unequip src.newitem i_borc_ceza src.act.equip return 1 on=@timer attr attr_decay cont.go jail remove src.newitem i_borc_ceza src.act.equip return 1 [itemdef i_borc_para3] name Borc Para3 id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 Borcunuzu 5Gun Icersininde Odemeniz Lazim return 1 on=@unequip src.newitem i_borc_ceza src.act.equip return 1 on=@timer attr attr_decay cont.go jail remove src.newitem i_borc_ceza src.act.equip return 1 [itemdef i_borc_para4] name Borc Para4 id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@unequip src.newitem i_borc_ceza src.act.equip return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 Borcunuzu 5Gun Icersininde Odemeniz Lazim return 1 on=@timer attr attr_decay cont.go jail remove src.newitem i_borc_ceza src.act.equip return 1 [itemdef i_borc_para5] name Borc Para5 id i_memory type t_eq_script weight 0 on=@create attr attr_invis | attr_decay return 1 on=@unequip src.newitem i_borc_ceza src.act.equip return 1 on=@equip timer 60*60*24*5 src.sysmessage @0800 Borcunuzu 5Gun Icersininde Odemeniz Lazim return 1 on=@timer attr attr_decay cont.go jail remove src.newitem i_borc_ceza src.act.equip return 1 [plevel 1] borcal [function borcal] if (<src.tag0.borcpara1>)=1 src.sdialog d_borc_ode1 else if (<src.tag0.borcpara2>)=1 src.sdialog d_borc_ode2 else if (<src.tag0.borcpara3>)=1 src.sdialog d_borc_ode3 else if (<src.tag0.borcpara4>)=1 src.sdialog d_borc_ode4 else if (<src.tag0.borcpara5>)=1 src.sdialog d_borc_ode5 else if <EVAL(<create> / 86400)><7 smg Borc Alabilmeniz Icin 7gun Aradan Gecmesi Lazim. return 1 else src.dialog d_borc return 1 endif [DIALOG d_borc] 0,0 nomove resizepic 10 10 3600 400 300 ////////////////////////////// dtext 115 15 0821 Borc Para Sistemi //////////////////////////////// dtext 25 55 0481 Adiniz : dtext 25 75 0481 Soyadiniz : dtext 25 95 0481 Borc Para : dtext 25 115 0481 Odencek Gun : En Fazla 5gun Icerisinde Odenmeli - dtext 115 135 0481 Aksi Taktirde - [ Jail ] Yiyeceksiniz...!! dtext 55 155 0481 Borc Al //////////////////////////////// dtext 130 95 0481 100k dtext 180 95 0481 200k dtext 230 95 0481 300k dtext 280 95 0481 400k dtext 330 95 0481 500k ////////////////////////////// checkbox 110 95 210 211 0 0 checkbox 160 95 210 211 0 1 checkbox 210 95 210 211 0 2 checkbox 260 95 210 211 0 3 checkbox 310 95 210 211 0 4 ///////////////////////////// button 25 155 210 211 1 0 1 ////////////////////////////// [dialog d_borc button] onbutton=1 if (<src.tag0.borcpara1>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara2>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara3>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara4>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara5>)=1 src.syshata Daha Onceden Para Almissiniz. else IF (<argchk>==1) IF (<argchk[0]>==1) src.newitem i_borc_para1 src.act.equip src.newitem i_gold src.act.amount 50000 src.act.bounce src.act.dupe 1 src.tag.borcpara1 1 ENDIF IF (<argchk[1]>==1) src.newitem i_borc_para2 src.act.equip src.newitem i_gold src.act.amount 50000 src.act.bounce src.act.dupe 3 src.tag.borcpara2 1 ENDIF IF (<argchk[2]>==1) src.newitem i_borc_para3 src.act.equip src.newitem i_gold src.act.amount 50000 src.act.bounce src.act.dupe 5 src.tag.borcpara3 1 ENDIF IF (<argchk[3]>==1) src.newitem i_borc_para4 src.act.equip src.newitem i_gold src.act.amount 50000 src.act.bounce src.act.dupe 7 src.tag.borcpara4 1 ENDIF IF (<argchk[4]>==1) src.newitem i_borc_para5 src.act.equip src.newitem i_gold src.act.amount 50000 src.act.bounce src.act.dupe 9 src.tag.borcpara5 1 ENDIF else src.syshata Sadece 1 Tane Secebilirsin. return 1 /////////////////////////////////////// Guzel Bir Borc Para Alma Sistemi.. Soyle Calısıor .borcal Diorsun - Acılan Ekrandan Para Secip Alıorsun ve 5gun icinde odemezsen 5 gun boyunca oyuna giremiorsun +7 Gunluk Olmayan Charlar Para Alamior...!!!!! ///////////////////////////////////////////////////////// Bu Script'i Ekledikten Sonra. Fix.Scp'sinde Ayar Yapılcak Olay Soyle; [events fix] on=@login if (<src.findid.i_borc_ceza>) src.syshata 5 Gunluk Cezaniz Bitene Kadar Oyuna Girmeniz Yasaklanmistir. newitem i_borc_dis act.equip else xxxxxxxxxxxx Gerisi Neyse Yarına Kadar Girmm Sorunları Buraya Yazın Yarın Bakarım -- Sorunları Fixleriz...
Scripter : Matrax |
Slothere
Nereden: Turkey Izmir |
#251019
2007-09-21 19:34 GMT
Güzel bi sistem ancak 56b için bi eklenti yapmak istiyorum.
Kod: if (<src.tag0.borcpara1>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara2>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara3>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara4>)=1 src.syshata Daha Onceden Para Almissiniz. else if (<src.tag0.borcpara5>)=1 src.syshata Daha Onceden Para Almissiniz. else bu kısım yerine Kod: for 5 if (<src.tag0.borcpara<dlocal._for>>)=1 try src.syshata Daha Onceden Para Almissiniz. return 1 endif endfor Bu tarz bişiler daha hoş durur gibi eline sağlık.  /Edit: Alttaki kısımlarıda kısaltarak hem daha fonksiyonel olur hemde karışıklık göz önünden kalkar. Kod: if (<src.tag0.borcpara1>)=1 src.sdialog d_borc_ode1 else if (<src.tag0.borcpara2>)=1 src.sdialog d_borc_ode2 else if (<src.tag0.borcpara3>)=1 src.sdialog d_borc_ode3 else if (<src.tag0.borcpara4>)=1 src.sdialog d_borc_ode4 else if (<src.tag0.borcpara5>)=1 src.sdialog d_borc_ode5 else Kod: for 5
if (<src.tag0.borcpara<dlocal._for>>)=1 try src.sdialog d_borc_ode<dlocal._for> return 1 endif endfor
"Milletimiz her güçlük ve zorluk karşısında, durmadan ilerlemekte ve yükselmektedir. Büyük Türk Milletinin bu yoldaki hızını, her vasıtayla arttırmaya çalışmak, bizim hepimizin en kutlu vazifemizdir." M. Kemal Atatürk  |
MortaL
Nereden: |
#251030
2007-09-21 20:19 GMT
@slothere
for 55r serisindede var @melih_aganiz güzel sistem =)
|
Slothere
Nereden: Turkey Izmir |
#251031
2007-09-21 20:20 GMT
56b kasa kasa diğerlerini unutmuşum MortaL hatırlatma için teşekkürler
"Milletimiz her güçlük ve zorluk karşısında, durmadan ilerlemekte ve yükselmektedir. Büyük Türk Milletinin bu yoldaki hızını, her vasıtayla arttırmaya çalışmak, bizim hepimizin en kutlu vazifemizdir." M. Kemal Atatürk |
melih_aganiz
Nereden: Turkey Antalya |
#251032
2007-09-21 20:26 GMT
Saolun Arkadaşlar Aslında Dahada Guzel Yapıcaktım-- Faiz fln yapıcaktımm..Fakat..Okullar Acıldı Günde 10ders goruorum okula -- 9'da gidip 7'gibi cıkıorum cok yorgun oluorum vakit olmuor...2 3 Gündürde bu aklımdaydi hoca konusurken aklıma boyle birşey geldi benımde dedim yapayım fakat kısa zaman oldugu icin daha guzel birşey yapamadım +++ 3 aydır scp yazmıorum Yanlışlar Olabilir.Test Fln Etmedim Bug Varmıdır Yokmudur.Die
Scripter : Matrax |
Slothere
Nereden: Turkey Izmir |
#251034
2007-09-21 20:28 GMT
Okul daha önemli tabiki boşver scripti felan. Üstteki kısımları dediğim gibi değiştirirsen daha rahatlarsın hemde zaten hatalıydı onlar elseler yerine endif olacaktı
.
"Milletimiz her güçlük ve zorluk karşısında, durmadan ilerlemekte ve yükselmektedir. Büyük Türk Milletinin bu yoldaki hızını, her vasıtayla arttırmaya çalışmak, bizim hepimizin en kutlu vazifemizdir." M. Kemal Atatürk |
melih_aganiz
Nereden: Turkey Antalya |
#251036
2007-09-21 20:38 GMT
saol aklıma gelmedi - for kullanmak aslında fazlada cakmıorum ondan ama neyse
 Ehuhuhu Cok Salagım Yaw...Ordaki Adınız , Soyadınız, süsmü ehueuheuhe
Scripter : Matrax |
Akillis
Nereden: United States Kentucky - Seattle |
#251062
2007-09-21 21:47 GMT
tag vb. bir kontrol yaparak 1 tane menuye alabilirsin herseyi aslinda.
MSN/ICQ/AIM gibi programlar aracılığı ile destek olmuyorum. UO için gelmeyiniz. SphereWiki - Acemilerin scriptera dönüştüğü site. |
melih_aganiz
Nereden: Turkey Antalya |
#251065
2007-09-21 21:58 GMT
aslında dedigin gibi fakat aklıma gelir gelmez soyle soyle olsun dedim hemen acele bir şekilde yaptım :o_O
Scripter : Matrax |
Andain
Nereden: Turkey Samsun |
#251068
2007-09-21 22:25 GMT
Grandmaster bide Kefill olsun
yoksa adam accyi açar.Bekler bi hafta nolacak.
Eğer Saygı İstiyorsan, Onu Kazanmalısın.. |
Slothere
Nereden: Turkey Izmir |
#251070
2007-09-21 22:32 GMT
1 haftalık accountlar kullanabilsin bence diğer türlü para aktarırlar bide o karakterin chara girmesi değilde tüm account un girememesini ayarlaman lazım böyle yaparsan bi charla alıp aktarınca diğerinede giremez.
"Milletimiz her güçlük ve zorluk karşısında, durmadan ilerlemekte ve yükselmektedir. Büyük Türk Milletinin bu yoldaki hızını, her vasıtayla arttırmaya çalışmak, bizim hepimizin en kutlu vazifemizdir." M. Kemal Atatürk |
Andain
Nereden: Turkey Samsun |
#251072
2007-09-21 22:35 GMT
Öyle Diyorsunda Slothere.Ben 6-7 tane account alırım.Bi hafta bekletip kendi asıl charımla oynarım.Bir Hafta Sonra Hepsiyle Kredi Alırım?Aslında Kefil olursa süper olurda.6x'lik kefilciler gibi.
Eğer Saygı İstiyorsan, Onu Kazanmalısın.. |
Michaell
Nereden: |
#251090
2007-09-21 23:00 GMT
EUhuehe bu sistemi bende dusunmuştum eskiden ama yolsuzluk yaparlar bu sistemde
adam 10 tnb acc alır 10*5 50 50 charla borc alır köşe
|
greedy187
Nereden: Turkey İzmir |
#251091
2007-09-21 23:03 GMT
Ben ultimaya yeni basladıgımda bir serverda hasan_korkmaz_1,2,3.......50 ye kadar acc almıstım teker teker girip 5k parayı biryere koyuyordum diger charla girip alıyordum
Ne kadar para kazandıgımı dusunemessiniz o serverda istedigim herseyi alabilmistim Bu sistem tutmaz gibi geliyor
|
Ali3n
Nereden: Turkey İstanbul/Pendik |
#251092
2007-09-21 23:03 GMT
zuhahaha Cocum Helal Matematik Öğrenmiş Sonunda Bide 10*10 Kaç Eder Onu Söle Bakam
New Project After Day |
ByTymaron
Nereden: Turkey İstanbul |
#251093
2007-09-21 23:03 GMT
Michaell İmzanı Cok Beyendım Kullana Bılırmıyım
|
Michaell
Nereden: |
#251095
2007-09-21 23:05 GMT
@Alien
Kop abim bi ya @ByTymaron Sorman hata canım
|
Ali3n
Nereden: Turkey İstanbul/Pendik |
#251104
2007-09-21 23:12 GMT
Sercan Adamlarıda Sosisliye Alıştıracaksan Ya Kendini Harcadın Onları Harcama
New Project After Day |
|ZagoR|
Nereden: |
#251106
2007-09-21 23:25 GMT
Melih Agam
Sende harbiden güzel bir hayal gücü var.Hatırladığım kadarı ile google yapmıştın
|
Stormy
Nereden: Turkey Balıkesir/Bandırma |
Tebrikler iyi sistem.;o)
Kötü amaçla kullanılabilir ama.:/
Good Stormy, The Kovuk Worldbuilder. Hayat içi boş düşüncelerin var olduğu anlamsız bir boşluk değilmidir? |
