Merhaba arkadaşlar. Canım sıkıldı ne yapayım ne yapayım dedim x uo da karakter altta macroda dedim herkes aynı info sistemini kullanıyor onu biraz geliştireyim dedim bilmem iyi demişmiyim.


Sistemde bir çok hatta baya geliştirme yapılabilir çok eksik var yetki sınırlaması vs. şu an ben kendi sunucumda kullandığım halini paylaşıyorum. Daha şimdi yazdım kodlamam bitti hemen buraya koydum. Beğenen beğenmeye herkese teşekkürler.EN yakın zamandada yeni item info kodlamasını yapıp göndereceğim.


Kod ;



[DIALOG d_charprop1]
0,0
resizepic 0 0 <var.theme1> 630 410
resizepic 10 10 <var.theme2> 610 390
resizepic 0 410 <var.theme1> 230 140
resizepic 10 420 <var.theme2> 210 120
dtext 80 20 0790 Info Menü
dhtmlgump 55 50 250 25 95 0 <def.center>Hesap : <account>
dhtmlgump 55 75 250 25 95 0 <def.center>Uid : <uid>
dhtmlgump 55 100 250 25 95 0 <def.center>Isim : <name>
dhtmlgump 55 125 250 25 95 0 <def.center>Title : <title>
dhtmlgump 55 150 250 25 95 0 <def.center>Color : <color>
dhtmlgump 55 175 250 25 95 0 <def.center>oSkin : <oskin>
dhtmlgump 55 200 250 25 95 0 <def.center>ID : <id>
dhtmlgump 55 225 250 25 95 0 <def.center>Body : <body>
dhtmlgump 55 250 250 25 95 0 <def.center>oBody : <obody>
dhtmlgump 55 275 250 25 95 0 <def.center>P : <p>
dhtmlgump 55 300 250 25 95 0 <def.center>Home : <home>
dhtmlgump 55 325 250 25 95 0 <def.center>Action : <action>
dhtmlgump 55 350 250 25 95 0 <def.center>Food : <food>

dhtmlgump 355 50 250 25 95 0 <def.center>Npc : <npc>
dhtmlgump 355 75 250 25 95 0 <def.center>Skill : <skilltotal>
dhtmlgump 355 100 250 25 95 0 <def.center>Bank : <bankbalance>
dhtmlgump 355 125 250 25 95 0 <def.center>Guild : <memoryfindtype.memory_guild.link.name>
dhtmlgump 355 150 250 25 95 0 <def.center>Str : <str>/<hits>
dhtmlgump 355 175 250 25 95 0 <def.center>Dex : <dex>/<stam>
dhtmlgump 355 200 250 25 95 0 <def.center>Int : <int>/<mana>
dhtmlgump 355 225 250 25 95 0 <def.center>Kills : <kills>
dhtmlgump 355 250 250 25 95 0 <def.center>Karma : <karma>
dhtmlgump 355 275 250 25 95 0 <def.center>Fame : <fame>
dhtmlgump 355 300 250 25 95 0 <def.center>Death : <deaths>

dhtmlgump 55 430 150 25 95 0 <def.center>Karakter Becerileri
dhtmlgump 55 455 150 25 95 0 <def.center>Karakter Detaylı bilgi
dhtmlgump 55 480 150 25 95 0 <def.center>Karakter Events
dhtmlgump 55 505 150 25 95 0 <def.center>Karakter Tag List

button 25 50 4006 4007 1 0 1
button 25 75 4006 4007 1 0 2
button 25 100 4006 4007 1 0 3
button 25 125 4006 4007 1 0 4
button 25 150 4006 4007 1 0 5
button 25 175 4006 4007 1 0 6
button 25 200 4006 4007 1 0 7
button 25 225 4006 4007 1 0 8
button 25 250 4006 4007 1 0 9
button 25 275 4006 4007 1 0 10
button 25 300 4006 4007 1 0 11
button 25 325 4006 4007 1 0 12
button 25 350 4006 4007 1 0 13

button 325 50 4006 4007 1 0 14
button 325 75 4006 4007 1 0 15
button 325 100 4006 4007 1 0 16
button 325 125 4006 4007 1 0 17
button 325 150 4006 4007 1 0 18
button 325 175 4006 4007 1 0 19
button 325 200 4006 4007 1 0 20
button 325 225 4006 4007 1 0 21
button 325 250 4006 4007 1 0 22
button 325 275 4006 4007 1 0 23
button 325 300 4006 4007 1 0 24


