;KBUF.ACT;A 100-CHARACTER KEYBOARD BUFFER; uses page 6 to $6F4 (or so).;Also uses 204, 205 ($CC, $CD).;Object code from COMPUTE! magazine.;Set up for ACTION! by W.D.Aycock.;Last modified 12-17-85.;***********************************;NotLuL#m$H#m$H8$$H$$HLL#H#H$H$HHHHH 5HH 'LMLL*** FILE TOO LARGE ***L &' 'LLOnly first %U bytes read.%E%EHHL *)LBML+MFile %S read, %U bytes.%E#HHM *)$$HILvM$$$$$mH$$mH$LM$$H$H$## m* 3'`TLM 'LM Write a file.M &'#Ϣ# m*LM%Ecurrent file: %S#M *)#L NLN(none)M &'LN '#LvNL1NWrite to current file? N 9' {'$$ -$$ ' '$IYLkNLNLvN$IXLvN`LNFilename or ? Ny 9'# Z'# /#LN`# '0LMMLNAppend to current file? N 9' {'$$ -$$ ' '$IYLO MLO$IXLO` 'MIL=OL3OWriteO- 9'LNOLGOAppendO@ 9'LZO to %S? #OQ *) {'$$ -$$ ' '$IYLOM# &$$## 5 3'## m*&$%$ &'`OLO$ $LPLO%E%E%S%Eq$p$O *)` 7#m$#m$OL.P (%U) is %B $O$P" *)O 6O 6LbP :change to? PU 9' M+)?ILPX ' '`# Z'# /#LPLPLP$$$M$ $M$LP$$LP# -OOIXLP`LCSO =+L*Q#m$#m$HH# (hh$$LCSOI$LiQ#m$#m$HH# t4hh$$LCSOI'LQ#ILQ#m$#m$ LQ#m$#m$#$$LCSOI+L R# ,# 4OO$mO$mO$$LR$mO$$mO$LR7$6$ &'LCSOI-LwR# ,# 4OO$O$OLkR8$O$$O$LtR7$6$ &'LCSOI/LS# ,# /#LR#OOI/LR8$$$$LR# 4OOO$O$LRO$O$LR7$6$ &'LS$$LCSOI?LS 7LCSL list from cursorS &'L1T% number list from specific placeT &'LUT cursor pos: %U (%H)%E$$$$T; *)LT end of file: %U (%H)%E8$$8$$Tq *)LT List from? T 9' M+)?ILTX ' '`# Z'# /#L U$aS$`SL5U# -IXL$U`L5U# 4aS`SaS$`S$bSbSLVbS $e`S$iaS`S$aS$LULU!End of file reached at %U (%H).%E8$$8$$U *)LVLU%UaS`SU *) b5cScSL&V`SmcSaSi#e#e C7cSLU ' b5cScSLmV`SmcSaSi#e#e 6cSL3V ' b5cScSLV`SmcSaSi#e#e 6cSLzV 'bSLJU`Si$aSi$$$$$L W0$$LW8$0$$$L W$$LS` WLW8$$W$$WRLNW%Ecursor at: %U (%H)%E$$$$W7 *)LWfile size: %U (%H) bytes%E$$$$Wj *)LWfree mem : %U (%H) bytesWWWWW *)d$$ B&WW B&WWLX (%B%%)%E%EWWX *)RLGXUtilities: hit a key to chooseX( &'LhX X exit to Main MenuXQ &'LX C change the file sizeXr &'LX S set a block to a valueX &'LX M move a block within fileX &'LY T transfer two equal blocksX &'L%Y U unlock a disk fileY &' 'LEY Your choice? Y7 9'R {'$$ -$$ ' '$IXL|Y`LY$ICLY j9LY$ISLY ?LY$IMLY S;LY$ITLY ALY$IULY ELY`LW`LY####8#$#$$$## )%$~%$F%F~%$$$$# R ' ' HL]Z%E%EӠ%E%E%EZC *)R 'LZA Byte-Oriented File EditorZn &'R ' ' 'LZFree memory: %U (%H) bytes.%E%E$$$$Z *)R 'L [%This program is in the public domain.Z &'L9[$W.D.Aycock ** Novatari ** Jan.86[ &'Li[%Documentation is in file EDBYTES.DOC.[C &' ' 'L[Type a letter...[y &'R 3' 3'L[K:[ & <6 '#L[L[ file in memory: %S%E%E#Ϣ[ *)L \ lear ead rite[ &'L?\# dit ist tilities eit ? \ 9' {'$$ -$$ ' '$IXL\ 'L\Quit for sure (Y or N)? \y 9' {'$$ -$$ ' '$IYL\Ly]Lv]$ICL\ HLv]$IRL\ HLv]$IWL\ MLv]$IEL ] OLv]$ILL] dSLv]$IUL,] WLv]LF]%E Invalid command.%E]/ *)Lo] Type C, R, W, E, L, U, or X.]P &'L[ 3' 3'R$%$~%``Y