Bilinmiyor -  27-07-2009 01:23
Kod:
//////////////////////////////Account Sistemi//////////////////

[FUNCTION account]
SRC.DIALOG d_accountsistemionayla
SRC.SYSMESSAGE @38 DIKKAT!!!  Account password un sadece rakamlardan olusmasi sifrenin random hale gelmesini saglar
SRC.SYSMESSAGE @38 ve de koydugunuz rakam sayisi kadar bunlarin icinde harfde dahil olarak random bir sifre uretir.

[DIALOG d_accountsistemionayla]
75, 75
PAGE 0
nomove
resizepic 0 0 3600 217 130
resizepic 16 14 2620 185 100
text 47 26 162 0
button 25 25 210 211 1 0 1
text 47 51 162 1
button 25 50 210 211 1 0 2
text 47 75 162 2
button 25 75 210 211 1 0 3

[DIALOG d_accountsistemionayla BUTTON]mç 
ON=1
if (<src.account.plevel><4)
SRC.SYSMESSAGE Bu Bolume Girmeye Yetkili Degilsiniz.
RETURN 1
else
DIALOG d_accountacsil
endif
ON=2
dialog d_accountbanla
ON=3
if (<src.account.plevel><6)
SRC.SYSMESSAGE Bu Bolume Girmeye Yetkili Degilsiniz.
return 1
else
dialog d_accountpriv
endif

[DIALOG d_accountsistemionayla TEXT]
Account Ac-Sil
Banla-Ban Ac
Priv Ayarlari


[DIALOG D_accountacsil]
75, 75
PAGE 0
nomove
noclose
resizepic 0 0 3600 300 300
resizepic 16 14 2620 270 270
resizepic 21 22 3500 260 40
resizepic 103 106 2440 200
resizepic 103 140 2440 200
resizepic 103 173 2440 200
text 51 31 1250 0
text 49 30 32 1
text 29 108 162 2
text 29 142 162 3
text 29 175 162 4
text 40 258 32 5
text 50 205 32 6
text 165 205 32 7
text 110 235 32 8
button 25 205 210 211 1 0 0
button 255 205 210 211 1 0 1
button 155 235 210 211 1 0 2
textentry 108 109 253 25 162 0 9
textentry 108 143 253 25 162 1 10
textentry 108 176 253 25 162 2 11

[DIALOG D_accountacsil TEXT]
<SRC.SERV.servNAME> Account Sistemi
<SRC.SERV.servNAME> Account Sistemi
Acc. Name:
Password:
Acc. Sil:
<serv.servname> Account System
Account Ac
Account Sil
Kapat
<SRC.TAG.accusername>
<SRC.TAG.accpassword>
<SRC.TAG.accsil>

[DIALOG D_accountacsil BUTTON]
ON=0
SRC.TAG.accusername=<ARGTXT[0]>
SRC.TAG.accpassword=<ARGTXT[1]>
SERV.ACCOUNT ADD <SRC.TAG.accusername> <SRC.TAG.accpassword>
SERV.ACCOUNT UPDATE
SRC.SYSMESSAGE <SRC.TAG.accusername> account adi.  <SRC.TAG.accpassword>  sifresiyle <serv.SERVNAME> kullanici hesaplarina eklendi.
ON=1
SRC.TAG.accsil=<ARGTXT[2]>
SERV.ACCOUNT <SRC.TAG.accsil> delete
SERV.ACCOUNT UPDATE
SRC.SYSMESSAGE <SRC.TAG.accsil>   isimli account <SRC.SERVNAME> kullanici hesaplarindan silindi.
ON=2
RETURN 1

[DIALOG D_accountbanla]
75, 75
PAGE 0
nomove
noclose
resizepic 0 0 3600 300 300
resizepic 16 14 2620 270 270
resizepic 21 22 3500 260 40
resizepic 103 106 2440 200
text 51 31 1250 0
text 49 30 32 1
text 29 108 162 2
text 40 258 32 3
text 50 205 32 4
text 160 205 32 5
text 110 235 32 6
button 25 205 210 211 1 0 0
button 255 205 210 211 1 0 1
button 155 235 210 211 1 0 2
textentry 108 109 253 25 162 0 7

[DIALOG D_accountbanla TEXT]
<SRC.SERVNAME> Account Sistemi
<SRC.SERVNAME> Account Sistemi
Acc. Name:
<serv.servname> Account System
Acc. Banla
Acc. Ban Ac
Kapat
<SRC.TAG.accusername>


[DIALOG D_accountbanla BUTTON]
ON=0
<SRC.TAGaccusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> block 1
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <SERV.servNAME> hesaplarindan yasaklandi.
ON=1
<SRC.TAGaccusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> block 0
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adinin <SRC.SERV.servNAME> hesaplarindaki yasagi kaldirildi.
ON=2
RETURN 1

[DIALOG D_accountpriv]
75, 75
PAGE 0
nomove
noclose
resizepic 0 0 3600 300 300
resizepic 16 14 2620 270 270
resizepic 21 22 3500 260 40
resizepic 103 106 2440 200
text 51 31 1250 0
text 49 30 32 1
text 26 108 162 2
text 48 138 32 3
text 48 168 32 4
text 48 198 32 5
text 185 138 32 6
text 195 168 32 7
text 195 198 32 8
text 40 258 32 9
text 110 235 32 10
button 155 235 210 211 1 0 0
button 26 138 210 211 1 0 1
button 26 168 210 211 1 0 2
button 26 198 210 211 1 0 3
button 255 138 210 211 1 0 4
button 255 168 210 211 1 0 5
button 255 198 210 211 1 0 6
textentry 110 109 253 25 162 0 11

[DIALOG D_accountpriv TEXT]
<SRC.SERV.servNAME> Account Sistemi
<SRC.SERV.servNAME> Account Sistemi
Acc. Name:
Counselor
Seer
GM
Developer
Admin
Owner
<serv.servname> Account System
Kapat
<SRC.TAG.accusername>

[DIALOG D_accountpriv BUTTON]
ON=0
RETURN 1
ON=1
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> plevel 2
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <SRC.SERV.servNAME> hesaplarinda Counselor yetkisine sahip oldu.

ON=2
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> plevel 3
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <SRC.serv.SERVNAME> hesaplarinda Seer yetkisine sahip oldu.

ON=3
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> plevel 4
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <src.serv.servname> hesaplarinda GM yetkisine sahip oldu.

ON=4
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <src.tag.accusername> plevel 5
serv.account update
SRC.SYSMESSAGE <src.tag.accusername>  isimli account adi <src.serv.servname> hesaplarinda Developer yetkisine sahip oldu.

ON=5
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> plevel 6
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <src.serv.servname> hesaplarinda Admin yetkisine sahip oldu.

ON=6
<SRC.TAG.accusername>=<ARGTXT[0]>
serv.account <SRC.TAG.accusername> plevel 7
serv.account update
SRC.SYSMESSAGE <SRC.TAG.accusername>  isimli account adi <src.serv.servname> hesaplarinda Owner yetkisine sahip oldu.

YORUMLAR (0)

Henüz yorum yapılmamış.

BENZER SAYFALAR