Larken Lines

#5 and counting! We hope that it keeps up! As always, if I do not receive enough input on this column, I will be forced to discontinue it. If you have any new ideas to submit concerning the Larken Disk operating system, please send it to THE PLOTTER in care of Rod Gowen. ALL ideas are considered for publication, and this column is being reprinted in the new TS UP DATES MAGAZINE out of Florida.

I am going to turn it over to GAYLEN BENCH of our own local group this time. He sent me the following changes that he made to the MOVE program furnished on your original Larken disk/tape. It is being printed here exactly as I received it, take it away Gaylen:

---

Rod, if the following changes are made to the Larken move program that comes with the Master Larken disk when you buy the system; it will add two more opinions to the program.

By choosing number five, you will be given the choice of doing a cataloy of any of your drives, copying the catalog to the 2040 printer, and then you have the choice of erasing any one of the files listed by entering the complete file name and pressing any key.

I hope this will help any one using the Larken system as it has me. I found a need to erase some files and to my knowledge this opinion was not given in any of the utility programs that I had.

Gaylen

 150>PRINT AT 19,0;"'5'     Erase
File"
 190 INPUT "Enter 1, 2, 3, 4, or
5  "; LINE a$
 219 IF a$="5" THEN GO SUB 500
 220 GO TO 10
 500 CLS : PRINT "This utility g
ives you the         opption of
doing a directory    of any Driv
e, doing a copy      of that Dir
ectory and erasing   any file li
sted from that       disk."
 520 INPUT "(DRIVE:0 1 2 3 4)"'"
RETURN TO MAIN MENU: '5'";A: CLS

 521 IF A=5 THEN RETURN
 525 PRINT #4: GO TO A
 530 PRINT #4: CAT "",: INPUT "(
C)OPY? ";C$
 535 IF C$="C" OR C$="c" THEN CO
PY : LPRINT ''''
 540 INPUT "(ERASE FILE? ENTER N
AME:)";N$
 550 IF N$="" THEN GO TO 520
 560 IF LEN N$>9 THEN GO TO 540
 570 PRINT "PRESS ANY KEY TO ERA
SE FILE: ";'';TAB 10;N$: PAUSE 0
 580 PRINT #4: ERASE N$,: GO TO
500
9500 REM ** Save to Disk **
9510 PRINT #4: SAVE "MOVE/E.B1"
LINE 9700
9520 PRINT #4: SAVE "MOVE.C1"COD
E 32000,1000: RUN

---

Thank you Gaylen.

Next month I am planning to talk about the other Larken DOS systems that are available: RAMEX, AERCO and OLIGER. I have used 2 of the 3 systems and we have 1 member, Dick Wagner, who uses the other. I know that I promised this for this issue, but I am sure you will forgive me.

Watch for it!