diff --git a/src/sysen3/od.29 b/src/sysen3/od.29 deleted file mode 100644 index 1ce4603d..00000000 --- a/src/sysen3/od.29 +++ /dev/null @@ -1,64 +0,0 @@ -TITLE OD - print binary file - -A=1 -B=2 -C=3 -D=4 -E=5 -BIN=7 -TYO=8 -P=17 - -$$RFN==1 - -.INSRT SYSENG; RFN > - -FNAM: -DEV: 0 -FN1: 0 -FN2: 0 -SNAM: 0 - -JCL: BLOCK 10 - -START: - MOVE P,[-100,,PDL] - - .BREAK 12,[..RJCL,,JCL] - MOVEI B,FNAM - MOVE D,[440700,,JCL] - PUSHJ 17,RFN"RFN - - .CALL [SETZ - SIXBIT /OPEN/ - %CLBIT,,.UII - %CLIMM,,BIN - DEV ? FN1 ? FN2 ? SETZ SNAM] - - .CALL [SETZ - SIXBIT /OPEN/ - %CLBIT,,.UAO - %CLIMM,,TYO - SETZ [SIXBIT /TTY/]] - .LOSE - - MOVE D,[440700,,HEY] - .CALL [SETZ - SIXBIT /SIOT/ - %CLIMM,,TYO - D - SETZ 10] - .LOSE - - .LOGOUT 1, - -RSIXTP: - POPJ 17, - -PDL: BLOCK 100 - -HEY: ASCIZ /hello world/ - -END START - - diff --git a/src/sysen3/od.39 b/src/sysen3/od.39 deleted file mode 100644 index 26cb24dc..00000000 --- a/src/sysen3/od.39 +++ /dev/null @@ -1,60 +0,0 @@ -TITLE OD - print binary file - -A=1 -B=2 -C=3 -D=4 -E=5 -P=17 - -BIN=7 -TYO=8 - -$$RFN==1 -.INSRT SYSENG; RFN > - -FNAM: -DEV: 0 -FN1: 0 -FN2: 0 -SNAM: 0 - -START: - MOVE P,[-PDLSIZ,,PDL] - - .BREAK 12,[..RJCL,,JCL] - MOVEI B,FNAM - MOVE D,[440700,,JCL] - PUSHJ 17,RFN"RFN - - .CALL [SETZ - SIXBIT /OPEN/ - [.UOO,,BIN] - DEV ? FN1 ? FN2 ? SETZ SNAM] - - .CALL [SETZ - SIXBIT /OPEN/ - [.UAO,,TYO] - SETZ [SIXBIT /TTY/]] - .LOSE - - MOVE D,[440700,,HEY] - .CALL [SETZ - SIXBIT /SIOT/ - %CLIMM,,TYO - D - SETZ [11.]] - .LOSE - - .LOGOUT 1, - -RSIXTP: - POPJ 17, - -JCL: BLOCK 10 -PDLSIZ=100 -PDL: BLOCK PDLSIZ - -HEY: ASCIZ /hello world/ - -END START diff --git a/src/sysen3/od.93 b/src/sysen3/tapex.1 similarity index 100% rename from src/sysen3/od.93 rename to src/sysen3/tapex.1