i dont not know who made this code for super trivia but i modified it to work with word frenzy.
in remotes put
#steal off
On *:TEXT:!pot:#:{
mstat *s1 $iif(%pot.punten = 0,There are no points in the pot ! %pot.winner has removed them all :p,The jackpot is at present %pot.punten and the last winner was %pot.winner)
}
On *:TEXT:*!steal:#: {
set %speel.num. $rand(1,$nick($chan,0))
set %speel.speler $nick($chan,%speel.num.)
%stealr = $rand(a,u)
%pot.bedrag = $rand(500,1500)
%sponsor = $rand(1,3)
{ if (%msg.steal. [ $+ [ $nick ] ] = played) {
StealWait
Return
}
On owner:TEXT: !addpoints * : # : { addpoint $2 $3 }
}
{ if ($hof(p,$nick) < 0) {
DoColl gold b You need to add frenzy points to your score $nick :d :d your already on $hof(p,$nick) :|
Return
}
}
{
if ($nick = %speel.speler) {
inc %pot.punten 50
addpoint $nick -50
DoColl gold b $nick throws 50 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = p) {
inc %pot.punten 5
addpoint $nick -5
DoColl gold b $nick throws 5 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = q) {
inc %pot.punten 75
addpoint $nick -75
DoColl gold b $nick Throws 75 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = r) {
inc %pot.punten 40
addpoint $nick -40
DoColl gold b $nick Throws 40 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = s) {
inc %pot.punten 30
addpoint $nick -30
DoColl gold b $nick Throws 30 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = t) {
inc %pot.punten 20
addpoint $nick -20
DoColl gold b $nick Throws 20 points in the pot :d Pot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = u) {
inc %pot.punten 10
addpoint $nick -10
DoColl gold b $nick Throws 10 points in the pot :d Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = p) {
inc %pot.punten 50
addpoint $nick -50
DoColl gold b $nick Throws 50 points in the pot :o Jackpot now stands at %pot.punten points :o ?
(Y)(Y)(Y) Last winner of the pot was: %pot.winner
}
elseif (%stealr = n) {
addpoint $nick %pot.punten
Docoll DarkRed b (*) $nick (*) has won the Jackpot :o it stood at %pot.punten points !!!
(*)(f)Well done(f)(*) !!!
set %pot.punten %pot.bedrag
DoColl gold b Sponsor found, Bill Gates : $read(sponsor.txt) ! has given %pot.bedrag points into the Jackpot :o
set %pot.winner $nick
}
elseif (%stealr = o) {
addpoint $nick %pot.punten
Docoll DarkRed b (*) $nick (*) Has won the Jackpot :o it stood at %pot.punten points !!!
(*)(f)Well Done(f)(*) !!!
set %pot.punten %pot.bedrag
Sponsor found, Oprah Winfrey : $read(sponsor.txt) ! has given %pot.bedrag points into the Jackpot :o
set %pot.winner $nick
}
elseif (%stealr = a) {
addpoint $nick 50
addpoint %speel.speler -50
DoColl gold b $nick steals 50 points from %speel.speler :o
}
elseif (%stealr = b) {
addpoint $nick 10
addpoint %speel.speler -10
DoColl gold b $nick steals 10 points %speel.speler :o
}
elseif (%stealr = c) {
addpoint $nick 20
addpoint %speel.speler -20
DoColl gold b $nick steals 20 points from %speel.speler :o
}
elseif (%stealr = d) {
addpoint $nick 50
addpoint %speel.speler -50
DoColl gold b $nick steals 50 points from %speel.speler :o
}
elseif (%stealr = e) {
addpoint $nick 10
addpoint %speel.speler -10
DoColl gold b $nick steals 10 points from %speel.speler :o
}
elseif (%stealr = f) {
addpoint $nick 50
addpoint %speel.speler -50
DoColl gold b $nick steals 50 points from %speel.speler :o
}
elseif (%stealr = g) {
addpoint $nick -25
addpoint %speel.speler 25
DoColl gold b $nick gives away 25 of their hard earned points to %speel.speler (a)
}
elseif (%stealr = h) {
addpoint $nick -20
addpoint %speel.speler 20
DoColl gold b $nick gives away 120 of their points to %speel.speler (a)
}
elseif (%stealr = i) {
addpoint $nick -25
addpoint %speel.speler 25
DoColl gold b $nick gives away 25 of their hard earned points to %speel.speler (a)
}
elseif (%stealr = j) {
addpoint $nick -30
addpoint %speel.speler 30
DoColl gold b $nick gives away 30 of their hard earned points to %speel.speler (a)
}
elseif (%stealr = k) {
addpoint $nick -40
addpoint %speel.speler 40
DoColl gold b $nick gives away 40 of their hard earned points to %speel.speler (a)
}
elseif (%stealr = l) {
addpoint $nick -25
addpoint %speel.speler 25
DoColl gold b $nick gives away 25 of their hard earned points to %speel.speler (a)
}
elseif (%stealr = m) {
addpoint $nick -75
addpoint %speel.speler 75
DoColl gold b $nick gives away 75 of their hard earned points to %speel.speler (a)
}
}
set -u90 %msg.steal. [ $+ [ $nick ] ] played
}
;;;; other aliases
alias docoll {
if ($1-2 == darkgreen b) { show S Tahoma;0 $3- }
elseif ($1-2 == teal b) { show S Tahoma;0 $3- }
elseif ($1-2 == darkblue b) { show S \rTahoma;0 $3- }
elseif ($1-2 == red b) { show S eTahoma;0 $3- }
elseif ($1-2 == red b) { show S eTahoma;0 $3- }
elseif ($1-2 == red bb) { show S eTahoma;0 $3- }
elseif ($1-2 == gold b) { show S Tahoma;0 $3- }
elseif ($1-2 == green b) { show S Tahoma;0 $3- }
elseif ($1-2 == blue b) { show S \rTahoma;0 $3- }
elseif ($1-2 == darkred b) { show S eTahoma;0 $3- }
elseif ($1-2 == black b) { show S Tahoma;0 $3- }
elseif ($1-2 == black r) { show S Tahoma;0 $3- }
elseif ($1-2 == navy b) { show S Tahoma;0 $3- }
elseif ($1-2 == dark b) { show S Tahoma;0 $3- }
}
alias AddPoint {
var %Score $readini(FrenzyScores.ini, $1, score)
inc %Score $2
writeini FrenzyScores.ini $1 score %Score
}
alias tell {
.ctcpreply $1 TIME $2-
}
alias StealWait {
tell $nick Thou Shalt Not Steal but once every 90 seconds
return
}
#steel end
in pop ups under wordfrenzy put
..Steal Game ( $+ $group(#steal) $+ ) ...$iif($group(#steal) == on,$style(2),$style(0)) On:.enable #steal | echo -a 3 Steal Game - on 3 ...$iif($group(#steal) == off,$style(2),$style(0)) Off:.disable #steal | echo -a 4 Steal Game - off
for it to work make sure that it is set to on in your wordfrenzy menu