21 lines
254 B
Text
21 lines
254 B
Text
START ;Simple File Input and Output
|
|
|
|
RECORD TEMP
|
|
INLINE, A72
|
|
|
|
|
|
PROC
|
|
OPEN (8,I,"input.txt")
|
|
OPEN (9,O,"output.txt")
|
|
|
|
|
|
LOOP,
|
|
READS(8,TEMP,END)
|
|
WRITES(9,TEMP)
|
|
GOTO LOOP
|
|
|
|
END,
|
|
CLOSE 8
|
|
CLOSE 9
|
|
|
|
END
|