skiileri nasıl % leri kısarım ?_?

[function checkhealing]
if ((<skilllock[17]> == 0) && (<skilltotal> < 800.0))
	if (<healing> < 30.0)
		if (rand(2) == 1)
			healing (<healing> + 1)
		endif
	elseif (<healing> < 50.0)
		if (rand(2) == 1)
			healing (<healing> + 1)
		endif
	elseif (<healing> < 75.0)
		if (rand(2) == 1)
			healing (<healing> + 1)
		endif
	elseif (<healing> < 100.0)
		if (rand(2) == 1)
			healing (<healing> + 1)
		endif
	endif
endif

[function checkveterinary]
if ((<skilllock[39]> == 0) && (<skilltotal> < 800.0))
	if (<veterinary> < 30.0)
		if (rand(7) == 1)
			veterinary (<veterinary> + 1)
		endif
	elseif (<veterinary> < 50.0)
		if (rand(8) == 1)
			veterinary (<veterinary> + 1)
		endif
	elseif (<veterinary> < 75.0)
		if (rand(9) == 1)
			veterinary (<veterinary> + 1)
		endif
	elseif (<veterinary> < 100.0)
		if (rand(10) == 1)
			veterinary (<veterinary> + 1)
		endif
	endif
endif

[Skill 0]
DEFNAME=Skill_Alchemy
KEY=Alchemy
TITLE=Alchemist
EFFECT=0.0,125.0
DELAY=0.2,1.0
VALUES=1,30,200
ADV_RATE=1.0,2.0,3.0
DELAY=1.5
STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
src.smg Iksiriniz heba oldu.

[Skill 1]
DEFNAME=Skill_Anatomy
KEY=Anatomy
TITLE=Scholar
PROMPT_MSG=Kimi inceleyeceksiniz??
DELAY=1.0,3.0
ADV_RATE=1.0,2.0,3.0
STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.smg Bu yaratik hakkinda pek fikriniz yok.
	return 1

[Skill 2]
DEFNAME=Skill_Animal_Lore
KEY=AnimalLore
TITLE=Scholar
PROMPT_MSG=Hangi hayvani inceleyeceksiniz?
DELAY=1.0,3.0
ADV_RATE=1.0,2.0,3.0
STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.smg Bu hayvan hakkinda pek fikriniz yok.
	return 1

[Skill 3]
DEFNAME=Skill_Appraise
KEY=ItemID
TITLE=Merchant
PROMPT_MSG=Neyi inceleyecegiz?
DELAY=1.0,3.0
ADV_RATE=1.0,2.0,3.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.smg Bu esya hakkinda bir fikriniz yok.
	return 1


[Skill 4]
DEFNAME=Skill_Armslore
KEY=ArmsLore
TITLE=Arms%s
PROMPT_MSG=Neyi inceleyeceksiniz?
DELAY=1.0,3.0
ADV_RATE=1.0,2.0,3.0

STAT_STR=0
STAT_DEX=0
STAT_INT=100
BONUS_STR=0
BONUS_DEX=0
BONUS_INT=100
BONUS_STATS=60

ON=@Fail
	src.smg Bu esya hakkinda bir fikriniz yok.
	return 1

Lai : Aslında yüzdelik veya rand'lık bir durum yoktur ortada. İnsanlar bu garip bilinmeyene bir ad koymak için böyle birşey uydurmuştur (Matematik)

Aslında burada olay rand yükseldikce yeteneği alabilme sıklığının azalmasıdır, bunu %'lik bir dilime bölemezsiniz. rand(2) de yapsanız, bu sizin her iki yetenek kullanımından birinde yetenek alacağınızı garantilemez. Yani sonuçta %50 olmaz. Ama böyle kabul edilir.

Lai : Arkadaşım sayıları artırdıkca zorlaştırırsın, bu kadar basit. Ama yüzdelik bir dilim vermezsin.

Bir pastayı ikiye bölersen %50 bir taraf %50 diğer taraf olur. Ancak olasılıklar dahilinde mantıksız bir olay gelişir.

Verdiğin örnekte rand(5) dediğinde 5'inden 1'inin gain kazandıracağını mı sanıyorsun ? Sadece gain alımını biraz zorlaştırırsın. Ama yüzde veremezsin.

Eğer bu durumu algılamakta zorluk çekiyorsan deneyerek görebilirsin.

[defname paylar]
pay = 5
payx = 1

if (rand(<eval <def.pay>>) = <eval <def.payx>>)
if (<eval <src.ctag.ihtimal>> = <eval <def.pay>>)
//islemler Buraya
src.ctag.ihtimal = 0
else
src.ctag.ihtimal <eval <src.ctag.ihtimal>+1>
endif
else
src.ctag.ihtimal <eval <src.ctag.ihtimal>+1>
if (<eval <src.ctag.ihtimal>> = <eval <def.pay>>)
//islemler buraya
src.ctag.ihtimal = 0
endif
endif