on $*:TEXT:/^[!@>]alch */Si:*: {
  if ($read(alch.txt,w,$+(*,$2-,*))) notice $nick 13[7 ALCH 13]11 : $ifmatch 
  else if ($2 isnum) || ($7 isnum) || ($6 isnum) || ($5 isnum) || ($4 isnum) || ($3 isnum) {halt} 
  {
    notice $nick [ $$2- ] =8 [ $calc($$7) ]
    else notice $nick 13[7 ALCH 13]11 no price listed For $+(",$2-,".) sorry
  }
}

it will not calc the return of the txt. ($7) with the $2... cannot figure how to do it else...