alias spel { dialog -dm Spelletjes Spelletjes }
dialog Spelletjes {
  title   "EVEN GAMEN ALS ER IN EEN KAMER EVEN RUST VALT"
  size -1 -1 205 135 
  icon $icodir(1.ico), 0 noborder
  option dbu
  Button "Sluiten", 1, 147 116 50 11 , ok
  box "", 3, 5 2 195 130 
  icon 6, 15 27 55 11 , $scriptdirbmp\oktagon.jpg 
  icon 10, 15 43 55 11 , $scriptdirbmp\Shanghai.jpg 
  icon 11, 15 59 55 11 , $scriptdirbmp\reversi.jpg 
  icon 12, 75 27 55 11 , $scriptdirbmp\Scrabble.jpg 
  icon 13, 75 43 55 11 , $scriptdirbmp\Allout.jpg 
  icon 14, 75 59 55 11 , $scriptdirbmp\Blobs.jpg 
  icon 15, 75 76 55 11 , $scriptdirbmp\Yahtzee.jpg 
  icon 16, 15 76 55 11 , $scriptdirbmp\Minigolf.jpg 
  icon 17, 35 98 55 11 , $scriptdirbmp\Snowball.jpg 
  icon 18, 135 27 55 11 , $scriptdirbmp\4opeenrij.jpg 
  icon 19, 135 43 55 11 , $scriptdirbmp\gun.jpg 
  icon 21, 135 59 55 11 , $scriptdirbmp\memory.jpg 
  icon 22, 135 76 55 11 , $scriptdirbmp\mollenmepper.jpg 
  icon 23, 125 98 55 11 , $scriptdirbmp\schaken.jpg 
}
on *:dialog:Spelletjes:sclick:*: {
  if ($did == 6) { run $scriptdirSpellen\Oktagon\Oktagon.exe }
  if ($did == 10) { run $scriptdirSpellen\shanghai_dynasty.exe }
  if ($did == 11) { run $scriptdirSpellen\Reversi\Reversi.exe }
  if ($did == 12) { run $scriptdirspellen\Scrabble\FMS.exe }
  if ($did == 15) { run $scriptdirspellen\Yahtzee\Yahtzee.exe }
  if ($did == 14) { run $scriptdirspellen\blobs.exe }
  if ($did == 17) { run $scriptdirspellen\snowball.exe }
  if ($did == 16) { run $scriptdirspellen\mini_golf.exe }
  if ($did == 13) { run $scriptdirspellen\allout.exe }
  if ($did == 18) { run $scriptdirspellen\4 op rij.exe }
  if ($did == 19) { run $scriptdirspellen\gun.exe }
  if ($did == 21) { run $scriptdirspellen\memory-b.exe }
  if ($did == 22) { run $scriptdirspellen\mollenmepper.exe }
  if ($did == 23) { run $scriptdirspellen\Schaken\Chess-it!.exe }
}
raw knock:*: { 
  if ( $2 == 474 ) { echo $1 0,4 KNOCK 0,12 $nick Heeft Hier Een Ban | halt }
}
raw 405:*:{ 
  $rs(error.wav)
  echo -a Je Hebt Teveel Kamers Open!
  halt 
}
raw 311:*:{
  echo -s 12-
  echo -s 0,4 WhoiS Info 0,12 Nick: $2 0,4 Ident: $3 0,12 Address: $4 0,4 Naam: $6- 
  HALT
}
raw 319:*:{ echo -s 0,4 Op Kamers 0,12 $3-  | HALT }
raw 312:*:{ echo -s 0,4 Op Server 0,12 $3  | HALT }
raw 313:*:{ echo -s 0,4 Server Status:0,12 $5-  | HALT }
raw 320:*:{ echo -s 0,4 IP Address:0,12 $5  | HALT }
raw 317:*:{ echo -s 0,4 Idle  $duration($3) 0,12 Online Sinds: $asctime($4)  | HALT }
raw 318:*:{ 
  echo -s 0,4 Einde /WHOIS 0,12 $2 
  echo -s 12-
  HALT
}
raw 353:*:{
  echo -s 12-
  echo -s 0,4 NamenlijsT 0,12 $3 
  echo -s 0,12 $4- 
  HALT
}
raw 366:*:{ echo -s 0,4 Einde NamenlijsT 0,12 $2  | HALT }
raw 324:*:{ echo -a 3 ** Kanaal Modes $3- }
raw 401:*:{ echo -a 0,4 Error 0,12 Kamer Of Nicknaam Bestaat NieT  }
raw 432:*:{ $rs(fout.wav) | echo -a 0,4 NICK Error 0,12 of je naam is te lang of er zitten gekke tekens in ... probeer nog es?  | halt }
raw 433:*:{ $rs(fout.wav) | echo -a 0,4 NICK Error 0,12 De Nick $2 heeft al iemand anders in gebruik , wees wat origineler :)  | halt }
raw 438:*:{ $rs(fout.wav) | echo -a 0,4 NICK Error 0,12 Je Kan De Nicknaam nog niet wijzigen wacht $9 Seconden en probeer dan opnieuw  | halt }
raw 0:*:{
  if ($2 == OWNERKEY) { $rs(warning.wav) | writeini keys.ini Ownerkey $1 $3- | echo $1 0,4 ALARM 0,12 Ownerkey veranderd naar $3 door $nick  | halt }
  if ($2 == HOSTKEY) { $rs(warning.wav) | writeini keys.ini Hostkey $1 $3- | echo $1 0,4 ALARM 0,12 Hostkey veranderd naar $3 door $nick  | halt }
  if ($2 == ONJOIN) { $rs(alert.wav) | echo $1 0,4 Onjoin Bericht 0,12 $3-  0,12 gezet door $nick  | halt }
  if ($2 == ONPART) { $rs(alert.wav) | echo $1 0,4 Onpart Bericht 0,12 $3-  0,12 gezet door $nick  | halt }
}
alias massvall {
  if ($me isop #) || ($me isowner #) { goto verder }
  else { echo -a hier moet je owner of ops voor zijn | goto endall }
  :verder
  set %mass.nicknumber $nick(#,0)
  unset %mass.nicks
  set %mass.number 1
  unset %mass.totalnum
  :incme
  if ($nick(#,%mass.number) != $me) { set %mass.nicks %mass.nicks $nick(#,%mass.number) | inc %mass.totalnum }
  if (%mass.number == %mass.nicknumber) { goto end }
  inc %mass.number
  goto incme
  :end  
  .raw mode # + $+ $str(v,%mass.totalnum) %mass.nicks
  :endall
}

alias massunvall {
  if ($me isop #) || ($me isowner #) { goto verder }
  else { echo -a hier moet je owner of ops voor zijn | goto endall }
  :verder
  set %mass.nicknumber $nick(#,0)
  unset %mass.nicks
  set %mass.number 1
  unset %mass.totalnum
  :incme
  if ($nick(#,%mass.number) != $me) { set %mass.nicks %mass.nicks $nick(#,%mass.number) | inc %mass.totalnum }
  if (%mass.number == %mass.nicknumber) { goto end }
  inc %mass.number
  goto incme
  :end  
  .raw mode # - $+ $str(v,%mass.totalnum) %mass.nicks
  :endall
}
