unutmadan, pinin ilk karakteri 0 olamaz.
gördüğünüz gibi playerların nerede pin kodu sorulacağına karar vermesini sağlıyor. sistemin aktif olması için scriptlerinizde bikaç değişiklik yapmanız gerekli, aşağıda açıklıyorum neler yapacağınızı.
pin kodunu kayıt sırasında web üzerinden alınmak üzere tasarlamıştım. isterseniz kendi dialogunuzu yazarsınız.
scriptlerinizde yapmanız gereken değişiklikler:
speech/jobbanker.scp'de, ON=*Bank* altındaki SRC.BANKSELF kodunun üstüne şunu ekleyin:
Kod:
IF (<SRC.ACCOUNT.TAG0.PIN>) && !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_BANK>)
SRC.TAG.PIN.KOMUT=SRC.BANKSELF
SDIALOG d_pinkodu
RETURN 1
ENDIF
SRC.TAG.PIN.KOMUT=SRC.BANKSELF
SDIALOG d_pinkodu
RETURN 1
ENDIF
page dialogunuzun açılmasından önce bunu ekleyin:
Kod:
IF (<SRC.ACCOUNT.TAG0.PIN>) && !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_PAGE>)
SRC.TAG.PIN.KOMUT=SDIALOG (PAGE DIALOGUNUZUN ID'SI)
SDIALOG d_pinkodu
RETURN 1
ENDIF
SRC.TAG.PIN.KOMUT=SDIALOG (PAGE DIALOGUNUZUN ID'SI)
SDIALOG d_pinkodu
RETURN 1
ENDIF
ev tabelalarının @dclick triggerının en üst kısmına şunu ekleyin:
Kod:
IF !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_HOUSE>) && (<SRC.ACCOUNT.TAG0.PIN>)
SRC.TAG.PIN.KOMUT=SRC.DCLICK <UID>
SDIALOG d_pinkodu
RETURN 1
ENDIF
SRC.TAG.PIN.KOMUT=SRC.DCLICK <UID>
SDIALOG d_pinkodu
RETURN 1
ENDIF
@login triggerına:
Kod:
IF (<ACCOUNT.TAG0.PIN>) && !(<CTAG0.GIRILENPIN>) && (<ACCOUNT.TAG0.PIN_LOGIN>)
TAG.PIN.KOMUT=SYSMESSAGE @,,1 Pin kodu kabul edildi.
TAG.PIN.KOMUT2=1
SDIALOG d_pinkodu
ENDIF
TAG.PIN.KOMUT=SYSMESSAGE @,,1 Pin kodu kabul edildi.
TAG.PIN.KOMUT2=1
SDIALOG d_pinkodu
ENDIF
varsa .skilldusur komutunuzun en üstüne:
Kod:
IF (<SRC.ACCOUNT.TAG0.PIN>) && !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_SKILLD>)
SRC.TAG.PIN.KOMUT=SDIALOG d_skilldusur
SDIALOG d_pinkodu
RETURN 1
ENDIF
SRC.TAG.PIN.KOMUT=SDIALOG d_skilldusur
SDIALOG d_pinkodu
RETURN 1
ENDIF
Kod:
[DIALOG d_pinkodu]
100,100
nomove
noclose
page 0
resizepic 0 0 5054 150 360
gumppictiled 10 10 130 20 2624
checkertrans 10 10 130 20
dtext 18 8 1153 Pin Kodunuzu Girin
gumppictiled 10 40 130 170 2624
checkertrans 10 40 130 170
dtext 25 42 1153 1
button 21 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 1
dtext 70 42 1153 2
button 66 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 2
dtext 115 42 1153 3
button 111 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 3
dtext 25 82 1153 4
button 21 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 4
dtext 70 82 1153 5
button 66 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 5
dtext 115 82 1153 6
button 111 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 6
dtext 25 122 1153 7
button 21 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 7
dtext 70 122 1153 8
button 66 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 8
dtext 115 122 1153 9
button 111 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 9
dtext 70 162 1153 0
button 66 180 <QVAL (<SRC.CTAG0.GIRILENPIN>) ? <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> : 2715> 2715 <QVAL (<SRC.CTAG0.GIRILENPIN>) ? <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> : 0> 0 10
gumppictiled 10 220 130 20 2624
checkertrans 10 220 130 20
IF (<SRC.CTAG0.GIRILENPIN>)
FOR <EVAL (STRLEN(<SRC.CTAG.GIRILENPIN>)) - 1>
dtext <EVAL (<LOCAL._FOR> * 10) + 45> 220 1153 *
ENDFOR
ENDIF
gumppictiled 10 250 130 100 2624
checkertrans 10 250 130 100
dtext 60 260 1153 Reset
button 25 258 <QVAL <SRC.CTAG0.GIRILENPIN> ? 4015 : 4014> 4014 <QVAL <SRC.CTAG0.GIRILENPIN> ? 1 : 0> 0 11
dtext 60 290 1153 Giriş
button 25 288 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) == 5) ? 4006 : 4005> 4005 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) == 5) ? 1 : 0> 0 12
dtext 60 320 1153 İptal
button 25 318 4018 4017 1 0 0
[DIALOG d_pinkodu BUTTON]
ON=0
SRC.CTAG.GIRILENPIN=
SRC.TAG.PIN.KOMUT=
IF (<TAG0.PIN.KOMUT2>)
TAG.PIN.KOMUT2=
SENDPACKET 0d1 01
ENDIF
ON=1 9
SRC.CTAG.GIRILENPIN .= <ARGN1>
SDIALOG d_pinkodu
ON=10
SRC.CTAG.GIRILENPIN <SRC.CTAG.GIRILENPIN>0
SDIALOG d_pinkodu
ON=11
SRC.CTAG.GIRILENPIN=
SDIALOG d_pinkodu
ON=12
SRC.CTAG.GIRILENPIN=<STRSUB 1 4 <SRC.CTAG.GIRILENPIN>>
IF (STRMATCH(<SRC.CTAG.GIRILENPIN>,<SRC.ACCOUNT.TAG.PIN>))
<SRC.TAG.PIN.KOMUT>
ELSE
SRC.SYSMESSAGE @,,1 PIN kodu yanlış.
SRC.CTAG.GIRILENPIN=
IF (<TAG0.PIN.KOMUT2>)
TAG.PIN.KOMUT2=
SENDPACKET 0d1 01
ENDIF
ENDIF
SRC.TAG.PIN.KOMUT=
[FUNCTION pin]
IF (<SRC.ACCOUNT.TAG0.PIN>) && !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_PINMENU>)
SRC.TAG.PIN.KOMUT=SDIALOG d_pinmenu
SDIALOG d_pinkodu
RETURN 1
ENDIF
SDIALOG d_pinmenu
[DIALOG d_pinmenu]
100,100
nomove
resizepic 0 0 5054 250 300
gumppictiled 10 10 230 280 2624
checkertrans 10 10 230 280
dtext 50 20 55 <SERV.NAME> Pin Kodu Ayarları
dtext 30 50 1153 Pin kodu sorulacak yerleri seçin.
checkbox 30 80 2714 2715 <ACCOUNT.TAG0.PIN_BANK> 1
dtext 55 80 1153 Banka
checkbox 30 105 2714 2715 <ACCOUNT.TAG0.PIN_PAGE> 2
dtext 55 105 1153 GM Page
checkbox 30 130 2714 2715 <ACCOUNT.TAG0.PIN_HOUSE> 3
dtext 55 130 1153 Ev Menüsü
checkbox 30 155 2714 2715 <ACCOUNT.TAG0.PIN_PINMENU> 4
dtext 55 155 1153 Pin Kodu Ayarları Menüsü
checkbox 30 180 2714 2715 <ACCOUNT.TAG0.PIN_LOGIN> 5
dtext 55 180 1153 Login
checkbox 30 205 2714 2715 <ACCOUNT.TAG0.PIN_SKILLD> 6
dtext 55 205 1153 Yetenek Düşürme
button 80 255 4006 4005 1 0 1
dtext 115 257 1153 Ayarla
[DIALOG d_pinmenu BUTTON]
ON=1
TRY ACCOUNT.TAG.PIN_BANK=<ARGCHK[1]>
TRY ACCOUNT.TAG.PIN_PAGE=<ARGCHK[2]>
TRY ACCOUNT.TAG.PIN_HOUSE=<ARGCHK[3]>
TRY ACCOUNT.TAG.PIN_PINMENU=<ARGCHK[4]>
TRY ACCOUNT.TAG.PIN_LOGIN=<ARGCHK[5]>
TRY ACCOUNT.TAG.PIN_SKILLD=<ARGCHK[6]>
SYSMESSAGE @,,1 Pin kodu ayarlarınız kaydedildi.
100,100
nomove
noclose
page 0
resizepic 0 0 5054 150 360
gumppictiled 10 10 130 20 2624
checkertrans 10 10 130 20
dtext 18 8 1153 Pin Kodunuzu Girin
gumppictiled 10 40 130 170 2624
checkertrans 10 40 130 170
dtext 25 42 1153 1
button 21 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 1
dtext 70 42 1153 2
button 66 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 2
dtext 115 42 1153 3
button 111 60 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 3
dtext 25 82 1153 4
button 21 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 4
dtext 70 82 1153 5
button 66 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 5
dtext 115 82 1153 6
button 111 100 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 6
dtext 25 122 1153 7
button 21 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 7
dtext 70 122 1153 8
button 66 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 8
dtext 115 122 1153 9
button 111 140 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> 2715 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> 0 9
dtext 70 162 1153 0
button 66 180 <QVAL (<SRC.CTAG0.GIRILENPIN>) ? <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 2714 : 2715> : 2715> 2715 <QVAL (<SRC.CTAG0.GIRILENPIN>) ? <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) < 5) ? 1 : 0> : 0> 0 10
gumppictiled 10 220 130 20 2624
checkertrans 10 220 130 20
IF (<SRC.CTAG0.GIRILENPIN>)
FOR <EVAL (STRLEN(<SRC.CTAG.GIRILENPIN>)) - 1>
dtext <EVAL (<LOCAL._FOR> * 10) + 45> 220 1153 *
ENDFOR
ENDIF
gumppictiled 10 250 130 100 2624
checkertrans 10 250 130 100
dtext 60 260 1153 Reset
button 25 258 <QVAL <SRC.CTAG0.GIRILENPIN> ? 4015 : 4014> 4014 <QVAL <SRC.CTAG0.GIRILENPIN> ? 1 : 0> 0 11
dtext 60 290 1153 Giriş
button 25 288 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) == 5) ? 4006 : 4005> 4005 <QVAL (STRLEN(<SRC.CTAG.GIRILENPIN>) == 5) ? 1 : 0> 0 12
dtext 60 320 1153 İptal
button 25 318 4018 4017 1 0 0
[DIALOG d_pinkodu BUTTON]
ON=0
SRC.CTAG.GIRILENPIN=
SRC.TAG.PIN.KOMUT=
IF (<TAG0.PIN.KOMUT2>)
TAG.PIN.KOMUT2=
SENDPACKET 0d1 01
ENDIF
ON=1 9
SRC.CTAG.GIRILENPIN .= <ARGN1>
SDIALOG d_pinkodu
ON=10
SRC.CTAG.GIRILENPIN <SRC.CTAG.GIRILENPIN>0
SDIALOG d_pinkodu
ON=11
SRC.CTAG.GIRILENPIN=
SDIALOG d_pinkodu
ON=12
SRC.CTAG.GIRILENPIN=<STRSUB 1 4 <SRC.CTAG.GIRILENPIN>>
IF (STRMATCH(<SRC.CTAG.GIRILENPIN>,<SRC.ACCOUNT.TAG.PIN>))
<SRC.TAG.PIN.KOMUT>
ELSE
SRC.SYSMESSAGE @,,1 PIN kodu yanlış.
SRC.CTAG.GIRILENPIN=
IF (<TAG0.PIN.KOMUT2>)
TAG.PIN.KOMUT2=
SENDPACKET 0d1 01
ENDIF
ENDIF
SRC.TAG.PIN.KOMUT=
[FUNCTION pin]
IF (<SRC.ACCOUNT.TAG0.PIN>) && !(<SRC.CTAG0.GIRILENPIN>) && (<SRC.ACCOUNT.TAG0.PIN_PINMENU>)
SRC.TAG.PIN.KOMUT=SDIALOG d_pinmenu
SDIALOG d_pinkodu
RETURN 1
ENDIF
SDIALOG d_pinmenu
[DIALOG d_pinmenu]
100,100
nomove
resizepic 0 0 5054 250 300
gumppictiled 10 10 230 280 2624
checkertrans 10 10 230 280
dtext 50 20 55 <SERV.NAME> Pin Kodu Ayarları
dtext 30 50 1153 Pin kodu sorulacak yerleri seçin.
checkbox 30 80 2714 2715 <ACCOUNT.TAG0.PIN_BANK> 1
dtext 55 80 1153 Banka
checkbox 30 105 2714 2715 <ACCOUNT.TAG0.PIN_PAGE> 2
dtext 55 105 1153 GM Page
checkbox 30 130 2714 2715 <ACCOUNT.TAG0.PIN_HOUSE> 3
dtext 55 130 1153 Ev Menüsü
checkbox 30 155 2714 2715 <ACCOUNT.TAG0.PIN_PINMENU> 4
dtext 55 155 1153 Pin Kodu Ayarları Menüsü
checkbox 30 180 2714 2715 <ACCOUNT.TAG0.PIN_LOGIN> 5
dtext 55 180 1153 Login
checkbox 30 205 2714 2715 <ACCOUNT.TAG0.PIN_SKILLD> 6
dtext 55 205 1153 Yetenek Düşürme
button 80 255 4006 4005 1 0 1
dtext 115 257 1153 Ayarla
[DIALOG d_pinmenu BUTTON]
ON=1
TRY ACCOUNT.TAG.PIN_BANK=<ARGCHK[1]>
TRY ACCOUNT.TAG.PIN_PAGE=<ARGCHK[2]>
TRY ACCOUNT.TAG.PIN_HOUSE=<ARGCHK[3]>
TRY ACCOUNT.TAG.PIN_PINMENU=<ARGCHK[4]>
TRY ACCOUNT.TAG.PIN_LOGIN=<ARGCHK[5]>
TRY ACCOUNT.TAG.PIN_SKILLD=<ARGCHK[6]>
SYSMESSAGE @,,1 Pin kodu ayarlarınız kaydedildi.
Yorumlar
Henüz yorum yapılmamıştır.
|
OylamalarOylama :
Üyelerin oylama ortalaması (10 dışında) : Henüz Oylanmamış
Oylar: 0 |
Benzer Sayfalar
| Sayfalar | Yorumlar | Gönderen | Tarih |
| Guild sistemi | 0 | Mrs.xariyla | 04-03-2012 |
| House sistemi | 0 | Mrs.xariyla | 04-03-2012 |
| Maaş Sistemi | 0 | Kraagnar | 17-11-2011 |
| Flash üyelik sistemi | 0 | Culum | 25-09-2011 |
| Sorter Account Sistemi | 0 | Sorter | 23-07-2011 |