button 25 430 4006 4007 1 0 1000
button 25 455 4006 4007 1 0 1001
button 25 480 4006 4007 1 0 1002
button 25 505 4006 4007 1 0 1003

[DIALOG d_charprop1 BUTTON]
ONBUTTON=1
src.hata Karakter Hesap adı sabittir.

ONBUTTON=2
src.hata Karakter UID numarası sabittir.

ONBUTTON=3
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=NAME 10

ONBUTTON=4
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=TITLE 10

ONBUTTON=5
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=COLOR 10

ONBUTTON=6
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=oskin 10

ONBUTTON=7
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=ID 10

ONBUTTON=8
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=BODY 10

ONBUTTON=9
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=oBody 10

ONBUTTON=10
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=p 10

ONBUTTON=11
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=HOME 10

ONBUTTON=12
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=action 10

ONBUTTON=13
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=food 10

ONBUTTON=14
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=NPC 10

ONBUTTON=15
src.hata Skill total değişmez.

ONBUTTON=16
src.hata Bank Balance değişmez.

ONBUTTON=17
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
src.smy <memoryfindtype.memory_guild.link.name> [<memoryfindtype.memory_guild.link.UID.p>] isimli guildin yanına gittiniz.
SRC.GOUID <memoryfindtype.memory_guild.link.UID>

ONBUTTON=18
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=STR 10

ONBUTTON=19
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=DEX 10


ONBUTTON=20
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=INT 10

ONBUTTON=21
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=KILLS 10

ONBUTTON=22
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=KARMA 10

ONBUTTON=23
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=FAME 10

ONBUTTON=24
if (<src.account.plevel> <= 5)
src.hata Buna yetkiniz yok.
return 1
endif
TRYP 4 INPDLG=DEATHS 10

ONBUTTON=1000
DIALOGCLOSE D_CHAR_SKILLS
DIALOG D_CHAR_SKILLS

ONBUTTON=1001
DIALOGCLOSE D_CHAR_DETAY
DIALOG D_CHAR_DETAY

ONBUTTON=1002
DIALOGCLOSE D_CHAR_EVENTS
DIALOG D_CHAR_EVENTS

ONBUTTON=1003
DIALOGCLOSE D_CHAR_TAGS
DIALOG D_CHAR_TAGS
SRC.SYSMESSAGE @0790,,1 TAG LIST ;
TAGLIST


[DIALOG D_CHAR_DETAY]
0,0
resizepic 0 0 <var.theme1> 250 480
resizepic 10 10 <var.theme2> 230 460
dhtmlgump 25 20 200 25 95 0 Online süreniz : <def.bfont_blue><eval <ACCOUNT.TOTALCONNECTTIME>/60> <def.bfont_black>saat
dhtmlgump 25 50 200 25 95 0 Kayıt tarihiniz : <def.bfont_blue><ACCOUNT.FIRSTCONNECTDATE>
dhtmlgump 25 80 200 25 95 0 Son online : <def.bfont_blue><ACCOUNT.LASTCONNECTDATE>
dhtmlgump 25 110 200 25 95 0 Son online süreniz : <def.bfont_blue><ACCOUNT.LASTCONNECTTIME> <def.bfont_black>dk.
dhtmlgump 25 140 200 25 95 0 Karakter sayınız : <def.bfont_blue><account.chars>
dhtmlgump 25 170 200 25 95 0 Ip adresiniz : <def.bfont_blue><account.LASTIP>
dhtmlgump 25 200 200 25 95 0 Bulunduğunuz alan : <def.bfont_blue><region.name>
dhtmlgump 25 230 200 25 95 0 Karakter yaşı : <def.bfont_blue><eval <src.age>/83400>
if (<src.isevent.e_mage>)
dhtmlgump 25 260 200 25 95 0 Classman : <def.bfont_blue>Mage
elseif (<src.isevent.e_warrior>)
dhtmlgump 25 260 200 25 95 0 Classman : <def.bfont_blue>Warrior
elseif (<src.isevent.e_warlock>)
dhtmlgump 25 260 200 25 95 0 Classman : <def.bfont_blue>Warlock
endif
dtext 25 290 044 Hesaptaki karakterler ;
local.satir 320
for 0 <eval <account.chars>-1>
dhtmlgump 25 <eval <dlocal.satir>+1> 200 25 95 0 <def.center><def.bfont_blue><account.char.<dlocal._for>.name>
local.satir += 35
endfor

