DataMuseum.dk

Presents historical artifacts from the history of:

Q1 computer

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Q1 computer

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦2650a997c⟧ Q1_Text, reclen=40

    Length: 2480 (0x9b0)
    Types: Q1_Text, reclen=40
    Notes: q1file
    Names: »MFILE«

Derivation

└─⟦d0ee5ef37⟧ Bits:30008569 DDMQ1-0004_TEST_PROGRAM
    └─⟦this⟧ »MFILE« 
└─⟦e048455f8⟧ Bits:30008637 DDMQ1-0076_MSABRES1_ej_testkort_med_MSAB_data
    └─⟦this⟧ »MFILE«

Text

       SET    04300                     
TO     ADCON  04500                     
START  LADR   JUDGE                     
       STHL   04084                     
       LHL    TO                        
       ST,C                             
       IND,H                            
       STHL   TO                        
       LI,A   8                         
       OUT    7                         
       LI,A   0                         
#      OUT    6                         
       LI,C   0                         
       OUT    7                         
       LI,A   1                         
       OUT    6                         
       LI,A   "O"                       
       OUT    5                         
GRIM   IN     5                         
       SWAP                             
       SWAP                             
       INC,C                            
       O,A                              
       JNM    START                     
       IND,H                            
       DUP    4                         
       POP,A                            
       ENB                              
       R                                
       END    START                     
                                        
       SDT    04300                     
TO     ADCON  04500                     
START  LADR   JUDGE                     
       STHL   04084                     
       LHL    TO                        
       ST,C                             
       IND,H                            
       STHL   TO                        
       LI,A   8                         
       OUT    7                         
       LI,A   0                         
#      OUT    6                         
       LI,C   0                         
       OUT    7                         
       LI,A   1                         
       OUT    6                         
       LI,A   "O"                       
       OUT    5                         
GRIM   IN     5                         
       SWAP                             
       SWAP                             
       INC,C                            
       O,A                              
       JNM    START                     
       IND,H                            
       DUP    4                         
       POP,A                            
       ENB                              
       R                                
       END    START