Bug In $read - 17/08/03 07:22 AM
the status window says: * $base invalid parameters, even though i use the "n" switch in read(dont evaluate whats being read), this happens when im reading versions.txt from dohcans dstudio final.
this is my script:
this is my script:
Code:
alias aplay { var %i 1 if ($1 == -s) { /eplay $2- | halt } if (!$exists($gettok($+(",$1-,"),1,64))) { echo -a 2* /aplay no such file | halt } if (!$2) { echo -a 2* /aplay invalid paramaters | halt } if ($lines($gettok($+(",$1-,"),1,64)) < 1) { echo -a 2* /aplay nothing to read | halt } if (!$window($eval(@ $+ $gettok($1-,2,64),2)).x) { window -a $eval(@ $+ $gettok($1-,2,64),2) } while (%i <= $lines($gettok($+(",$1-,"),1,64))) { $iif(!$read($gettok($+(",$1-,"),1,64),%i),goto next,echo $eval(@ $+ $gettok($1-,2,64),2) $read($gettok($+(",$1-,"),1,64),n,%i)) :next inc %i } }
Code:
alias eplay { var %x 1 while (%x <= $lines($+(",$1-,"))) { $iif(!$read($+(",$1-,"),%x),goto next,echo -s $read($+(",$1-,"),n,%x)) :next inc %x } }