[script]
n0=dialog Setup {
n1=  title "lihlihlih Bot Setup"
n2=  size -1 -1 150 155
n3=  option dbu
n4=  tab "Setup",100,1 1 150 145
n5=  ;  tab "AutoKick",101
n6=  tab "About",102
n7=  icon 80,5 20 20 20, system/V6.ico,0, tab100 
n8=  ;  icon 79,5 20 20 20, system/V6.ico,0, tab101 
n9=  button "Ok",1 ,90 155 20 10, ok
n10=  button "Cancel",2 ,115 155 20 10, cancel
n11=  box "Nick Setup",3, 5 18 142 41 , tab100
n12=  text "Bot Nick:",4,7 28 25 10, right , tab100
n13=  edit "", 5, 32 26 45 10, autohs  ,tab100
n14=  text "Alt Nick:",6,7 38 25 10, right,  tab100
n15=  edit "", 7, 32 36 45 10, autohs , tab100
n16=  text "Password:",8,7 48 25 10, right , tab100
n17=  edit "", 9, 32 46 45 10, autohs ,pass, tab100
n18=  text "Owner:",10,80 28 17 10, right , tab100
n19=  edit "", 11, 97 26 45 10, autohs , tab100
n20=  text "Identd:",12,80 38 17 10, right , tab100
n21=  edit "", 13, 97 36 45 10, autohs , tab100
n22=  check "Force Bot's Nickname",14,80 46 67 10 , tab100
n23=  box "Channel Setup",15, 5 60 65 85 , tab100
n24=  text "Channels:" 16,10 68 40 10,tab100
n25=
n26=  combo 17,10 76 55 55,sort , tab100
n27=  button "Add Chan",18,10 130 26 10 , tab100
n28=  button "Del Chan",19 ,40 130 26 10,tab100
n29=
n30=  box "Seen Script",20, 75 60 72 40 ,tab100
n31=  check "Seen Script" ,21, 80 67 50 10 ,tab100
n32=  check "Seen Record", 22, 80 77 50 10 ,tab100
n33=  button "Del seen.ini",23 ,80 87 50 8 ,tab100
n34=  box "Auto Kick Setting", 30, 75 102 72 43 ,tab100
n35=  check "Join Flood",31 , 80 110 40 10 ,tab100
n36=  check "Nick Flood",32 , 80 120 40 10 ,tab100
n37=  check "Mass Invite",33 , 80 130 40 10 ,tab100
n38=
n39=  text "lihlihlih.Bot v1.2 build 1001 freeware" 81, 5 45 120 10, tab102
n40=  text "Copyright (c) 1999-2000 lihlihlih Corp."82, 5 53 120 10, tab102
n41=  edit "" 83, 5 80 142 41,center,return,multi,vsbar,read, tab102
n42=  box "Written by:",84, 70 128 60 15 , tab102
n43=  text "lihlihlih18" , 85, 87 135 40 10, tab102
n44=}
n45=on *:dialog:setup:init:0: {
n46=  if (%bot.nick != $null) { .did -a setup 5 %bot.nick }
n47=  if (%bot.altnick != $null) { .did -a setup 7 %bot.altnick }
n48=  if (%bot.password != $null) { .did -a setup 9 %bot.password }
n49=  if (%bot.owner != $null) { .did -a setup 11 %bot.owner }
n50=  if (%ident != $null) { .did -a setup 13 %ident }
n51=  if (%seenscript == On) { .did -c setup 21 }
n52=  if (%seenrecord == On) { .did -c setup 22 }
n53=  if (%bot.force == On) { .did -c setup 14 }
n54=  if (%kick.rdoor == On) { .did -c setup 31 }
n55=  if (%kick.nickflood == On) { .did -c setup 32 }
n56=  if (%kick.invite == On) { .did -c setup 33 }
n57=  update.setup
n58=}
n59=on *:dialog:setup:sclick:102: {
n60=  did -a setup 83  Thank you for using and tesing this bot, this is my 3rd bot that i have wrote. I wrote this bot if for my own channel, #Ipoh1 and #Perak , you can find me in my channel.  If you found any bugs or error, please send a mail to lihlihlih@yahoo.com thanks...
n61=}
n62=
n63=on 1:dialog:setup:edit:*: {
n64=  if ($did == 17) {
n65=    set %setup.temp.channel $did(17).text
n66=  }
n67=}
n68=on 1:dialog:setup:sclick:*: {
n69=  if ($did == 17) {
n70=    set %setup.channel.selected $did($dname,17,$did(17).sel)
n71=  }
n72=  if ($did == 18) {
n73=    if ($did(17).text == $null) .halt
n74=    ;Add channel
n75=    set %setup.list %setup.list $+ %setup.temp.channel $+ ,
n76=    update.setup
n77=  }
n78=  if ($did == 19) {
n79=    ;Del channel
n80=    set -u1 %setup.tc %setup.channel.selected $+ ,
n81=    set %setup.list $remove(%setup.list,%setup.tc)
n82=    update.setup
n83=  }
n84=  if ($did == 23) {
n85=    ;Del seen.ini
n86=    dialog -m sure sure 
n87=  }
n88=  if ($did == 1) {
n89=    if ($did(setup,5) != $null) { .set %bot.nick $did(setup,5)  }
n90=    if ($did(setup,7) != $null) { .set %bot.altnick $did(setup,7) }
n91=    if ($did(setup,9) != $null) { .set %bot.password $did(setup,9) }
n92=    if ($did(setup,11) != $null) { .set %bot.owner $did(setup,11) }
n93=    if ($did(setup,13) != $null) { .set %ident $did(setup,13) }
n94=    if ($did(setup,14).state == 0 ) { .set %bot.force Off | .disable #ForceNick  }
n95=    if ($did(setup,14).state == 1 ) { .set %bot.force On | .enable #ForceNick  }
n96=    if ($did(setup,21).state == 0 ) { .set %seenscript  Off | .disable #seenscript  }
n97=    if ($did(setup,21).state == 1 ) { .set %seenscript  On | .enable #seenscript  }
n98=    if ($did(setup,22).state == 0 ) { .set %seenrecord Off | .disable #seenrecord  }
n99=    if ($did(setup,22).state == 1 ) { .set %seenrecord On | .enable #seenrecord  }
n100=    if ($did(setup,31).state == 0 ) { .set %kick.rdoor Off }
n101=    if ($did(setup,31).state == 1 ) { .set %kick.rdoor On }
n102=    if ($did(setup,32).state == 0 ) { .set %kick.nickflood  Off }
n103=    if ($did(setup,32).state == 1 ) { .set %kick.nickflood  On }
n104=    if ($did(setup,33).state == 0 ) { .set %kick.invite Off }
n105=    if ($did(setup,33).state == 1 ) { .set %kick.invite On }
n106=    .nick %bot.nick
n107=  }
n108=}
n109=alias -l update.setup {
n110=  did -r setup 17
n111=  set %temp.total $count(%setup.list,$chr(44))
n112=  set %temp.count 0
n113=  :start
n114=  inc %temp.count 1
n115=  did -a setup 17 $gettok(%setup.list,%temp.count,44)
n116=  if (%temp.count < %temp.total) { goto start }
n117=}