[function pg_call]
var.pg_box 04000lef6
if !(strmatch('<tag.pg_call>',''))
if (<uid.<tag.pg_call>.baseid> == i_page) && (<uid.<tag.pg_call>.link> == <uid>)
try uid.<tag.pg_call>.more1 <serv.time>
try uid.<tag.pg_call>.morep <p>
try uid.<tag.pg_call>.tag.reason <args>
serv.allclients pg_announce guncelleme. <name> [<uid>]: <args>
sysmessage @044,1,1  Mesajini yeniledin.
return 2
endif
endif

if (<uid.<var.pg_box>.rescount> > 100)
sysmessage @185 Su an <uid.<var.pg_box>.rescount> cevapsiz cagri bulunmakta, cagriniz iletilemedi, lutfen daha sonra tekrar deneyiniz.
return 0
endif

newitem i_page
tag.pg_call <act.uid>
act.more1 <serv.time>
act.link <uid>
act.name page: <name>
act.morep <p>
act.tag.reason <args>
act.cont <var.pg_box>
act.cont.morex <eval (<act.cont.morex> + 1)>
serv.allclients pg_announce yeni. <name> [<uid>]: <args>
try sysmessage @044,1,1 Mesajiniz iletildi, <uid.<tag.pg_call>.cont.rescount>. siradasiniz.
var.wtpage <eval <uid.<tag.pg_call>.cont.rescount>>
src.newitem i_pageyasak1
src.act.attr attr_decay
src.act.timer 60*60
src.act.new.equip
if (<var.wtpage> == 00)
var.wtpage Yok
endif
return 1

[function pg_announce]
if (0<account.plevel> > 1)
pg_smsgx * Page: <args>
endif

[function pg_wipe]
if !(<var.pg_wipe>)
if (<var.pg_nowipe>)
pg_smsgx * Su an bakilmakta olan <eval <var.pg_nowipe>> tanesi disinda tum page'ler silindi.
else
pg_smsgx * Tum page'ler silindi.
endif
else
var.pg_wipe <eval (<var.pg_wipe> - 1)>
if !(<uid.<uid.<var.pg_box>.findcont.<eval <var.pg_wipe>>.more2>.region>) || (<uid.<uid.<var.pg_box>.findcont.<eval <var.pg_wipe>>.more2>.findtype.t_eq_client_linger>)
try uid.<var.pg_box>.findcont.<eval <var.pg_wipe>>.link.tag.pg_call
try uid.<var.pg_box>.findcont.<eval <var.pg_wipe>>.remove
else
if (strmatch('<var.pg_nowipe>',''))
var.pg_nowipe 1
else
var.pg_nowipe <eval (<var.pg_nowipe> + 1)>
endif
endif
pg_wipe <var.pg_wipe>
endif

[function pg]
var.pg_box 04000lef6
if (strmatch('<args>','h')) || (strmatch('<args>','help'))