on *:TEXT:*Gold stolen*:#: { if ($left($4,1) == $chr(9)) { set %GoldStolen $remtok($5,$chr(9),1,9) set %SACounter $remtok($12,$chr(9),1,9) tokenize 44 %GoldStolen set %FarmingCompetitionGoldHit $strip($1 $+ $2 $+ $3) hinc FarmingCompetition $nick $strip($1 $+ $2 $+ $3) hinc FarmingCompetitionAttacks $nick 1 tokenize 44 %SACounter $iif($strip($1 $+ $2 $+ $3) < 100000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 1),) $iif($strip($1 $+ $2 $+ $3) isnum 100000000-200000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.95),) $iif($strip($1 $+ $2 $+ $3) isnum 200000001-300000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.90),) $iif($strip($1 $+ $2 $+ $3) isnum 300000001-400000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.85),) hsave FarmingCompetition FarmingCompetition.txt hsave FarmingCompetitionAttacks FarmingCompetitionAttacks.txt hload FarmingCompetition FarmingCompetition.txt hload FarmingCompetitionAttacks FarmingCompetitionAttacks.txt hsave FarmingCompetitionScore FarmingCompetitionScore.txt hload FarmingCompetitionScore FarmingCompetitionScore.txt } elseif ($left($4,1) != $chr(9)) { set %GoldStolen $5 set %SACounter $12 tokenize 44 %GoldStolen set %FarmingCompetitionGoldHit $strip($1 $+ $2 $+ $3) hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit ^ 2 / $strip($1 $+ $2 $+ $3)) / 100000) hinc FarmingCompetition $nick $strip($1 $+ $2 $+ $3) hinc FarmingCompetitionAttacks $nick 1 tokenize 44 %SACounter $iif($strip($1 $+ $2 $+ $3) < 100000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 1),) $iif($strip($1 $+ $2 $+ $3) isnum 100000000-200000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.95),) $iif($strip($1 $+ $2 $+ $3) isnum 200000001-300000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.90),) $iif($strip($1 $+ $2 $+ $3) isnum 300000001-400000000,hinc FarmingCompetitionScore $nick $calc((%FarmingCompetitionGoldHit / 1000000) * 0.85),) hsave FarmingCompetition FarmingCompetition.txt hsave FarmingCompetitionAttacks FarmingCompetitionAttacks.txt hload FarmingCompetition FarmingCompetition.txt hload FarmingCompetitionAttacks FarmingCompetitionAttacks.txt hsave FarmingCompetitionScore FarmingCompetitionScore.txt hload FarmingCompetitionScore FarmingCompetitionScore.txt } }