GonzaLeS
06ofkalfasi
Staff lar .away yazip cikan menu de away nedenini belirtsin.
// arşivden buldum sadece herkesin yararlanmasını istedim yararlı bi scp//
[plevel 2]
away
[function away]
if (<eval <src.tag.awayacik>> == 1)
src.tag.awayacik 0
src.sysmessage @0bb7 Away mode kaptildi.
src.stone 0
src.events -e_away
else
sdialog d_away
endif
[events e_away]
ON=@click
message @6 [Away: <tag.away>]
[dialog d_away]
100,50
resizepic 190 175 5120 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
dhtmlgump 220 220 250 20 0 0 Away Sebebiniz ne olsun? (Max. 15 Harf)
dhtmlgump 220 200 250 20 0 0 Tamam
dhtmlgump 255 277 250 20 0 0 Vazgec
button 220 275 4006 4007 1 0 1
button 400 275 4018 4019 1 0 0
dtextentry 225 237 253 25 0 1 <src.tag.away>
[dialog d_away BUTTON]
On=1
if (strmatch('<argtxt[1]>',''))
src.sysmessage @55 Away nedenini yaziniz lutfen Bos birakmayin.
src.tag.awayacik 0
return 1
elseif ((strlen(<argtxt[1]>)) > 15)
src.sysmessage @55 15 Harf te away sebebinizi acikca belirtin lutfen.
src.tag.awayacik 0
return 1
else
src.tag.away <argtxt[1]>
src.sysmessage @0bb7 Away mode acildi.
src.stone 1
src.events +e_away
src.invis 0
src.tag.awayacik 1
return 1
endif
// arşivden buldum sadece herkesin yararlanmasını istedim yararlı bi scp//
[plevel 2]
away
[function away]
if (<eval <src.tag.awayacik>> == 1)
src.tag.awayacik 0
src.sysmessage @0bb7 Away mode kaptildi.
src.stone 0
src.events -e_away
else
sdialog d_away
endif
[events e_away]
ON=@click
message @6 [Away: <tag.away>]
[dialog d_away]
100,50
resizepic 190 175 5120 335 150
resizepic 200 185 3000 315 130
resizepic 220 235 3000 270 22
dhtmlgump 220 220 250 20 0 0 Away Sebebiniz ne olsun? (Max. 15 Harf)
dhtmlgump 220 200 250 20 0 0 Tamam
dhtmlgump 255 277 250 20 0 0 Vazgec
button 220 275 4006 4007 1 0 1
button 400 275 4018 4019 1 0 0
dtextentry 225 237 253 25 0 1 <src.tag.away>
[dialog d_away BUTTON]
On=1
if (strmatch('<argtxt[1]>',''))
src.sysmessage @55 Away nedenini yaziniz lutfen Bos birakmayin.
src.tag.awayacik 0
return 1
elseif ((strlen(<argtxt[1]>)) > 15)
src.sysmessage @55 15 Harf te away sebebinizi acikca belirtin lutfen.
src.tag.awayacik 0
return 1
else
src.tag.away <argtxt[1]>
src.sysmessage @0bb7 Away mode acildi.
src.stone 1
src.events +e_away
src.invis 0
src.tag.awayacik 1
return 1
endif