Hi, so I need help with gambling script.

This is what I got
Code:
on $*:text:/!slots/Si:#: {
  set %taskai $get.pts(#,$nick)
  if (%taskai < $2) msg # $+($nick,$chr(44)) you only have %taskai chips
  else {
    set %prand $rand(1,175)
    set %srand1 $rand(1,5)
    set %srand2 $rand(1,5)
    set %srand3 $rand(1,5)
    while (%srand1 == %srand2) {
      set %srand2 $rand(1,5)
    }
    if (%prand < 5) {
      set %srand1 3
      set %srand2 3
      set %srand3 3
    }
    elseif (%prand < 15) {
      set %srand1 2
      set %srand2 2
      set %srand3 2
    }
    elseif (%prand < 30) {
      set %srand1 1
      set %srand2 1
      set %srand3 1
    }
    if (%srand1 == 1) set %srand1 @ 
    if (%srand1 == 2) set %srand1 % 
    if (%srand1 == 3) set %srand1 $ 
    if (%srand1 == 4) set %srand1 & 
    if (%srand1 == 5) set %srand1 ! 
    if (%srand2 == 1) set %srand2 @ 
    if (%srand2 == 2) set %srand2 % 
    if (%srand2 == 3) set %srand2 $ 
    if (%srand2 == 4) set %srand2 & 
    if (%srand2 == 5) set %srand2 ! 
    if (%srand3 == 1) set %srand3 @ 
    if (%srand3 == 2) set %srand3 % 
    if (%srand3 == 3) set %srand3 $ 
    if (%srand3 == 4) set %srand3 & 
    if (%srand3 == 5) set %srand3 ! 
    set %win1 $2
    set %win2 $calc( $2 * 5 )
    set %win3 $calc( $2 * 10 )
    set %awins 0
    PRIVMSG $nick Isriedejo: ( %srand1 )( %srand2 )( %srand3 )
    if (%srand1 == @) if (%srand2 == @) if (%srand3 == @) {
      if (%srand1 == %srand2 && %srand2 == %srand3) {
        if ($calc( %win1 * 2 ) > %awins) set %awins $calc( %win1 * 2 )
      }
    }
    if (%srand1 == % || %srand2 == % || %srand3 == %) {
      if (%srand1 == %srand2 && %srand2 == %srand3) {
        if (%win2 > %awins) set %awins %win2
      }
    }
    if (%srand1 == $ || %srand2 == $ || %srand3 == $) {
      if (%srand1 == %srand2 && %srand2 == %srand3) {
        if (%win3 > %awins) set %awins %win3
      }
    }
    if (%awins == 0) {
      PRIVMSG $nick Atsiprasau, tu pralaimejai $comma($2) tasku
      add.pts $+ $nick 
      set %outval $calc( %taskai - $2 )
      add.pts # $nick %outval
    }
    else {
      PRIVMSG $nick Sveikinu! Tu laimejai $comma(%awins) tasku!
      add.pts # $nick $+ 
      set %outval $calc(( %taskai - $2 ) + %awins ))
      add.pts # $nick %outval
    }
    PRIVMSG $nick $+($nick,$chr(44)) dabar tu turi $comma($get.pts(#,$nick))
    PRIVMSG $nick Palauk 60sec jei nori vel suzaisti
    ignore -cu60 $nick
    timertime 1 60 PRIVMSG $nick You can now play again!
  }
}


And main problem is here
Code:
   if (%awins == 0) {
      PRIVMSG $nick (Lose) Atsiprasau, tu pralaimejai $comma($2) tasku
      add.pts $+ $nick 
      set %outval $calc( %taskai - $2 )
      add.pts # $nick %outval
    }
    else {
      PRIVMSG $nick (Win) Sveikinu! Tu laimejai $comma(%awins) tasku!
      add.pts # $nick $+ 
      set %outval $calc(( %taskai - $2 ) + %awins ))
      add.pts # $nick %outval
    }

Maybe someone can help fix this?

p.s. this is points system http://pastebin.com/tkxMJuqr