dialog help please - 05/08/08 08:32 PM
Can someone please help me finish this dialog to work with this code?
Code:
alias -l SW { return fuck.bitch.asshole } on @*:text:*:#: { if ($nick isop #) return var %x $strip($1-) , %i $numtok($SW,46) while (%i) { if ($istok(%x,$gettok($SW,%i,46),32)) { raw -q mode # +b $wildsite return } dec %i } } alias { dialog -dmn SW SW } { Swear Words Protection ( %SW ) .Set On:%SW = On | echo 10 -ta Swear Words Protection On .Set Off:%SW = Off | echo 10 -ta Swear Words Protection Off } dialog SW { title "Swear Words Protection" size -1 -1 148 167 option dbu button "OK",10, 117 150 25 11, flat ok list 11, 9 15 125 95, sort, size, vsbar box "Enter Swear Words To Ban.", 5, 5 5 135 110 edit %SW,12, 4 132 139 12, autohs button "Add",13, 5 150 25 11, flat button "Delete",14, 33 150 25 11, flat text "Enter Swear Words.",20, 4 120 138 8, center button "ON", 333, 89 150 25 11, flat button "OFF", 334, 61 150 25 11, flat } on *:dialog:SW:init:*: { on *:dialog:SW:sclick:*: { if ($did == 333) { .enable #SW ON | echo -a $asctime([HH:nn]) * 10Swear Words Protection Is Now 15«4Enable15» } if ($did == 334) { .disable #SW Off | echo -a $asctime([HH:nn]) * 10Swear Words Protection Is Now 15«4Disable15» }