on *:text:*Erfolg* Du hast*:#:{
  var %in = $remove($8,$chr(44)))
  var %jn = %in / $4
  var %kn = $calc(($4 / 100) * 1n)
  var %ln = $calc(%in / ($4 + %kn))
  if ($round(%jn,0) != %jn) { msg $chan 7 $nick 10kauft4 $4 kugeln für4 $ $+ $round(%ln,0) 10per kugeln. 10(Mit Hammer) }
  if ($round(%jn,0) == %jn) { msg $chan 7 $nick 10kauft4 $4 kugeln für4 $ $+ %jn 10per kugeln. 10(Kein Hammer) }
  /msg $chan 7 $nick 10Du kannst wieder Kugeln kaufen in4 59 minuts
  var %Rem = $remove($address($nick,2),$chr(64),$chr(33),$chr(42),.users.omerta))
  var %meh = [ %Rem ] $+ kugelnnick.txt
}
alias kugeln {
  var %t = $read($2, 1)
  if (%t ison $1) { msg $1 %t 10Du kannst wieder Kugeln kaufen!
  }

  on *:text:Du hast*:#: {
    /set %chan $chan
    var %costs $remove($8,$chr(44),.)
    var %bullets $remove($8,$chr(44),.)
    /write kugelnnick.txt $nick
    /timer 1 3600 /msg $chan 7 $read(kugelnnick.txt) 10Du kannst wieder Kugeln kaufen!
    /write -dl1 kugelnnick.txt
  }