[inforoots] 1130 Memories

[Brian Knittel]

We have an image of a disk that has 1130 COBOL installed, obtained 
from the people at the University of Stuttgart who have a running 
1130 and hacked the paper tape punch port to get an 8-bit parallel 
output with which they can extract disk images. We can run the images 
in our 1130 simulator, and as far as we know COBOL is working. If you 
want a copy, let me know. We haven't posted it on ibm1130.org yet.  

It's an end-user copy, though. The install deck would be nice to get 
eventually.

We also don't have any docs for it, do we Norm? I know we tried to 
bid on a lot on eBay that included some 1130 COBOL manuals but I 
think someone else grabbed them, and didn't respond to requests to 
let us scan them. There are a couple of very deep-pocket buyers on 
eBay who grab a lot of IBM stuff even 1130 stuff. One is in Japan, I 
believe.  


Brian

// JOB

LOG DRIVE   CART SPEC   CART AVAIL  PHY DRIVE
  0000        1C00        1C00        0000

V2 M12   ACTUAL 16K  CONFIG 16K

// COBOL

OPTIONS-
LIST,STNO,NOXREF,NODMAP,NOPMAP,NODUMP,NOSUPX,NOKP26,NOSUBR,NOEJCT,1442
,1132,/01FE


STNO - A...B... C O B O L   S O U R C E   S T A T E M E N T S 
..........  IDENTFCN  PAGLIN

   1   IDENTIFICATION DIVISION.                                       
              000100
   2   PROGRAM-ID.     HELLO.                                         
              000200
                                                                      
              000300
     *                                                                
              000400
   3   ENVIRONMENT DIVISION.                                          
              000500
   4   CONFIGURATION SECTION.                                         
              000600
   5   SOURCE-COMPUTER. IBM-1130.                                     
              000700
   6   OBJECT-COMPUTER. IBM-1130.                                     
              000800
                                                                      
              000900
   7   DATA DIVISION.                                                 
              001000
   8   FILE SECTION.                                                  
              001100
   9   PROCEDURE DIVISION.                                            
              100000
  10   MAIN-LOGIC SECTION.                                            
              100200
  11   BEGIN.                                                         
              100300
  12       DISPLAY 'HELLO WORLD'.                                     
              100500
  13       STOP RUN.                                                  
              100600
/*

NO ERRORS DETECTED IN THIS COMPILATION


PROGRAM-SIZE = TALLY + FILE SECTION + W-S SECTION + CONSTANTS + TEMP-
LOCNS + PROCEDURES + ARITH-STACK
      76         2           0               0          11          
18            21          24

END OF COBOL COMPILATION

// XEQ

HELLO WORLD


=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
_| _| _|  Brian Knittel
_| _| _|  Quarterbyte Systems, Inc.
_| _| _|  Tel:   1-510-559-7930
_| _| _|  Fax: 1-510-525-6889
_| _| _|  Email: brian at quarterbyte.com
_| _| _|  http://www.quarterbyte.com