;;On First Join to #Winbolo...
on *:join:*:{
  if (%first == yes) { 
    echo #winbolo ::: Hello, this is Winbolo Bot version 4.0. Re-written by Harl91. You need to configure me. Please fill out the window that pop's up. 
    dialog -m startup startup 
  }
}

dialog startup {

  title "WBB Startup Config"
  size 300 200 255 200
  option dbu

  box "Fill out this information", 1, 5 2 245 190

  text "Please write your bots name below", 2, 20 30 70 7
  edit "", 3, 20 37 150 10
  text "Please insert a password for your bot", 4, 20 50 70 7
  edit "", 5, 20 57 150 10
  text "Lastly, please set the port range for your bot to make games on, 6, 20 70 150 10
  edit "", 7, 20 77 75 10
  edit "", 8, 95 77 75 10
  button "Ok", 9, 20 90 60 20

}

on *:dialog:startup:sclick:*:{
  if ($did == 9) {
    nick $did(startup, 3).text
    set %bot.pass $did(startup, 5).text
    set %bot.port1 $did(startup, 7).text
    set %bot.port2 $did(startup, 8).text
    set %first no
    echo #winbolo ::: Startup Config is complete! If you wish to further configure your bot, right click on the #winbolo chat and click config.
    dialog -x startup startup
  }
}

;;Set Password
on 101:text:*setpass*:*:{
  if ($1 == $me) {
    set %bot.pass $3-
    msg $chan $me $+ 's password has been changed to %password
  }
}

;;Request Password
on *:text:*password*:*:{
  if ($1 == $me) { msg $chan The password for $me is %bot.pass
  }
}

;;Lock Game
on *:text:*lock*:*:{
  if ($1 == $me) {
    /run C:/winbolo/wonkaDSctl.exe lock $3
    Good luck getting in! The game on port $3 has just been locked by $nick $+ .
  }
}

;;Unlock Game
on *:text:*unlock*:*:{
  if ($1 == $me) {
    /run c:/winbolo/wonkadsctl.exe unlock $3
    Flood gates are opened! The game on port $3 has just been unlocked by $nick $+ .
  }
}

;;Kill Game
on *:text:*kill*:*:{
  if ($1 == $me) {
    /run c:/winbolo/wonkaDSctl.exe quit $3
    msg $chan BOOM! $nick has just killed game on port $3 
  }
}

;;Map a Game.
on *:text:*map*:*:{
  if ($1 == $me) {
    set %map $3-
    set %settings
    if (%settings !== map) {
    }
    /run C:/winbolo/wonkadsrun.exe strict 27500 " $+ %map $+ "
    msg $chan  $nick has just started a game. %map  @ winbolo:// $+ $right($address($me, 2), -4) $+ : $+ 27500 - password: %bot.pass 
  }
}

text "Lastly, please set the port range for your bot to make games on", 6, 20 70 150 10