alias -l showwon {
if ($2 == points) {
var %a = $ini(inplay.ini,won,0), %b ï€Winners From Last Round --->
if (%a == 0) {
if ($3 == room) {
domsg $iif($cset(main,allcolor),$ifmatch,$cset(main,gencolor)) %b NONE :|
}
else {
tell $1 %b NONE :|
}
.halt
}
while (%a > 0) {
%b = %b $+ ï€ $+ $ini(inplay.ini,won,%a) Bet ---> $bytes($dpoint($cplay(total,$ini(inplay.ini,won,%a))),b) Points, Won ---> $bytes($dpoint($cplay(won,$ini(inplay.ini,won,%a))),b) Points (Y)
dec %a
}
if ($3 == room) {
domsg $iif($cset(main,allcolor),$ifmatch,$cset(main,gencolor)) %b
}
else {
tell $1 %b
}
}
else {
var %a = $ini(inplay.ini,won,0), %b ï€Winners From Last Round --->
if (%a == 0) {
if ($2 == room) {
domsg $iif($cset(main,allcolor),$ifmatch,$cset(main,gencolor)) %b NONE :|
}
else {
tell $1 %b NONE :|
}
.halt
}
while (%a > 0) {
%b = %b $+ ï€ $+ $ini(inplay.ini,won,%a)
dec %a
}
if ($2 == room) {
domsg $iif($cset(main,allcolor),$ifmatch,$cset(main,gencolor)) %b
}
else {
tell $1 %b
}
}
}