TEXT
176
I x02 2300 if dstring i
Guest on 25th December 2024 03:24:26 AM
I = X'02'
23000 IF (DSTRNG(I) .EQ. DELIM .OR. I .GE. X'7E') GOTO 23002
CALL DSP$ (DSTRNG(I))
I = I + X'01'
GOTO 23000
Raw Paste
Login or Register to edit or fork this paste. It's free.