Arkadaşlar stonede hiç bir sorun yok fakat tıklıyorsun kolu çekiyorsun tam kazandınız yada kaybettiniz diyceği yerde oyundan atıyor bi bakın yardımcı olursanız sevinirim.

[itemdef i_kumarbaz]
defname i_kumarbaz
name=Kumar Baz
id i_gravestone_18

on=@create
color 0455
attr attr_move_never

On=@Click
message @2020,1,1 [ Slot Machine ]
message @0846,1,1 [Katilim: 200 sp]
return 1

on=@dclick
src.dialog d_slot_dialog
return 1

ON=@gethit
src.say @0481 Dalamassin.
return 1

On=@Spelleffect
If (<argn>==1) || (<argn>==3) || (<argn>==4) || (<argn>==5) || (<argn>== || (<argn> == 20) || (<argn> == 12) || (<argn> == 1 || (<argn> == 27) || (<argn> == 30) || (<argn> == 37) || (<argn> == 3 || (<argn> == 2 || (<argn> == 39) || (<argn> == 49) || (<argn> == 51) || (<argn> == 55) || (<argn> == 57)
if <src.say @0481 Dalma Bea Abi>
src.say @0481 Dalma Bea Abi
say * Etkisiz *
return 1
ENDIF

[DIALOG d_slot_dialog] // Main
160,80 // Position
nomove
noclose
gumppic 0 0 04cc
gumppic 230 -20 0d
gumppic 228 -18 0C735
gumppic 230 -20 0C734
gumppic 230 -20 0ed24
gumppic 230 -20 0c558
gumppic 230 -20 0c554
gumppic 230 -20 0c55d
gumppic 230 -20 0c589

dtext 90 3 0100 <serv.name> Kumar Makinasi
dtext 100 100 2020 ( Bir oyun: 200 sp)
dtext 30 210 2020 Baslamak Icin Yukardaki Butana Basin Tiklayin
button 220 135 5571 5572 1 0 1 // Basla
button 150 135 0995 0996 1 0 0

[DIALOG d_slot_dialog BUTTON]
ONBUTTON=0
ONBUTTON=1
slot_oyna

[function slot_oyna]
if (<findid.i_slot_timer>)
sysmessage @0790 Biraz Bekleyin.
return 1
endif
if (<SRC.RESTEST 490 i_fctn_silver>)
CONSUME 200 i_fctn_silver
update
elseif (<src.restest 490 i_fctn_silver>)
src.consume 200 i_fctn_silver
update
else
sysmessage @0846,1,1 Bu oyun icin 200 Bilet gerekiyor.
return 1
endif
newitem i_slot_timer
new.equip
return 1

[itemdef i_slot_timer]
name slot timer
id i_memory
type t_eq_script
weight 0

on=@create
attr attr_invis | attr_decay

on=@equip
timer 3
src.sfx 556
src.sysmessage @55 Kolu cektiniz.

on=@unequip
cont.slotmachine

on=@timer
attr attr_decay
remove

[function slotmachine]
dorand 7
var.birincislot 5545
var.birincislot 5557
var.birincislot 5557
var.birincislot 5563
var.birincislot 5569
var.birincislot 5573
var.birincislot 5587
enddo
dorand 7
var.ikincislot 5545
var.ikincislot 5557
var.ikincislot 5557
var.ikincislot 5563
var.ikincislot 5569
var.ikincislot 5573
var.ikincislot 5587
enddo
dorand 7
var.ucuncuslot 5545
var.ucuncuslot 5557
var.ucuncuslot 5557
var.ucuncuslot 5563
var.ucuncuslot 5569
var.ucuncuslot 5573
var.ucuncuslot 5587
enddo

if (<var.birincislot>=5545) && (<var.ikincislot>=5545) && (<var.ucuncuslot>=5545)
5545kazan
return 1
elseif ((<var.birincislot>=5545)&&(<var.ikincislot>=5545)) || ((<var.birincislot>=5545)&&(<var.ucuncuslot>=5545)) || ((<var.ikincislot>=5545)&&(<var.ucuncuslot>=5545))
5545ikili
return 1
endif

if (<var.birincislot>=5557) && (<var.ikincislot>=5557) && (<var.ucuncuslot>=5557)
5557kazan
return 1
elseif ((<var.birincislot>=5557)&&(<var.ikincislot>=5557)) || ((<var.birincislot>=5557)&&(<var.ucuncuslot>=5557)) || ((<var.ikincislot>=5557)&&(<var.ucuncuslot>=5557))
5557ikili
return 1
endif

if (<var.birincislot>=5563) && (<var.ikincislot>=5563) && (<var.ucuncuslot>=5563)
5563kazan
return 1
elseif ((<var.birincislot>=5563)&&(<var.ikincislot>=5563)) || ((<var.birincislot>=5563)&&(<var.ucuncuslot>=5563)) || ((<var.ikincislot>=5563)&&(<var.ucuncuslot>=5563))
5563ikili
return 1
endif

if (<var.birincislot>=5569) && (<var.ikincislot>=5569) && (<var.ucuncuslot>=5569)
5569kazan
return 1
elseif ((<var.birincislot>=5569)&&(<var.ikincislot>=5569)) || ((<var.birincislot>=5569)&&(<var.ucuncuslot>=5569)) || ((<var.ikincislot>=5569)&&(<var.ucuncuslot>=5569))
5569ikili
return 1
endif

if (<var.birincislot>=5573) && (<var.ikincislot>=5573) && (<var.ucuncuslot>=5573)
5573kazan
return 1
elseif ((<var.birincislot>=5573)&&(<var.ikincislot>=5573)) || ((<var.birincislot>=5573)&&(<var.ucuncuslot>=5573)) || ((<var.ikincislot>=5573)&&(<var.ucuncuslot>=5573))
5573ikili
return 1
endif

if (<var.birincislot>=5587) && (<var.ikincislot>=5587) && (<var.ucuncuslot>=5587)
5587kazan
return 1
elseif ((<var.birincislot>=5587)&&(<var.ikincislot>=5587)) || ((<var.birincislot>=5587)&&(<var.ucuncuslot>=5587)) || ((<var.ikincislot>=5587)&&(<var.ucuncuslot>=5587))
5587ikili
return 1
endif

var.slottxt Malesef kazanamadiniz...
sysmessage @0790 Kaybettiniz.
DIALOG d_slot_machine
return 1

[function 5545kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 100

[function 5545ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 200

[function 5557kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 300

[function 5557ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 400

[function 5563kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 500

[function 5563ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 600

[function 5569kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 700

[function 5569ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 50

[function 5573kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 70

[function 5573ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 407

[function 5587kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 600

[function 5587ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 30

[DIALOG d_slot_machine]
130,80
nomove
noclose
resizepic 0 0 5100 340 235
resizepic 10 10 307900 320 215
gumppic 0790 45 <eval <var.birincislot>>
gumppic 140 45 <eval <var.ikincislot>>
gumppic 230 45 <eval <var.ucuncuslot>>
dtext 85 120 0 <var.slottxt>
button 100 10790 2714 2715 1 0 1
dtext 125 10790 0 Tekrar Dene
button 100 175 2714 2715 1 0 0
dtext 125 175 0 bitir

[DIALOG d_slot_machine TEXT]

[DIALOG d_slot_machine BUTTON]
ONBUTTON=0
ONBUTTON=1
slot_oyna

[function biletver]
sfx 489
sysmessage @60 <argn> Bilet Kazandiniz.
effect 3,0376a,1,30,1
newitem i_fctn_silver
new.amount <argn>
new.bounce


[function kumar]
src.slot_oyna
DIALOGCLOSE d_slot_machine
return 1

[PLEVEL 1]
kumar

[EOF]

// scriptleri code içersine alın.


Bu konu Slothere tarafından düzenlendi(2009-05-08 12:47, 14 yıl önce)
Size sorunsuz bir script sundum umarım işinize yarar.
:asik2


[itemdef i_slot_machine]
name Slot Machine
id i_grave_stone
type t_normal
weight 3000

On=@Create
attr attr_move_never
color 0846

on=@click
message
message @0481 slot machine
message @0482 (katilim: 1k)
return 1

on=@dclick
src.dialog d_slot_dialog
return 1

[DIALOG d_slot_dialog]			// Main
160,80					// Position
nomove
noclose
resizepic 0 0 5100 275 200		// Curved Grey background 
resizepic 10 10 3500 255 180		// Curved White background 
dtext 65 30 1000 SLOT MACHINE
dtext 55 55 900 Oynamak icin tiklayin.
dtext 54 75 950 ( Bir oyun: 1 k sp )
button 100 105 5571 5572 1 0 1		// basla
button 242 18 3 4 1 0 0

[DIALOG d_slot_dialog BUTTON]
ONBUTTON=0
ONBUTTON=1
slot_oyna

[function slot_oyna]
if (<findid.i_slot_timer>)
sysmessage @50 biraz bekleyin.
return 1
endif
if (<SRC.RESTEST 1000 i_fctn_silver>)
CONSUME 1000 i_fctn_silver
update
elseif (<sp> >= 1000)
spconsume 1000
update
else
sysmessage @50 Bu oyun icin 1k sp gerekiyor.
return 1
endif
newitem i_slot_timer
new.equip
return 1

[itemdef i_slot_timer]
name slot timer
id i_memory
type t_eq_script
weight 0

on=@create
attr attr_invis | attr_decay

on=@equip
timer 3
src.sfx 556
src.sysmessage @55 kolu cektiniz.

on=@unequip
cont.slotmachine

on=@timer
attr attr_decay
remove

[function slotmachine]
dorand 7
var.birincislot 5545
var.birincislot 5557
var.birincislot 5557
var.birincislot 5563
var.birincislot 5569
var.birincislot 5573
var.birincislot 5587
enddo
dorand 7
var.ikincislot 5545
var.ikincislot 5557
var.ikincislot 5557
var.ikincislot 5563
var.ikincislot 5569
var.ikincislot 5573
var.ikincislot 5587
enddo
dorand 7
var.ucuncuslot 5545
var.ucuncuslot 5557
var.ucuncuslot 5557
var.ucuncuslot 5563
var.ucuncuslot 5569
var.ucuncuslot 5573
var.ucuncuslot 5587
enddo

if (<var.birincislot>=5545) && (<var.ikincislot>=5545) && (<var.ucuncuslot>=5545)
5545kazan
return 1
elseif ((<var.birincislot>=5545)&&(<var.ikincislot>=5545)) || ((<var.birincislot>=5545)&&(<var.ucuncuslot>=5545)) || ((<var.ikincislot>=5545)&&(<var.ucuncuslot>=5545))
5545ikili
return 1
endif

if (<var.birincislot>=5557) && (<var.ikincislot>=5557) && (<var.ucuncuslot>=5557)
5557kazan
return 1
elseif ((<var.birincislot>=5557)&&(<var.ikincislot>=5557)) || ((<var.birincislot>=5557)&&(<var.ucuncuslot>=5557)) || ((<var.ikincislot>=5557)&&(<var.ucuncuslot>=5557))
5557ikili
return 1
endif

if (<var.birincislot>=5563) && (<var.ikincislot>=5563) && (<var.ucuncuslot>=5563)
5563kazan
return 1
elseif ((<var.birincislot>=5563)&&(<var.ikincislot>=5563)) || ((<var.birincislot>=5563)&&(<var.ucuncuslot>=5563)) || ((<var.ikincislot>=5563)&&(<var.ucuncuslot>=5563))
5563ikili
return 1
endif

if (<var.birincislot>=5569) && (<var.ikincislot>=5569) && (<var.ucuncuslot>=5569)
5569kazan
return 1
elseif ((<var.birincislot>=5569)&&(<var.ikincislot>=5569)) || ((<var.birincislot>=5569)&&(<var.ucuncuslot>=5569)) || ((<var.ikincislot>=5569)&&(<var.ucuncuslot>=5569))
5569ikili
return 1
endif

if (<var.birincislot>=5573) && (<var.ikincislot>=5573) && (<var.ucuncuslot>=5573)
5573kazan
return 1
elseif ((<var.birincislot>=5573)&&(<var.ikincislot>=5573)) || ((<var.birincislot>=5573)&&(<var.ucuncuslot>=5573)) || ((<var.ikincislot>=5573)&&(<var.ucuncuslot>=5573))
5573ikili
return 1
endif

if (<var.birincislot>=5587) && (<var.ikincislot>=5587) && (<var.ucuncuslot>=5587)
5587kazan
return 1
elseif ((<var.birincislot>=5587)&&(<var.ikincislot>=5587)) || ((<var.birincislot>=5587)&&(<var.ucuncuslot>=5587)) || ((<var.ikincislot>=5587)&&(<var.ucuncuslot>=5587))
5587ikili
return 1
endif

var.slottxt Malesef kazanamadiniz...
sysmessage @50 Kaybettiniz. Bidahaki sefere
DIALOG d_slot_machine
return 1

[function 5545kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 5000

[function 5545ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 2000

[function 5557kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 3000

[function 5557ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 700

[function 5563kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 5500

[function 5563ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 1100

[function 5569kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 6000

[function 5569ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 1200

[function 5573kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 6500

[function 5573ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 1300

[function 5587kazan]
var.slottxt Hepsi ayni, kazandiniz!
dialog d_slot_machine
biletver 7000

[function 5587ikili]
var.slottxt ikisi ayni, kazandiniz!
dialog d_slot_machine
biletver 1400

[DIALOG d_slot_machine]
130,80
nomove
noclose
resizepic 0 0 5100 340 235
resizepic 10 10 3500 320 215
gumppic 50 45 <eval <var.birincislot>>
gumppic 140 45 <eval <var.ikincislot>>
gumppic 230 45 <eval <var.ucuncuslot>>
dtext 85 120 0 <var.slottxt>
button 100 150 2714 2715 1 0 1
dtext 125 150 0 tekrar dene
button 100 175 2714 2715 1 0 0
dtext 125 175 0 bitir

[DIALOG d_slot_machine TEXT]

[DIALOG d_slot_machine BUTTON]
ONBUTTON=0
ONBUTTON=1
slot_oyna

[function biletver]
sfx 489
sysmessage @60 <argn> bilet kazandiniz.
effect 3,0376a,1,30,1
newitem i_fctn_silver
new.amount <argn>
new.bounce
endif

[Plevel 1]
qumar

[function qumar]
src.say @0823,3 Kumar Makro.
if (<findid.i_slot_timer>)
sysmessage @50 Biraz bekleyin.
return 1
endif
if (<SRC.RESTEST 1000 i_fctn_silver>)
CONSUME 1000 i_fctn_silver
update
elseif (<sp> >= 1000)
spconsume 1000
update
else
sysmessage @50 Bu oyun icin 1k sp gerekiyor.
return 1
endif
newitem i_slot_timer
new.equip
return 1

[EOF]
Tamam Yapdım. Ama Ginede Teşekkür Ederim.
1k sp nedir acaba?
1000 adet silver piece :)
K = X * 1 000
M= X * 1 000 000
B= X * 1 000 000 000

gidiyor işte :)
Rica ederim..
:asik2

Üye Ol veya Giriş Yap

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