Id: 8794; Nick: Teppuli; Timestamp: 2008-04-08 15:16:55; Pasted as: mIRC
Description: n/a
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
on 9:text:.bomb:#:{ var %gamename = bomb | if ($readini(games.ini,$chan,%gamename) != enabled) { msg $chan Error! Game $+(',%gamename,') isnt enabled on this channel. | halt } else { msg $chan Usage: $1 <nickname> }  }
on 9:text:.fungame *:#:{
  if ($2 == version) { msg $chan FunGame game framework v1.0 for MSL by Teppuli }
  if ($2-3 == bomb on) { writeini games.ini $chan bomb enabled | msg $chan Ok. Game "bomb" enabled. | halt }
  if ($2-3 == bomb off) { writeini games.ini $chan bomb disabled | msg $chan Ok. Game "bomb" disabled. | halt }
}
on 9:text:.bomb *:#:{
  var %gamename = bomb | if ($readini(games.ini,$chan,%gamename) != enabled) { msg $chan Error! Game $+(',%gamename,') isnt enabled on this channel. | halt }
  if (!$2) { msg $chan Use: $1 <nickname> | halt }
  if (%process_ [ $+ [ %gamename ] ] == true) { msg $chan Game $+(",%gamename,") already in process, please wait. | halt }
  inprocess %gamename
  timer 1 35 unprocess %gamename
  set -u60 %wire1 $rand(1,6)
  set -u60 %wire2 $rand(1,6)
  set -u60 %wire3 $rand(1,6)
  set -u60 %realwire $encode($rand(1,3)) 
  set -u60 %wires = $bomb_num2wire(%wire1) $bomb_num2wire(%wire2) $bomb_num2wire(%wire3)
  set -u60 %bombnick $2
  msg $chan $2 $+ : Bomb has been planted! You have 30 seconds to defuse the bomb! Wires: $bomb_num2wire(%wire1) $bomb_num2wire(%wire2) $bomb_num2wire(%wire3) $+ . Cut wire using: !cutwire <color>
  timerbomb 1 30 kick $chan $2 BOOOM! Bomb exploded! xD
}
on *:text:!cutwire *:#:{
  if (%bombnick != $nick) { halt }
  if ($2 !isin %wires) { msg $chan $nick $+ : Errr... I think you need better eyes... | halt }
  if ($bomb_num2wire(%wire [ $+ [ $decode(%realwire) ] ]) == $2) { msg $chan Bomb defused succesfully! Real wire was: $2 $+ . | timerbomb off | unprocess bomb | halt }
 
  kick $chan $nick BOOOM! You cutted wrong wire! HAHA! xD 
  unprocess bomb
  timerbomb off
}
alias inprocess {
  set %process_ [ $+ [ $1 ] ] true
}
alias unprocess {
  set %process_ [ $+ [ $1 ] ] false
}
alias bomb_num2wire {
  if ($1 == 1) { return black }
  if ($1 == 2) { return white }
  if ($1 == 3) { return blue }
  if ($1 == 4) { return yellow }
  if ($1 == 5) { return purple }
  if ($1 == 6) { return red }
}
 
Options: New, Download,
, mIRC Parser;
Copyright © 2006 by Zyberdog - Some rights reserved. (Browse/Disclaimer/Stats/About)