|
İçerde : 1 misafir, 0 üye : ---
|
[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
if !(<rakamkontrol <argtxt[0]>>)
src.sysmessage Yalnizca rakam girebilirsiniz.
return 1
src.newitem i_bottle_empty
new.amount <argtxt[0]>
src.act.bounce
[dialog d_siseler button]
on 1
src.sysmessage @1153 Vazgectiniz.
on 2
src.function f_rakamkontrol
[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
src.sysmessage @038,,1 Rakam girmediniz.
return 1
else
IF (strlen(<argtxt[2]>) < 1) || (strlen(<argtxt[2]>) > 3)
src.sysmessage @038,,1 Satin almak icin en az 1 en fazla 3 rakam yaziniz.
return 1
else
src.newitem i_bottle_empty
new.amount <argtxt[0]>
src.act.bounce
endif
dtextentry 155 225 28 20 990 1 0
dtextentrylimited 155 225 28 20 990 0 3
[dialog d_siseler button]
on 0
src.sysmessage @1153 Vazgectiniz.
on 1
if !(<rakamkontrol <argtxt[0]>>)
src.sysmessage Yalnizca rakam girebilirsiniz.
return 1
else
src.newitem i_bottle_empty
new.amount <argtxt[0]>
src.act.bounce
endif
[dialog d_siseler button]
on 1
src.sysmessage @1153 Vazgectiniz.
on 2
if (<rakamkontrol <argtxt[0]>>)
src.sysmessage @38,,1 Yalnizca rakam girebilirsiniz.
return 1
else
src.newitem i_bottle_empty
new.amount <argtxt[0]>
src.act.bounce
endif
[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
on 1
if !(<rakamkontrol <argtxt[0]>>)
[CHARDEF 0490]
DEFNAME=C_H_ALCHEMIST
NAME=#NAMES_HUMANMALE the Alchemist
ID=C_MAN
DESIRES=i_gold,e_notoriety,t_magic
AVERSIONS=t_TRAP,t_eerie_stuff
TSPEECH=spk_human_prime
TSPEECH=jobalchemist
TSPEECH=spk_shopkeep
TSPEECH=spk_needs
TSPEECH=spk_rehello
TSPEECH=spk_human_default
TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_ConvInit
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Needs
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ
CATEGORY=Civilized
SUBSECTION=Tradesmen
DESCRIPTION=Alchemist (male)
ON=@Create
NPC=brain_vendor
COLOR=colors_skin
STR={36 50}
DEX={36 50}
INT={51 65}
ALCHEMY={55.0 78.0}
TasteID={55.0 78.0}
WRESTLING={15.0 38.0}
MAGICRESISTANCE={25.0 48.0}
TACTICS={15.0 38.0}
POISONING={35.0 55.0}
ITEMNEWBIE=random_male_hair
COLOR=colors_hair
ITEMNEWBIE=random_facial_hair
COLOR=match_hair
ON=@Dclick
src.dialog d_siseler
return 1
ON=@NPCRestock
ITEM=RANDOM_LIGHT
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_pants
COLOR=colors_all
ITEM=i_robe
COLOR=colors_red
ITEM=random_shoes
COLOR=colors_neutral
ITEM=random_coin_purse
SELL=VENDOR_S_ALCHEMIST
BUY=VENDOR_B_ALCHEMIST
[CHARDEF 0491]
DEFNAME=C_H_ALCHEMIST_F
NAME=#NAMES_HUMANFEMALE the Alchemist
ID=C_WOMAN
DESIRES=i_gold,e_notoriety,t_magic
AVERSIONS=t_TRAP,t_eerie_stuff
TSPEECH=spk_human_prime
TSPEECH=jobalchemist
TSPEECH=spk_shopkeep
TSPEECH=spk_needs
TSPEECH=spk_rehello
TSPEECH=spk_human_default
TEVENTS=e_Human_HearUnk
TEVENTS=e_Human_Needs
TEVENTS=e_Human_ConvInit
TEVENTS=e_Human_Greet
TEVENTS=e_Human_Space
TEVENTS=e_Human_Refuse
TEVENTS=e_Human_Environ
CATEGORY=Civilized
SUBSECTION=Tradesmen
DESCRIPTION=Alchemist (female)
ON=@Create
NPC=brain_vendor
COLOR=colors_skin
STR={36 50}
DEX={36 50}
INT={51 65}
ALCHEMY={55.0 78.0}
TasteID={55.0 78.0}
WRESTLING={15.0 38.0}
MAGICRESISTANCE={25.0 48.0}
TACTICS={15.0 38.0}
POISONING={35.0 55.0}
ITEMNEWBIE=random_female_hair
COLOR=colors_hair
ON=@NPCRestock
ITEM=RANDOM_LIGHT
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_pants
COLOR=colors_all
ITEM=i_robe
COLOR=colors_red
ITEM=random_shoes
COLOR=colors_neutral
ITEM=random_coin_purse
SELL=VENDOR_S_ALCHEMIST
BUY=VENDOR_B_ALCHEMIST
ON=@Dclick
src.dialog d_siseler
return 1
[dialog d_siseler]
0,0
nomove
noclose
resizepic 0 0 83 255 270
resizepic 12 14 3000 230 242
dtextentry 155 225 28 20 990 1
dtext 50 15 0 Alchemist Menu
dtext 15 395 58 <src.sex Bay/Bayan> <src.name> :
dtext 15 420 58 Satilmayan siseleri alchemy yetenegini gelistirerek yapilabilirsiniz.
dtext 40 40 52 Bos sise
dtext 40 60 52 Cure Potion
dtext 40 80 52 Heal Potion
dtext 40 100 52 Poison Potion
dtext 40 120 52 Refresh Potion
dtext 40 140 52 Agility Potion
dtext 40 160 52 Strength Potion
dtext 40 180 52 Nightsight Potion
dtext 40 200 52 Mortar and Pestle
dtext 57 225 0 Kac adet ?
dtext 205 40 52 gp
dtext 205 60 52 gp
dtext 205 80 52 gp
dtext 205 100 52 gp
dtext 205 120 52 gp
dtext 205 140 52 gp
dtext 205 160 52 gp
dtext 205 180 52 gp
dtext 205 200 52 gp
tilepic 165 40 <serv.itemdef.i_bottle_empty.id>
tilepic 158 60 <serv.itemdef.i_potion_Cure.id>
tilepic 156 80 <serv.itemdef.i_potion_Heal.id>
tilepic 162 100 <serv.itemdef.i_potion_Poison.id>
tilepic 153 120 <serv.itemdef.i_potion_Refresh.id>
tilepic 166 140 <serv.itemdef.i_potion_Agility.id>
tilepic 158 160 <serv.itemdef.i_potion_Strength.id>
tilepic 165 180 <serv.itemdef.i_potion_Nightsight.id>
tilepic 165 200 <serv.itemdef.i_Mortar_Pestle.id>
button 224 15 3 4 1 0 1
button 20 44 2224 2224 1 0 2
button 20 64 2224 2224 1 0 3
button 20 84 2224 2224 1 0 4
button 20 104 2224 2224 1 0 5
button 20 124 2224 2224 1 0 6
button 20 144 2224 2224 1 0 7
button 20 164 2224 2224 1 0 8
button 20 184 2224 2224 1 0 9
button 20 204 2224 2224 1 0 10
[dialog d_siseler button]
on 1
src.sysmessage @1153 Vazgectiniz.
on 2
if !(<rakamkontrol <argtxt[1]>>)
src.sysmessage @38,,1 Lütfen rakam giriniz.
return 1
else
src.newitem i_bottle_empty
new.amount <argtxt[1]>
src.act.bounce
endif
[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
i_mini_house
i_mini_house_tower
if (<isempty <argtxt[1]>>)
src.sysmessage Boş bırakamazsınız
return 1
endif
if (<argtxt[1]> == 0)
src.sysmessage Geçerli bir rakam girmediniz.
return 1
endif
on 2
if !(<rakamkontrol <argtxt[1]>>)
src.sysmessage @38,,1 Lutfen rakam giriniz.
return 1
else
src.newitem i_bottle_empty
new.amount <argtxt[1]>
src.act.bounce
endif
[function rakamkontrol]
if (<argtxt[1]> == 0) && strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
18 : 51 : ERROR : ( spherechar_human.scp,4712 ) Can't resolve <argtxt[1]>
18 : 51 : ERROR : ( spherechar_human.scp,4712 ) Undefined symbol ''
[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
Parquien :
Kod:[function rakamkontrol]
if strregex(^[0-9]+$,<args>)
return 1
else
return 0
endif
fonksiyonu ile senın rakam kontrol ettiğin satırı şöyle değiştirebilirsin.
Kod:if !(<rakamkontrol <argtxt[0]>>)
src.sysmessage Yalnizca rakam girebilirsiniz.
return 1
Dostum sağol ama en üstteki cevabı okudu isen bu şekilde yazmam bana söylendi zaten
Böyle yazdığımda sınırsız ve 0 yazılı olsa dahi bir item veriyor ama ben 0 geçersiz, max 255 olmasını istiyorum
4s3d3 :
Kod:if (<isempty <argtxt[1]>>)
src.sysmessage Boş bırakamazsınız
return 1
endif
if (<argtxt[1]> == 0)
src.sysmessage Geçerli bir rakam girmediniz.
return 1
endif
Bu arkadaşın önerisini rakamkontrol veya bu arkadaşın önerisini denedim olmuyor
if (<argtxt[1]> <x) && (<argtxt[1]> > xx)
src.sysmessage girdiğiniz rakam x'den küçük xx'den büyük olamaz gibi
return 1
endif
burada ki x ve xx yerlerine alınabilecek en küçük rakamla alınabilecek maksimum rakamı eklersin.
|