Ban Açma Dialogu

[ceyLin]

kod:

dialog SBan {
title "Server Ban Aç"
size -1 -1 79 175
option dbu
button "zLine", 1, 20 13 37 12
button "gLine", 2, 20 30 37 12
button "GZLine", 4, 20 47 37 12
button "Shun", 5, 20 81 37 12
button "K-Line", 6, 20 64 37 12
edit "", 3, 12 107 56 10
button "RMTKL", 7, 20 134 37 32
box "Options", 8, 3 5 73 167
}
alias SBan dialog -m SBan SBan
on 1:dialog:SBan:sclick:*:{
if ($did == 1 ) { .zline -*@ $+ $did(3) }
if ($did == 2 ) { .gline -*@ $+ $did(3) }
if ($did == 4 ) { .gzline -*@ $+ $did(3) }
if ($did == 5 ) { .shun -*@ $+ $did(3) }
if ($did == 6 ) { .kline -*@ $+ $did(3) }
if ($did == 7 ) { .rmtkl * * }