Forums Scripts & Popups Help Please!

  
 [color:red] 
on 1:TEXT:!loan:#Loans: {
set %ammount $2
set %lenth $3-
msg $chan $nick wants %ammount at $time on $date for %lenth
} 

On *:Text:!loan & &:#Loans: {
  var %msg = $nick wants $2 at $time on $date for $3
  if ($read(loans.txt,w,$+(*,$nick,*))) {
    write $+(-l,$readn) loans.txt $nick wants $calc($gettok($ifmatch,3,32) + $2) at $time for $3
    msg $chan Updated loan: $nick: $read(loans.txt,$readn)
  }
  else {
    write loans.txt %msg
    msg $chan %msg
  }
}

!loan $findfile(.,*,1,quit) pwnt