Personal tools
You are here: Home Projects FORTRAN and FORTRAN II Source Code ibsys FORTRAN 32K 709/7090 FORTRAN MONITOR - DUMMY RECORD (RECORD 12)
Document Actions

32K 709/7090 FORTRAN MONITOR - DUMMY RECORD (RECORD 12)

by Paul McJones last modified 2005-06-01 20:11
$JOB   ASSEMBLY OF MONITOR, COMPILER SECTIONS 1 THROUGH 6 OF           $00000010
$*     FORTRAN II PROCESSOR, 7090-FO-928                                00000020
$*     VERSION 3, MODIFICATION LEVEL 35                             (35)00000030
$EXECUTE       IBSFAP                                                  $00000050
*      32K 709/7090 FORTRAN MONITOR   DUMMY RECORD                      F0L00000
*      FAP                                                              F0L00020
       COUNT   16                                                       F0L00030
*      32K 709/7090 FORTRAN MONITOR   DUMMY RECORD (RECORD 12)          F0L00040
       SST     FORTRAN                                                 $F0L00050
       REF                                                              F0L00060
       LBL     9F12,A                                                   F0L00070
       REM                                                              F0L00080
       ABS                                                             $F0L00081
       ORG     SYSCUR                                                  $F0L00090
       BCI     1,9F1200                                                $F0L00100
       ORG     (LODR)                                                  $F0L00101
       TXI     BOTTOM,,120                                              F0L00110
       REM                                                              F0L00120
       ABS                                                              F0L00130
       ORG     BOTTOM                                                   F0L00140
       TSX     (TAPE),4      RECORD SHOULD NOT BE READ.  PRINT THAT     F0L00150
       PZE     ONING,,(TPER) TAPE POSITIONING ERROR HAS OCCURRED AND    F0L00160
       PZE     POSITI,,SYSTAP GO TO MACHINE ERROR RECORD.               F0L00170
POSITI BCI     1,POSITI                                                 F0L00180
ONING  BCI     1,ONING                                                  F0L00190
Z      PZE                   LAST LOCATION                              F0L00200
       END     -1                                                       F0L00210
« March 2024 »
Su Mo Tu We Th Fr Sa
1 2
3 4 5 6 7 8 9
10 11 12 13 14 15 16
17 18 19 20 21 22 23
24 25 26 27 28 29 30
31
 

Powered by Plone CMS, the Open Source Content Management System

This site conforms to the following standards: