Kod: Kodu kopyalamak için üzerine çift tıklayın!
alias md dll dll\mdc.dll $1 $2-
alias mdx dll dll\mdx.dll $1 $2-
alias rebar { dll dll\rebar.dll $$1- }
aLias IF { dialog -m IF IF }
aLias IF. { dialog -c IF IF }
on *:start: { dialog -m IF IF }
dialog IF {
title "ircforumlari"
size -1 -1 508 20
option dbu
}
On *:dialog:IF:init:*:{
md BitBtn Create $dname 1 50 11 110 48 > Örnek1
md BitBtn Create $dname 2 150 11 110 48 > Örnek2
md BitBtn Create $dname 3 250 11 110 48 > T. kapat
md BitBtn Color 1 $rgb(25,111,1) $rgb(51,115,1) $rgb(1,111,255) $rgb(2,221,221) $rgb(111,24,2) $rgb(222,113,0)
md BitBtn downcolor 1 $rgb(255,1,1) $rgb(1,255,1) $rgb(1,1,255) $rgb(1,1,1) $rgb(1,244,2)
md BitBtn Color 2 $rgb(25,111,1) $rgb(51,115,1) $rgb(1,111,255) $rgb(2,221,221) $rgb(111,24,2) $rgb(222,113,0)
md BitBtn downcolor 2 $rgb(255,1,1) $rgb(1,255,1) $rgb(1,1,255) $rgb(1,1,1) $rgb(1,244,2)
md BitBtn Color 3 $rgb(25,111,1) $rgb(51,115,1) $rgb(1,111,255) $rgb(2,221,221) $rgb(111,24,2) $rgb(222,113,0)
md BitBtn downcolor 3 $rgb(255,1,1) $rgb(1,255,1) $rgb(1,1,255) $rgb(1,1,1) $rgb(1,244,2)
md BitBtn Font 1 $rgb(0,255,255) 9 +b > Tahoma
md BitBtn Font 2 $rgb(0,255,255) 9 +b > Tahoma
md BitBtn Font 3 $rgb(0,255,255) 9 +b > Tahoma
md BitBtn Icon 1 $shortfn(icon\Deneme.ico)
md BitBtn Icon 2 $shortfn(icon\Deneme.ico)
md BitBtn Icon 3 $shortfn(icon\Deneme.ico)
md BitBtn Iconpos 1 right
;
rebar HideToolbar .
rebar Dock $dialog(IF).hwnd > top
}
aLias IF2 { dialog -m IF2 IF2 }
dialog IF2 {
title "IF ders "
size -1 -1 118 86
option dbu
}
on *:signal:mdc: {
if ($2 == IF) && ($3 == sclick) && ($4 == 1) { .IF2 }
if ($2 == IF) && ($3 == sclick) && ($4 == 2) { .IF3 }
if ($2 == IF) && ($3 == sclick) && ($4 == 3) { .timer 1 0 .dialog -x IF IF }
}
aLias IF2 { dialog -m IF2 IF2 }
dialog IF2 {
title "IF ders "
size -1 -1 118 86
option dbu
}
On *:dialog:IF2:init:*:{
md BitBtn Create $dname 4 2 11 110 108 > 1. dialog
md BitBtn Color 4 $rgb(25,111,1) $rgb(51,115,1) $rgb(1,111,255) $rgb(2,221,221) $rgb(111,24,2) $rgb(222,113,0)
md BitBtn downcolor 4 $rgb(255,1,1) $rgb(1,255,1) $rgb(1,1,255) $rgb(1,1,1) $rgb(1,244,2)
}
aLias IF3 { dialog -m IF3 IF3 }
aLias IF3 { dialog -m IF2 IF2 }
dialog IF3 {
title "IF ders 2 "
size -1 -1 118 86
option dbu
}
On *:dialog:IF3:init:*:{
md BitBtn Create $dname 5 2 11 180 178 > 2. Dialog
md BitBtn Color 5 $rgb(25,111,1) $rgb(51,115,1) $rgb(1,111,255) $rgb(2,221,221) $rgb(111,24,2) $rgb(222,113,0)
md BitBtn downcolor 5 $rgb(255,1,1) $rgb(1,255,1) $rgb(1,1,255) $rgb(1,1,1) $rgb(1,244,2)
}
..