GASS Operations

Thanks you very much for using MSI.



                          GASS OPERATIONS LIST

     0  0000  VIEW COMMENT & READ DATA FROM INPUT DEVICE BY FORMAT
     1  0001  SEARCH REPORT(ARG1),ANSWER FIELD(ARG2)-PUT 1ST MATCH DATA HERE
     2  0002  SEARCH REPORT(ARG1),ANSWER FIELD(ARG2)-PUT SUM OF MATCHES HERE
     3  0003  TOTAL THIS INTEGER FIELD AT PRINT TIME - MUST BE 1ST IN FIELD
     4  0004  TOTAL THIS FLOATING FIELD AT PRINT TIME - MUST BE 1ST IN FIELD
     5  0005  CLEAR ALL PRECEDING OP.28 SEARCH DATA
     6  0006  RAISE FIELD(ARG1) TO FIELD(ARG2) POWER - RESULTS HERE
     7  0007  TAKE SQUARE ROOT OF VALUE HERE - RESULTS HERE
     8  0008  CLEAR ALL PRECEDING OP.31 SEARCH DATA
     9  0009  PRINT ROW NUMBER HERE - NO DATA - MUST BE ONLY OP. IN FIELD
    10  000A  ADD FIELD(ARG1) TO FIELD(ARG2) - RESULT HERE - I FORMAT
    11  000B  ADD FIELD(ARG1) TO FIELD(ARG2) - RESULT HERE - F & D FORMAT
    12  000C  SUBTRACT FIELD(ARG2) FROM FIELD(ARG1)- RESULT HERE - I FORMAT
    13  000D  SUBTRACT FIELD(ARG2) FROM FIELD(ARG1)- RESULT HERE-F&D FORMAT
    14  000E  MULTIPLY FIELD(ARG1) BY FIELD(ARG2) - RESULT HERE - I FORMAT
    15  000F  MULTIPLY FIELD(ARG1) BY FIELD(ARG2) - RESULT HERE - F&D FORMAT
    16  0010  DIVIDE FIELD(ARG1) BY FIELD(ARG2) - RESULT HERE - I FORMAT
    17  0011  DIVIDE FIELD(ARG1) BY FIELD(ARG2) - RESULT HERE - F&D FORMAT
    18  0012  PLACE VALUE(ARG1) HERE - I FORMAT
    19  0013  PLACE VALUE(ARG1) HERE - F & D FORMAT
    20  0014  PRINT COMMENTS HERE AT PRINT TIME - MUST BE ONLY OP. IN FIELD
    21  0015  PRINT THE WORD TOTAL ON LAST LINE AT PRINT TIME-A FMT-1ST OP.
    22  0016  ALLOCATE(ARG1) A-FORMAT FIELDS TO RECIEVE DATA - SKIP ON "ESC"
    23  0017  SEND # OF LINE FEEDS(ARG1) AT PRINT TIME - MUST BE ONLY OP.
    24  0018  SEND ONE FORM FEED AT PRINT TIME - MUST BE ONLY OP.
    25  0019  PRINT RUNNING TOTALS HERE - F&D FORMAT - MUST BE 1ST IN FIELD
    26  001A  SKIP ALPHA FIELDS ON RECEIPT OF "ESC" - SEE OP.27 TO STOP
    27  001B  STOP SKIPPING OF FIELDS AT THIS FIELD - SEE OP.26 TO SKIP
    28  001C  SAVE VALUE HERE TO SEARCH FIELD(ARG1),TYPE(ARG2) - SEE OPS.1&2
    29  001D  PRINT COMMENT HERE IF ANSWER TO SYSTEM QUERY IS 1-MUST BE ONLY
    30  001E  SEARCH REPORT(ARG1) AT PRINT TIME & PRINT MATCHES - A FORMAT
    31  001F  SAVE VALUE HERE TO SEARCH FIELD(ARG1),TYPE(ARG2) - MUST BE 1ST
    32  0020  CANCEL ALL PRECEDING OP.34 DATA - MUST NOT BE ALONE IN FIELD
    33  0021  SAVE VALUE HERE AS TEST DATA FOR OP.35, 37, 84, 108, 143, ETC.
    34  0022  SAVE DATA HERE FOR TRANSFER TO FIELD(ARG1) DURING OP.35 OR 37
    35  0023  GENERAL UPDATE REPORT(ARG.2) IF CONDITION TYPE(ARG1) IS MET
    36  0024  PRINT REPORT NAMED(ARG1), ROW# = VALUE HERE- MUST BE 1ST-I FMT
    37  0025  GENERAL UPDATE REPORT(A6 DATA HERE) IF CONDITION(ARG1) IS MET
    38  0026  VALUE HERE IS SOURCE ROW# FOR READ OPS.(53,94,ETC.) - I FORMAT
    39  0027  PUT CURRENT ROW# AS VALUE HERE - I FORMAT
    40  0028  STORE NO DATA IN THIS REPORT (ROW# ALWAYS = 1)
    41  0029  REPLACE VALUE HERE WITH ITS NATURAL LOGARITHM - D FORMAT
    42  002A  REPLACE THE VALUE HERE WITH ITS COMMON LOGARITHM - D FORMAT
    43  002B  REPLACE THE VALUE HERE WITH ITS EXPONENTIAL - D FORMAT
    44  002C  REPLACE THE ANGLE IN RADIANS HERE WITH ITS SINE - D FORMAT
    45  002D  REPLACE THE ANGLE IN RADIANS HERE WITH ITS COSINE - D FORMAT
    46  002E  REPLACE THE ANGLE IN RADIANS HERE WITH ITS TANGENT - D FORMAT
    47  002F  REPLACE THE VALUE HERE WITH ITS ARCTANGENT - D FORMAT
    48  0030  REPLACE THE VALUE HERE WITH ITS SINH - D FORMAT
    49  0031  REPLACE THE VALUE HERE WITH ITS COSH - D FORMAT
    50  0032  REPLACE THE VALUE HERE WITH ITS TANH - D FORMAT
    51  0033  VALUE HERE IS DESTINATION ROW# FOR WRITE OPS.(52,93,ETC.)-I FMT
    52  0034  ADD VALUE HERE TO REPORT(ARG1), FIELD(ARG2) ROW# = OP.51 VALUE
    53  0035  READ VALUE FROM REPORT(ARG1), FIELD(ARG2), ROW# = OP.38 VALUE
    54  0036  PUT CURRENT FIELD# AS VALUE HERE - I FORMAT
    55  0037  VIEW COMMENTS HERE ON UPDATE - A1 FORMAT - MUST BE ONLY OP.
    56  0038  PRINT REPORT(A6 DATA HERE) AT PRINT TIME- MUST BE 1ST IN FIELD
    57  0039  VALUE HERE IS 1ST ROW# FOR OP.56 TO PRINT IF OP.58 IS NOT ZERO
PA
    58  003A  VALUE HERE IS # OF ROWS FOR OP.56 TO PRINT IF OP.57 IS NOT 0
    59  003B  PRINT THE ROW NUMBERS FOR OP.56 IF VALUE HERE IS NOT ZERO
    60  003C  MODIFY OP.52 TO REPLACE THE VALUE IF NON-ZERO
    61  003D  MODIFY OP.52 TO STORE 0 IF THE VALUE IS NON-ZERO
    62  003E  VIEW DATA ENTERING THIS FIELD - MUST BE BEFORE ACTION OP.
    63  003F  VIEW & PRINT DATA ENTERING THIS FIELD - MUST BE BEFORE ACTION
    64  0040  FORMAT CONVERSION FROM CHARACTER(ARG1) TO CHARACTER(ARG2)& 104
    65  0041  PUT COMMENTS HERE AS DATA - A FORMAT
    66  0042  SEARCH REPORT NAMED AS DATA HERE AT PRINT TIME - DYNAMIC OP.30
    67  0043  REPLACE THE DECIMAL POINT WITH(ARG1) BLANKS (NEG# PUTS COMMAS)
    68  0044  INHIBIT THIS FIELD FROM PRINTING UNLESS FILE MGT.=CH
    69  0045  DEACTIVATE OP.52 HERE IF DATA HERE IS BLANK - A FORMAT
    70  0046  MODIFIES OP.37 SO THAT REPORT NAME IS DATA HERE - A6 FORMAT
    71  0047  DEACTIVATE UPDATE CODE 8 FOR THIS FIELD
    72  0048  USE DATA HERE AS REPORT NAME FOR OTHER OPS. - A6 FORMAT
    73  0049  UPDATE REPORT(OP.72), FIELD(ARG2) LIKE OP.52 BUT DYNAMIC
    74  004A  INHIBIT OP.36 FOR(ARG1) ROWS 1ST, THEN(ARG2) ROWS THEREAFTER
    75  004B  PUT THE MONTH HERE AS DATA FROM THE REAL-TIME CLOCK - I FORMAT
    76  004C  PUT THE DAY HERE AS DATA FROM THE REAL-TIME COLCK - I FORMAT
    77  004D  PUT THE YEAR HERE AS DATA FROM THE REAL-TIME CLOCK - I FORMAT
    78  004E  PUT THE HOUR HERE AS DATA FROM THE REAL-TIME CLOCK - I FORMAT
    79  004F  PUT THE MINUTE HERE AS DATA FROM THE REAL-TIME CLOCK- I FORMAT
    80  0050  PUT AM OR PM HERE AS DATA FROM THE REAL-TIME CLOCK - A FORMAT
    81  0051  DATA HERE=FIELD# FOR OP.52 OR TABLE# FOR OPS.93,94,ETC.- I FMT
    82  0052  DATA HERE = FIELD# FOR OP.53 ONLY - I FORMAT
    83  0053  DATA HERE = LOOP COUNTER FOR OPS.35,37 LAST ROW# FOR OP.98,ETC
    84  0054  MAKE COMMENTS HERE DATA IF TYPE(ARG1) TEST IS MET, ELSE BLANKS
    85  0055  DISABLES OPS.1,2,34,35,37,52,& 53 IN CALLED REPORTS- SEE OP.86
    86  0056  ENABLE SUPPRESSED TRANSFERS THIS TIME - SEE OPS.86 & 90
    87  0057  MAKES LEADING ZEROES IN THIS F/D FIELD ASTERISKS - MUST BE 1ST
    88  0058  MAKE VALUE HERE CONTROL FOR OPS.35,37, OR 52 TO "RUN"
    89  0059  RESET OP.88 TO REENABLE LOOP COUNTER, ALSO RESETS OP.83
    90  005A  INHIBIT OPS.34,35, OR 37 IN THIS FIELD UNLESS UNDER 86
    91  005B  REMOVE GENUP FROM REPORT(ARG1)(OR A6 DATA HERE)
    92  005C  REMOVE REPORT(ARG1)(OR A6 DATA HERE)
    93  005D  STORE DATA HERE INTO TABLE#(OP.81), ROW#(OP.51){SERIAL ACCESS}
    94  005E  GET DATA FROM TABLE#(OP.81), ROW#(OP.38) FOR HERE {SERIAL}
    95  005F  SEARCH REPORT(LAST A FIELD),ANSWER FIELD(ARG2)- PUT MATCH HERE
    96  0060  VALUE HERE IS NEXT ROW# TO PRINT OF THE CURRENT REPORT - I FMT
    97  0061  RESET OPS.83 & 88 IF VALUE HERE IS ZERO (ENABLES RETURN)
    98  0062  SEARCH A TABLE FOR ALL MATCHES OF DATA HERE - SEE OP.113, ETC.
    99  0063  ADD NUMERIC VALUE HERE TO TABLE#(OP.81),ROW#(OP.38)
   100  0064  LOAD TABLE DIRECTORY FOR # OF ROWS WRITTEN
   101  0065  STORE DATA HERE INTO TABLE#(OP.81),ROW#(OP.51) VIA DIRECTORY
   102  0066  GET DATA FROM TABLE#(OP.81),ROW#(OP.38) TO HERE VIA DIRECTORY
   103  0067  SAVE DATA HERE INTO MEMORY ACCORDING TO THE FORMAT
   104  0068  GET DATA FROM MEMORY ACCORDING TO THE FORMAT OR OP.64
   105  0069  SAVE DATA HERE INTO MEMORY FROM D.P.(ARG1), (ARG2)# OF CHARS.
   106  006A  VALUE HERE = # OF COPIES TO PRINT OF THE REPORT(S) UPDATED
   107  006B  SORT SUB REPORT(OP.72),SOURCE#=OP.38,DEST#=OP.51,ON COL(ARG1)
   108  006C  DISABLE TRANSFER OPS. IF LOGIC(VALUE HERE) MATCHES OP.33 VALUE
   109  006D  LIKE OP.102 BUT DISABLED ON ITEM UPDATE UNLESS FOR THIS FIELD
   110  006E  LIKE OP.104 BUT DISABLED ON ITEM UPDATE UNLESS FOR THIS FIELD
   111  006F  VALUE HERE = UNIT# FOR TABLES
   112  0070  VALUE HERE = FILE# FOR TABLES
   113  0071  MODIFIES OP.98 FOR SEARCH TYPE
   114  0072  TABLE SEARCH LIKE OP.98 BUT STOP AFTER 1ST MATCH IS FOUND
   115  0073  VALUE HERE = PR# TO TRANSMIT TO FOR OP.106 PRINT - I FORMAT
   116  0074  SET UP OP.81(ARG1) & OP.38(ARG2) FOR TABLES
   117  0075  SET UP OP.81(ARG1) & OP.51(ARG2) FOR TABLES
PA
   118  0076  VALUE HERE = FILE# FOR OPS.36 & 56 - MUST BE 1ST OP. IN FIELD
   119  0077  VALUE HERE = UNIT# FOR OPS.36 & 56 - MUST BE 1ST OP. IN FIELD
   120  0078  LIKE OP.35 BUT WORKS WITH OPS.111 & 112 TO GENUP ACROSS FILES
   121  0079  LIKE OP.37 BUT WORKS WITH OPS.111 & 112 TO GENUP ACROSS FILES
   122  007A  PRINT REPORT(OP.126), ROW# = VALUE HERE (DYNAMIC OP.36)
   123  007B  LIKE OP.0 BUT PARSES CONTROL CHARACTERS
   124  007C  STORE INTO PRINT MEMORY ACCORDING TO FORMAT & OPS.74 & 128
   125  007D  PRINT "PRINT MEMORY" WHEN OP.74 COUNTER GOES TO ZERO
   126  007E  A6 DATA HERE = REPORT NAME FOR OP.122 - MUST BE 1ST IN FIELD
   127  007F  PRINT THE ENTIRE REPORT NAMED IN COMMENTS - NO DATA HERE
   128  0080  USE COMMENTS AS I VALUE FOR SUB#, # OF CHARS, ETC.-MUST BE 1ST
   129  0081  USE COMMENTS AS REPORT NAME FOR OP.122 - NO DATA HERE
   130  0082  MODIFY OP.36 IN THIS FIELD FOR GLOBAL COUNTER - SEE OP.131
   131  0083  MODIFY OP.74 IN THIS FIELD FOR GLOBAL COUNTER - SEE OP.130
   132  0084  ZERO THE GLOBAL COUNTER - MUST BE 1ST IN FIELD
   133  0085  ZERO PRINT MEMORY - MUST BE THE ONLY OP. IN THE FIELD
   134  0086  PRINT ROW# 1 OF THE REPORT NAMED IN THE COMMENTS - NO DATA
   135  0087  PRINT THIS I FORMAT FIELD WITH LEADING ZEROES - MUST BE 1ST
   136  0088  CHANGE PR# TO VALUE IN THIS I FORMAT FIELD
   137  0089  PRINT THIS I FORMAT FIELD AS HEXIDECIMAL - MUST BE 1ST
   138  008A  VIEW THE ENTIRE REPORT(OP.72) AT UPDATE TIME-MUST NOT BE ALONE
   139  008B  PRINT TABLE#(OP.81), ROW#(OP.38) ACCORDING TO \ OR ^ AT UPDATE
   140  008C  VIEW TABLE#(OP.81), ROW#(OP.38) ACCORDING TO \ OR ^ AT UPDATE
   141  008D  COPY TABLE#(OP.38) INTO TABLE#(OP.51) ACCORDING TO ANSWER TABL
   142  008E  PUT ABSOLUTE VALUE OF DATA HERE AS NEW DATA HERE
   143  008F  JUMP TO FIELD(ARG2) IF OP.33 VALUE MEETS LOGIC(ARG1) TEST
   144  0090  STORE VALUE HERE INTO FIELD#(ARG1) REGISTERS
   145  0091  LOAD VALUE IN FIELD#(ARG1) INTO CURRENT FIELD'S REGISTERS
   146  0092  COPY TABLE#(OP.38) INTO TABLE#(OP.81) VIA DIRECTORIES
   147  0093  GET FIRST ASCII VALUE IN MEMORY FOR "I" VALUE HERE
   148  0094  USE FIRST TWO ASCII CHARS IN MEMORY FOR "I" VALUE HERE
   149  0095  USE FIRST THREE ASCII CHARS IN MEMORY FOR "I" VALUE HERE
   150  0096  GIVE OTHER DEVICES A TIME SLICE NOW
   151  0097  DO NOT WAIT FOR OP.106 PRINT TO FINISH BEFORE FURTHER PROCESS
   152  0098  SET FIRST THREE CHARS HERE AS INPUT DELIMITERS; VALUES 1,2,& 3
   153  0099  MAKE VALUE HERE = DELIMITER VALUE INPUT
   154  009A  PUT CLOCK TICK IN THIS I FORMAT FIELD
   155  009B  CLEAR ALL OP.152 DELIMITERS
   156  009C  ACTIVATE WORD PROCESSING MODE ON THE PC
   157  009D  DEACTIVATE WORD PROCESSING MODE ON THE PC
   158  009E  PUT SCAN CODE HERE AND CLEAR SCAN CODE REGISTER
   159  009F  INTEGER HERE = Y-COORDINATE FOR OP.167
   160  00A0  INTEGER HERE = X-COORDINATE FOR OP.167
   161  00A1  PUT VALUE HERE IN SYSTEM REGISTER POINTED TO BY LAST OP.51
   162  00A2  PUT VALUE IN SYSTEM REGISTER POINTED TO BY LAST OP.38 HERE
   163  00A3  VIEW MEMORY AS ALPHA STRING, FORMAT # OF CHARS
   164  00A4  STORE 134 CHARS OF DEVICE MEMORY INTO SYSTEM MEMORY
   165  00A5  STORE SYSTEM MEMORY INTO DEVICE MEMORY (134 CHARS)
   166  00A6  I-VALUE HERE = VIDEO ATTRIBUTE CODE FOR OP.167
   167  00A7  PLACE CHAR OR I-VALUE HERE AT X=OP.160, Y=OP.159, ATTR.=OP.166
   168  00A8  I-VALUE HERE = FREQUENCY GENERATOR VALUE
   169  00A9  I-VALUE HERE = SOUND DURATION & EXCECUTE
   170  00AA  START PR=OP.136 WITH REPORT = OP.72
   171  00AB  SET PR DEVICE = COMPUTER-COMPUTER INTERFACE
   172  00AC  RESET OP.171
   173  00AD  PUT THIS PR# HERE AS I-DATA
   174  00AE  STORE I-VALUE HERE INTO INCREMENTER
   175  00AF  ADD ONE TO INCREMENTER AND SET OP.33 VALUE WITH IT
PA
   176  00B0  ADD ONE TO THE OP.38 COUNTER
   177  00B1  ADD ONE TO THE OP.51 COUNTER
   178  00B2  PLACE INCREMENTER VALUE AS DATA HERE
   179  00B3  PUT I-VALUE HERE INTO THE DIVIDEND REGISTER
   180  00B4  DIVIDE I-VALUE FROM LAST I-FIELD BY DIVIDEND REG., QUOTIENT HERE
   181  00B5  PLACE THE REMAINDER FROM OP.180 HERE
   182  00B6  PRINT PORTION OF PC MONITOR SCREEN
   183  00B7  USER IMPLIMENTED.
   184  00B8  SET LF'S FOR PR DEVICE TO VALUE OF THIS I FIELD.
   185  00B9  PLACE SYSTEM PSUEDO JULIAN DATE (PJD)  INTO THIS I FIELD.
   186  00BA  CONVERT 6 ASCII NUMBERS IN THIS A-FIELD TO A PJD IN FIXED REG.
   187  00BB  CONVERT I-VALUE IN THIS FIELD TO AN ASCII STRING - TO MEMORY
   188  00BC  PLACE THIS SUB'S # INTO THIS I-FIELD.
   189  00BD  SET STACK POINTER TO THIS FIELD'S FIXED POINT REG VALUE.
   190  00DE  PUSH DOUBLE PRECISION REGISTER ONTO STACK.
   191  00BF  POP STACK TO THIS FIELD'S REGISTERS.
   191  00C2  TIMEOUT FOR # SECONDS SPECIFIED IN THIS I-FIELD.
   193  00C1  STORE THIS FIELD'S I-REG INTO THE OP176 REG.
   194  00C2  STORE THIS FIELD'S I-REG INTO THE OP177 REG.
   195  00C3  DISABLE LF/CR FOR THIS FIELD AT PRINT TIME
   196  00C4  DISABLE LF/CR FOR THIS FIELD AT UPDATE TIME
   197  00C5  USE THE VALUE IN THIS FIELD'S I-REG. AS FILL CHARACTER
   198  00C6  DISABLE LF'S FOR 1 LINE OF O/P (PROCESS SIDE ONLY).
   199  00C7  FILL THE I/O BUFFER WITH THIS FIELD'S DATA(USE W/OP 156)
   200  00C8  FILL THIS FIELD WITH FIRST TWO BYTES IN THIS FIELD.
   201  00C9  STORE BLANKS INTO THIS DEVICE'S I/O BUFFER (USE W/OP 156)
   202  00CA  CONVERT ASCII FEET, INCHES, & FRACTION TO FLOATING-POINT
   203  00CB  OPEN (FOR A READ) THE PC DOS FILE NAMED IN THIS A-FIELD
   204  00CC  READ THE CURRENT PC DOS RECORD INTO MEMORY AND INC REC CT
   205  00CD  CLOSE THE FILE THAT WAS OPENED FOR A READ.
   206  00CE  OPEN A FILE FOR A WRITE. ITS NAME IS THE DATA IN THIS A-FIELD
   207  00CF  WRITE A RECORD TO THE FILE OPENED BY THE LAST OP 206
   208  00D0  CLOSE THE FILE THAT WAS OPENED FOR A WRITE
   209  00D1  PAUSE UNTIL ANOTHER DEVICE EXECUTES OP 210
   210  00D2  START A DEVICE STALLED BY OP 209
   211  00D3  SET A TABLE TRAP
   212  00D4  JUMP TO A REPORT AT THIS LEVEL
   213  00D5  COMPARE THIS A-FIELD TO MEMORY & SET OP. 33 FLAG
   214  00D6  SEARCH FOR FIRST MATCH WITHOUT ANSWER TABLE
   215  00D7  DYNAMIC CONVERSION FROM ALPHANUMERIC
   216  00D8  DYNAMIC OPERATION 105
   217  00D9  DYNAMIC 105 IN NATIVE FORMAT
   218  00DA  DYNAMIC 104 IN NATIVE FORMAT
   219  OODB  SET 33 FLAG ACCORDING TO PR DEVICE STATUS
   220  00DC  SET GASS DATE/TIME
   221  00DD  ADD 1 TO OPERATION 38 REGISTER
   222  00DE  ADD 1 TO OPERATION 51 REGISTER
   223  00DF  ADD 1 TO OPERATION 81 REGISTER
   224  00E0  PAGE HEADER DATA AND ENABLE
   225  00E1  PAGE HEADER DISABLE
   226  00E2  LOAD PC DOS DATE/TIME INTO MEMORY
   227  00E3  VIEW NUMBER OF LF'S SPECIFIED BY I-VALUE OF THIS FIELD
   228  00E4  VIEW FORM-FEED (227 & 228 PROCESSED ON GEN SIDE ONLY))
   229  00E5  SET SYSTEM NO-BREAK FLAG
   230  00E6  CLEAR SYSTEM NO-BREAK FLAG
   231  00E7  SET INTERFACE TO XON/XOFF MODE
   232  00E8  SET RS-232 PARAMETERS FOR PR DEVICE
   233  00E9  MODIFY OP.203/206 FOR DIRECT USING INTEGER HERE AS RECORD LENGTH
PA
   234  00EA  OUTPUT LOW BYTE HERE TO HARDWARE I/O PORT NAMED BY OP.51
   235  00EB  INPUT LOW BYTE HERE FROM HARDWARE I/O PORT NAMED BY OP.38
   236  00EC  LOGICAL AND OP.38 WITH OP.51, SET 33 FLAG FOR CARRY
   237  00ED  LOGICAL OR OP.38 WITH OP.51, SET 33 FLAG FOR CARRY
   238  00EE  LOGICAL XOR OP.38 WITH OP.51, SET 33 FLAG FOR CARRY
   239  00EF  LOGICAL SHL INTEGER HERE, OP.83 NUMBER OF BITS, OP.33 FOR CY
   240  00F0  LOGICAL SHR INTEGER HERE, OP.83 NUMBER OF BITS, OP.33 FOR CY
   241  00F1  SEARCH MEMORY FROM OP38 TO OP83 WITH THIS A-FIELD'S DATA
   242  00F2  MAKE ALL CHARACTERS IN THIS A-FIELD UPPER CASE.
   243  00F3  CONTROL FOR AUTO LINE FEED FOR PRINTERS
   244  00F4  DISABLE SYSTEM MESSAGE ON F10 BREAK
   245  00F5  ENABLE SYSTEM MESSAGE ON F10 BREAK (DEFAULT)
   246  00F6  PUT THE PR DEVICE INTO CIRCULAR BUFFER INPUT (CBI) MODE
   247  00F7  WAIT FOR STRING IN THIS FIELD TO BE INPUT
   248  00F8  COPY CURRENT FILE TO FILE POINTED TO BY OPS 111 & 112
   249  00F9  TURN OFF CACHING
   250  00FA  TIME OUT ON NEXT OP.0 FOR # SECONDS HERE
   251  00FB  SET OP.33 FLAG ACCORDING TO STATUS OF LAST TIMEOUT
   252  00FC  PUT OUTPUT DEVICE PR NUMBER IN THIS I-FIELD AS DATA
   253  00FD  MOVE CURRENT UNIT NUMBER INTO THIS I-FIELD
   254  00FE  MOVE CURRENT FILE NUMBER INTO THIS I-FIELD
   255  00FF  NO OPERATION
   256  0100  PUT CURRENT LEVEL'S MEMORY INTO DEVICE I/O BUFFER FOR RETURN
   257  0101  PUT DEVICE I/O BUFFER INTO CURRENT LEVEL'S MEMORY
   258  0102  VIEW D-FORMAT DATA LIKE OP.62, BUT WITH COMMAS INSERTED,A AS HEX
   259  0103  VIEW MEMORY FROM D.P. 1 THROUGH THE D.P. IN THE OP 83 REG.
   260  0104  PLACE # CHARS READ INTO THIS FIELD'S FIXED POINT REG.
   261  0105  DISABLE TABLE ERROR MESSAGES
   262  0106  RE-ENABLE TABLE ERROR MESSAGES
   263  0107  VIEW DATA HERE ACCORDING TO FORMAT AND FORMS CONTROL
   264  0108  REPLACE ALL SPACE CHARACTERS IN THIS FIELD WITH THIS I-VALUE.
   265  0109  SET GASS DATE/TIME FROM FIRST 14 DATA POSITIONS OF MEMORY
   266  010A  CHANGE SPACE TO CR IN SUBSEQUENT I/P FIELDS AFTER N0. HERE I/P.
   267  010B  DISABLE OP. 266.
   268  010C  MAKE MEMORY DESTRUCTABLE ON SUBRIUTINE CALLS.
   269  010D  DISABLE OP. 268.
   270  010E  COPY A REPORT FORMAT
   271  010F  MAP A SET OF TABLES TO ANOTHER FILE
   272  0110  DISABLE CONSOLE TELEVIDEO MODE (VGA OR ANSI MODE)
   273  0111  DISABLE OPERATION 272
   274  0112  REBOOT THE PC
   275  0113  CLOSE CURRENT FILE IF IT IS DOS
   276  0114  CLOSE ALL DOS FILES
   277  0115  CLOSE ALL FILES AND EXIT TO DOS
   278  0116  RESERVED
   279  0117  VIEW N SPACES WHERE N IS THE VALUE IN THIS FIELD FIXED REG
   280  0118  VIEW N CHARACTERS FROM MEM FROM DP 1 FOR THIS # OF CHARS
   281  0119  VIEW MEM FROM DP 1 UNTIL A SPACE IS ENCOUNTERED
   282  0120  LOAD THIS FIELD'S IREG TO THIS PR'S XPOS REG
   283  0121  LOAD THIS FIELD'S IREG TO THIS PR'S YPOS REG
   284  0122  POSITION CURSOR AT COORDINATES XPOS,YPOS
   285  0123  LOAD XPOS TO IREG
   286  0124  LOAD YPOS TO IREG
   287  0125  CLEAR FROM CURSOR TO END OF LINE
   288  0126  CLEAR FROM CURSOR TO END OF PAGE



Gass Index

Hosted by www.Geocities.ws

1