alias Mdc { return $dll(dll\mdc.dll,$1,$2-) }
alias mdx dll dll\mdx.dll $1 $2-
alias rebar { dll dll\rebar.dll $$1- }
alias saat { if ($dialog(gog)) { did -a gog $1 $time } }
on *:connect:{ mdc BitBtn text 112 > KOPAR }
on *:disconnect:{ mdc BitBtn text 112 > BAGLAN }
on *:start: { dialog -m gog gog }
alias gog { dialog -m gog gog }
dialog gog {
title "SohbetinSesi"
size 22 0 615 -3
option dbu
text "", 3, 580 0 45 16, center
text "", 4, 578 0 39 12, center
}
on *:dialog:gog:init:*:{
mdx MarkDialog $dname
mdx SetDialog $dname style
mdx SetDialog [ $dname ] bgcolor $rgb(0,0,0)
mdx SetColor $dname 3,4 background $rgb(0,0,0)
mdx SetColor $dname 3,4 textbg $rgb(0,0,0)
mdx SetColor $dname 4 text $rgb(255,255,255)
mdx SetDialog [ $dname ] bgcolor $rgb(0,0,0)
mdx SetFont $dname 4 21 700 Arial
.timersaat 0 1 saat 4
mdc BitBtn Create $dname 112 1 1 150 21 > BAĞLANTI
mdc BitBtn Create $dname 113 152 1 190 21 > OTO SELAM
mdc BitBtn Create $dname 114 343 1 190 21 > YAZI TİPİ
mdc BitBtn Create $dname 115 534 1 190 21 > OP TEŞEKKUR
mdc BitBtn Create $dname 116 725 1 190 21 > GİRİŞ YAZI
mdc BitBtn Create $dname 117 916 1 80 21 > FONT
mdc BitBtn Create $dname 118 997 1 90 21 > EKRAN
mdc BitBtn downcolor 112 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 112 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 113 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 113 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 114 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 114 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 115 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 115 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 116 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 116 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 117 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 117 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn downcolor 118 $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0) $rgb(255,0,0)
mdc BitBtn Color 118 $rgb(160,160,160) $rgb(160,160,160) $rgb(160,160,160) $rgb(255,250,250) $rgb(0,0,0) $rgb(255,255,255)
mdc BitBtn Font 112 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 113 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 114 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 115 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 116 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 117 $rgb(255,255,255) 10 +b > Verdana
mdc BitBtn Font 118 $rgb(255,255,255) 10 +b > Verdana
rebar HideToolbar
}
on *:signal:mdc: {
if ($2 == gog) && ($3 == sclick) && ($4 == 112) if ($scid($activecid).status = connecting || $scid($activecid).status = connected ) { scid $activecid disconnect }
else { scid $activecid server } scid $activecid window -a "status window"
if ($2 == gog) && ($3 == sclick) && ($4 == 113) { .timer 1 0 otos }
if ($2 == gog) && ($3 == sclick) && ($4 == 114) { .timer 1 0 yzi }
if ($2 == gog) && ($3 == sclick) && ($4 == 115) { .timer 1 0 tenks }
if ($2 == gog) && ($3 == sclick) && ($4 == 116) { .timer 1 0 girs }
if ($2 == gog) && ($3 == sclick) && ($4 == 117) { .timer 1 0 font }
if ($2 == gog) && ($3 == sclick) && ($4 == 118) { .timer 1 0 /F3 }
}
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]