[dialog d_CHAR_TAGS]
0,0
resizepic 0 0 <var.theme1> 240 160
resizepic 10 10 <var.theme2> 220 140
resizepic 20 20 3000 200 30
dtextentry 25 25 555 25 044 0 ?
dtext 55 55 044 TAG Ver
dtext 55 75 025 TAG Sil
dtext 55 95 025 Alanı temizle
dtext 55 115 00790 Bütün Tag'ları temizle
button 25 55 4006 4007 1 0 1
button 25 75 4006 4007 1 0 2
button 25 95 4006 4007 1 0 3
button 25 115 4006 4007 1 0 4

[dialog d_CHAR_TAGS BUTTON]
on=1
if (strmatch('<argtxt[0]>',''))
src.hata Lütfen bir tag değeri giriniz.
src.sdialog d_CHAR_TAGS

elseif (strmatch('<argtxt[0]>','?'))
src.hata Lütfen bir tag değeri giriniz.
src.sdialog d_CHAR_TAGS

else
TAG.<argtxt[0]>=1
src.smy <argtxt[0]> Tag'ı Verildi.
return 1
endif

on=2
if (strmatch('<argtxt[0]>',''))
src.hata Lütfen bir tag değeri giriniz.
src.sdialog d_CHAR_TAGS

elseif (strmatch('<argtxt[0]>','?'))
src.hata Lütfen bir tag değeri giriniz.
src.sdialog d_CHAR_TAGS

else
TAG.<argtxt[0]>=
src.smy <argtxt[0]> Tag'ı Silindi.
return 1
endif

on=3
src.smy Pencere yenilendi.
SRC.DIALOGCLOSE D_CHAR_TAGS
SRC.DIALOG D_CHAR_TAGS

on=4
CLEARTAGS
src.smy Bütün tag'lar silindi.

[dialog D_CHAR_EVENTS]
0,0
resizepic 0 0 <var.theme1> 260 280
resizepic 10 10 <var.theme2> 240 260
dtext 20 20 0790 <name> Event List
dhtmlgump 20 50 223 100 1 1 <events>
resizepic 20 160 3000 223 30
dtextentry 25 165 555 25 044 0 ?
dtext 55 195 044 Event Ver
dtext 55 215 025 Event Sil
dtext 55 235 025 Alanı temizle
button 25 195 4006 4007 1 0 1
button 25 215 4006 4007 1 0 2
button 25 235 4006 4007 1 0 3

[dialog d_CHAR_EVENTS BUTTON]
on=1
if (strmatch('<argtxt[0]>',''))
src.hata Lütfen bir event kodu giriniz.
src.sdialog d_CHAR_EVENTS

elseif (strmatch('<argtxt[0]>','?'))
src.hata Lütfen bir event kodu giriniz.
src.sdialog d_CHAR_EVENTS

else
EVENTS +<argtxt[0]>
src.smy <argtxt[0]> Event'i Verildi.
return 1
endif

on=2
if (strmatch('<argtxt[0]>',''))
src.hata Lütfen bir event kodu giriniz.
src.sdialog d_CHAR_EVENTS

elseif (strmatch('<argtxt[0]>','?'))
src.hata Lütfen bir event kodu giriniz.
src.sdialog d_CHAR_EVENTS

else
EVENTS -<argtxt[0]>
src.smy <argtxt[0]> Event'i silindi.
return 1
endif

on=3
src.smy Pencere yenilendi.
SRC.DIALOGCLOSE D_CHAR_EVENTS
SRC.DIALOG D_CHAR_EVENTS

[defname player_skills]
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

[dialog D_CHAR_SKILLS]
0,0
resizepic 0 0 <var.theme1> 610 400
resizepic 10 10 <var.theme2> 590 380
local.ox=20
local.oy=40
for x 0 48
dhtmlgump <eval <local.ox> + 20> <eval <local.oy>> 100 20 0 0 <def0.player_skill_<eval <local.x> + 1>>
dhtmlgump <eval <local.ox> + 120> <eval <local.oy>> 50 20 0 0 <def.bfont_red> <<def0.player_skill_<eval <local.x> + 1>>>
local.oy += 20
if (<local.oy> > 360)
local.ox += 200
local.oy = 40
endif
endfor

Ekran Görüntüsü ;




Şekil şemal biraz kırık :D
Bence güzel :D birazcık makyajla dahada hoş olabilir diye düşünüyorum şekli :) tabii görüntü kişisel birşey :D
//Edit: Unutmuşum prdn~~ Eline Sağlık ~~

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.