TEXT   174
I x02 2300 if dstring i
Guest on 25th December 2024 03:24:26 AM


  1. I = X'02'
  2. 23000 IF (DSTRNG(I) .EQ. DELIM .OR. I .GE. X'7E') GOTO 23002
  3.         CALL DSP$ (DSTRNG(I))
  4.         I = I + X'01'
  5.         GOTO 23000
Raw Paste

Login or Register to edit or fork this paste. It's free.