Bunu Paylaşmak Istedim

1.9

38
33.80 336 0

Arkadaşlar azınlık kitlenin bildiği üzere bir kaç proje ile uğraştım. Hepsini sonuçlandırım alnımın akı ile çıktım uzun zamandan sonra tekrar sizlerleyim..
Herkese yeniden merhaba diyorum ve bu kullanıcı adım ile ilk scriptimi yayımlamak istiyorum.. Bu scriptin yeni ufuklara yelken açacağı düşüncesindeyim..


[defname player_skilldown]
player_skill_1 Alchemy
player_skill_2 Anatomy
player_skill_3 AnimalLore
player_skill_4 Taming
player_skill_5 Archery
player_skill_6 ArmsLore
player_skill_7 Begging
player_skill_8 Blacksmithing
player_skill_9 Bowcraft
player_skill_10 Camping
player_skill_11 Carpentry
player_skill_12 Cartography
player_skill_13 Cooking
player_skill_14 DetectingHidden
player_skill_15 Enticement
player_skill_16 EvaluatingIntel
player_skill_17 Fencing
player_skill_18 Fishing
player_skill_19 Forensics
player_skill_20 Healing
player_skill_21 Herding
player_skill_22 Hiding
player_skill_23 Inscription
player_skill_24 ItemId
player_skill_25 Lockpicking
player_skill_26 Lumberjacking
player_skill_27 MaceFighting
player_skill_28 Magery
player_skill_29 Meditation
player_skill_30 Mining
player_skill_31 Musicianship
player_skill_32 Parrying
player_skill_33 Peacemaking
player_skill_34 Poisoning
player_skill_35 Provocation
player_skill_36 RemoveTrap
player_skill_37 MagicResistance
player_skill_38 Snooping
player_skill_39 SpiritSpeak
player_skill_40 Stealing
player_skill_41 Stealth
player_skill_42 Swordsmanship
player_skill_43 Tactics
player_skill_44 Tailoring
player_skill_45 TasteId
player_skill_46 Tinkering
player_skill_47 Tracking
player_skill_48 Veterinary
player_skill_49 Wrestling

[function skilldusur]
if (<skilltotal> < 1100)
	sysmessage @55 Skillerinizi daha fazla dusuremezsiniz.
	return 1
else
	dialog d_skilldusur
	return 1
endif

[dialog d_skilldusur]
5,5
nomove
page 0
resizepic 0 0 3500 610 400
dhtmlgump 250 15 100 20 0 0 <def.fontred>>skill ayarları
local.ox=20
local.oy=40
for x 0 48
radio <eval <local.ox>> <eval <local.oy>> 56 55 0 <eval 300 + <local.x>>
dhtmlgump <eval <local.ox> + 40> <eval <local.oy>> 100 20 0 0 <def0.player_skill_<eval <local.x> + 1>>
dhtmlgump <eval <local.ox> + 140> <eval <local.oy>> 50 20 0 0 <<def0.player_skill_<eval <local.x> + 1>>>
local.oy += 20
if (<local.oy> > 360)
local.ox += 200
local.oy = 40
endif
endfor

button 420 365 4005 4006 1 0 1
button 480 365 4005 4006 1 0 2
button 540 365 4005 4006 1 0 3
dhtmlgump 420 350 100 20 0 0 <def.fontgold>>10.0
dhtmlgump 480 350 100 20 0 0 <def.fontgold>>1.0
dhtmlgump 540 350 100 20 0 0 <def.fontgold>>0.1

[dialog d_skilldusur text]

[dialog d_skilldusur button]
on=1
for x 0 48
	if (<argchk[<eval 300 + <local.x>>]>)
		src.tag.skilld <def0.player_skill_<eval <local.x> + 1>>
		<src.tag.skilld> <eval <<src.tag.skilld>> -100>
		src.tag.skilld
  	endif
endfor
on=2
for x 0 48
	if (<argchk[<eval 300 + <local.x>>]>)
		src.tag.skilld <def0.player_skill_<eval <local.x> + 1>>
		<src.tag.skilld> <eval <<src.tag.skilld>> -10>
		src.tag.skilld
  	endif
endfor
on=3
for x 0 48
	if (<argchk[<eval 300 + <local.x>>]>)
		src.tag.skilld <def0.player_skill_<eval <local.x> + 1>>
		<src.tag.skilld> <eval <<src.tag.skilld>> -1>
		src.tag.skilld
  	endif
endfor

p.s.: 56b admin menüden esintidir fakat bende uğraştım. satırlarca uzunluğundaki skilldusur menusu bu kadar kısa yapabilirsiniz.

Silindi

Neophyte

1.9

33.80

Bıraz Kısaltılmıs Bıraz Editlenmis Ama Sonucta Emek Var Daha Yaratıcı Olabılırdın... Yazma Konusunda Degıl Skıl dusurme Konusunda.

caos

Neophyte

1.9

38
33.80 336 0

Tabiki isteğe göre düzeltilebilir.. Ben sadece alt yapı kurmaya çalıştım. Biraz dediğinde 113 satıra kadar indi. Tabiki dahada inebilir. 3 adet buton var ondan kaynaklandı. Son olarak teşekkür ederim.

Slothere

Master

59.2997

32
689.77 2413 6

Güzel paylaşım ancak daha bile kısaltabiliriz,

Örn;



[dialog d_skilldusur]
0,0
resizepic 50 50 3000 550 480

var.y 80
for 0 20
button 80 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 103 <eval <var.y>> 0 <serv.skill.<eval <local._for>>.name> <<serv.skill.<eval <local._for>>.name>>
var.y +=20
endfor

var.y 80
for 21 41
button 250 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 273 <eval <var.y>> 0 <serv.skill.<eval <local._for>>.name> <<serv.skill.<eval <local._for>>.name>>
var.y +=20
endfor

var.y 80
for 42 49
button 420 <eval <var.y>> 210 211 1 0 <eval <local._for>+1>
dtext 443 <eval <var.y>> 0 <serv.skill.<eval <local._for>>.name> <<serv.skill.<eval <local._for>>.name>>
var.y +=20
endfor

dtext 400 300 0 Her dusurmede 1.0 skill duser.

[dialog d_skilldusur button]
on 1 50
var.argn <argn> -1
if (<<serv.skill.<eval <var.argn>>.name>> > 0.9)
try src.<serv.skill.<eval <var.argn>>.name> <<serv.skill.<eval <var.argn>>.name>> - 1.0
src.sys_normal <serv.skill.<eval <var.argn>>.name> skilliniz 1.0 dusuruldu
elif (<<serv.skill.<eval <var.argn>>.name>> > 0)
try src.<serv.skill.<eval <var.argn>>.name> 0
src.sys_normal <serv.skill.<eval <var.argn>>.name> skilliniz 0'landi
else
src.sys_error Zaten skilliniz sifir
endif
sdialog d_skilldusur

Silindi

Master

59.2997

689.77

Gokberk Yıne Dokturmussun Varmı Daha Indıren :)

Syntax

Novice

2.1

34 Istanbul , ---
81.47 666 0

gerçekten güzel biraz da görsellik açısından editlenirse süper bişi çıkar ortaya

Silindi

Novice

2.1

Istanbul , ---
81.47

Defler yerine

for 0 49
src.sysmessage <serv.skill.<dlocal._for>.name>
endfor

Gibi şeyler kullanabilirsin.

Bir skilldusur menusunde skilli seciyorsun bi menu aciliyor.

0.1 Dusur
1.0 Dusur
10.0 Dusur
Skillimi Sıfırla

Bunlar var ve sadece 100 satır.Spheredeki yenilikleri takip etmek lazım.