Anti-Macro

• Xearth
• 2010-05-16 15:18
• 0 Yorumlar
• 2073 Görüntüleme

Incription skill kasarken adam 30 40 dk sora ekranına menü gelir güvenlik kodunu girmez ise skill kastırmaya , kullanmaya izin vermez güvenlik kodu yanlış girer ise oyundan atar. doğru girer ise skill kasmaya dewam eder.



[Skill 23]

DEFNAME=Skill_Inscription

KEY=Inscription

TITLE=Scribe

PROMPT_MSG=

DELAY=1.0,1.0

STAT_STR=15

STAT_INT=100

STAT_DEX=15

BONUS_STR=0

BONUS_DEX=0

BONUS_INT=100

BONUS_STATS=10

ADV_RATE=10.0,10.0,10.0

VALUES=1,30,200



ON=@Fail

src.sysmessage @027,1,1 Malzemeniz Heba Oldu.

src.consume 1 i_scroll_blank

if (<src.mana> > 5

src.mana (<src.mana> - 5)

else

src.mana 1

endif



on=@success

src.ctag.yapilan ++

if (<src.ctag0.yapilan> > 300) && !(<src.isdialogopen d_anti_macro>)

sdialog d_anti_macro

endif



on=@start

if (<src.isdialogopen d_anti_macro>)

src.sysmessage @1153,,1 Ekrandaki güvenlik kodunu girmeden inscription becerisini kullanamazsınız.

return 1

endif







Dialog ; 



[dialog d_anti_macro]

0,0

nomove

noclose



resizepic 0 0 3500 200 130

resizepic 10 10 3000 180 110



src.ctag.sifrerakam <r1 , 10000>

src.ctag.sifre <dctag.sifrerakam>



dhtmlgump 65 15 70 20 0 0 <def.bfont_red><def.u>Anti</u>-<def.u>Macro</U>

dhtmlgump 20 40 150 20 0 0 <def.bfont_dgreen><def.u>Güvenlik</u> <def.u>Kodu</U> ; <def.bfont_dblue><dctag.sifre>

dhtmlgump 40 95 150 20 0 0 <def.bfont_dgray>Güvenlik kodunu girdim.



resizepic 20 64 3000 160 25

dtextentry 22 68 195 35 07d4 1



button 20 95 55 56 1 0 1



[dialog d_anti_macro button]

on=1

if (strlen(<Dargtxt[1]>) > 5) || (strlen(<Dargtxt[1]>) < 2)

src.sysmessage @38,,1 Güvenlik şifresi en az 3, en fazla 5 karakter olabilir.

sdialog d_anti_macro

return 1

elseif (strmatch('<Dargtxt[1]>','')

src.sysmessage @38,,1 Lütfen güvenlik şifresini giriniz.

sdialog d_anti_macro

return 1

elseif !(<isnum <DARGTXT[1]>>)

src.sysmessage @38,,1 Güvenlik kodu sadece rakam olmalidir.

sdialog d_anti_macro

return 1

endif



local.guvenlik <dargtxt[1]>

if (strmatch('<dctag.sifre>','<dargtxt[1]>')

src.sysmessage @1153,,1 Tebrikler güvenlik kodunu girdiniz..

src.ctag.yapilan=0

return 1

endif



if !(strmatch('<dctag.sifre>','<argtxt[1]>')

src.sysmessage @1153,,1 Güvenlik kodu yanliş.

src.disconnect

return 1

endif

Değerlendirmeler

Total votes: 0