Page box Hakında

[wolcano]

Page box nereden bulabilicem acaba arama motorun dan aklıma ne gelirse yazdım ama bulamadım düzgün calışan su scriptte uygun page box yazabilirmisiniz...!!!

[FUNCTION HelpPage]
DIALOG d_help

[DIALOG d_help]
10,-75
nomove
page 0
resizepic 150 95 5054 510 310
resizepic 155 100 3000 500 300
text 240 115 1152 0
htmlgump 190 140 345 75 1 1 1
resizepic 190 225 3000 100 20
resizepic 190 260 3000 100 20
resizepic 190 295 3000 100 20
resizepic 311 225 3000 225 20
resizepic 311 260 3000 225 20
resizepic 311 295 3000 225 20
resizepic 475 360 3000 60 20

button 165 226 1209 1210 1 0 1
button 165 261 1209 1210 1 0 2
button 165 296 1209 1210 1 0 3
button 450 363 1209 1210 1 0 4

text 196 225 1152 2
text 196 260 1152 3
text 196 295 1152 4
text 327 225 1152 5
text 327 260 1152 6
text 327 295 1152 7
text 481 360 1152 8

gumppic 500 90 12
gumppic 500 90 50987

[DIALOG d_help TEXT]
Yardim Menusu
Ultima Online Shard :
Herhangi bir skill veya oyunun oynanisi ile ilgili bir problemle karsilasirsaniz her hangi bir oyuncu sizi rahatsiz ediyorsa Page sistemini.Her hangi bir yerde takilip kaldiysaniz Stuck sistemini kullanabilirsiniz.
Gm page
Stuck
Web
GameMaster yardim cagrisi
Takilma
Web sitemiz
Kapat

[DIALOG d_help BUTTON]

ONBUTTON=0
sysmessage Menu kapatildi.

ONBUTTON=1
DIALOG d_gmpage

ONBUTTON=2
DIALOG d_helpstuck

ONBUTTON=3
WEBLINK www.xxx.com
src.sysmessage Sitemize baglaniyorsunuz.
RETURN 1

[dialog d_gmpage]
-180,300
nomove

resizepic 190 175 5054 643 100

htmlgump 211 200 290 20 0 0 0
resizepic 208 221 3000 610 26
textentry 211 225 555 25 0 0 1
button 785 223 4030 4031 1 0 1

[dialog d_gmpage TEXT]
Lutfen sorununuzu aciklayici bir sekilde belirtiniz.


[dialog d_gmpage BUTTON]
On=0
sysmessage Islem iptal edildi.

On=1
if (strmatch('>',''))
message Sorununuzu belirtmediniz.
dialog d_gmpage
tag.pg_reason >
dialog d_gmpage
tag.pg_reason
else
pg_call >
message Tesekkurler.Yetkililer sorununuzla en kisa zamanda ilgilenecektir.
endif

[dialog d_helpstuck]
-20,-75
nomove
resizepic 150 95 5054 220 220
resizepic 155 100 3000 210 210
text 190 115 1152 0
resizepic 190 170 3000 100 20
resizepic 190 205 3000 100 20
resizepic 190 240 3000 100 20
resizepic 190 275 3000 100 20
resizepic 190 310 3000 100 20
resizepic 190 345 3000 100 20

button 165 171 1209 1210 1 0 1
button 165 206 1209 1210 1 0 2
button 165 241 1209 1210 1 0 3
button 165 276 1209 1210 1 0 4
button 165 311 1209 1210 1 0 5
button 165 346 1209 1210 1 0 6


text 196 170 1152 1
text 196 205 1152 2
text 196 240 1152 3
text 196 275 1152 4
text 196 310 1152 5
text 196 345 1152 6

[dialog d_helpstuck text]
Stuck Menusu
Britain
Moonglow
Minoc
Jhelom
Buc's Den
Vesper

[dialog d_helpstuck button]

On=0
sysmessage Menu kapatildi.

On=1
sysmessage Bir dakika icinde Britain'e gideceksiniz.
newitem i_stuck
act.morep 1495,1629,10
act.equip

On=2
sysmessage Bir dakika icinde Moonglow'a gideceksiniz.
newitem i_stuck
act.morep 4442,1172
act.equip

On=3
sysmessage Bir dakika icinde Minoc'a gideceksiniz.
newitem i_stuck
act.morep 2466,544
act.equip

On=4
sysmessage Bir dakika icinde Jhelom'a gideceksiniz.
newitem i_stuck
act.morep 1383,3815
act.equip

On=5
sysmessage Bir dakika icinde Buccaneer's Den'e gideceksiniz.
newitem i_stuck
act.morep 2706,2163
act.equip

On=6
sysmessage Bir dakika icinde Vesper'a gideceksiniz.
newitem i_stuck
act.morep 2895,688,0
act.equip

[itemdef i_stuck]
name stuck options
id 0186a
type t_eq_script
weight 0
layer layer_special

On=@Create
attr attr_invis|attr_newbie
more1 60

On=@Equip
src.emote use stuck
timer 1

On=@Timer
if ()
if ()

cont.sysmessage Stuck hakkiniz acilmistir.
remove
elseif ()
cont.sysmessage >
cont.flags |04
more1 ( - 1)
timer 1
else
cont.goplace
cont.flags &~04
more2 1
timer 7200
endif
endif
return 1

[EOF]

[Taina]

bak yapacaın tek sey zebula ocak scriptlerini cekeceksin vede oradan nbl nın page sistemini kullanacaksın.
nebula kadar guzel ve ayrıntılı baska bir page sistemi yok falla.

[wolcano]

tavsiyen için teşekkür ederim