TITLE "AUTOMATIC DISASSEMBLY OF dec-d8-afa5-pb.bin BY D8TAPE"
////////////////////////////////////////////////////////////////////////////////
/
/   Automatic Disassembly of dec-d8-afa5-pb.bin
/   Generated 2010 02 19 00:10:16
/   Generated by d8tape version 0.351
/   Visit http://www.pdp12.org/pdp8/software/index.html for updates
/
/   Symbol format:
/       AIx   -- Auto-index variables (address range 001x)
/       Caaaa -- Constants (non-unique)
/       Daaaa -- Data (read/write variables)
/       Kvvvv -- Program-wide unique constants
/       Laaaa -- Labels for control flow targets
/       Saaaa -- Subroutines
/
/   Where:
/       aaaa is the definition address
/       vvvv is the value of the constant
/       x    is the last digit of the address 001x for auto-index variables
/
/   0177 locations used, 0121 code and 0056 data
////////////////////////////////////////////////////////////////////////////////

*0600
    TLS                     / Load the TTO from the content of AC4  @@0600=6046
C0601,  1131                / TAD   C0131                           
    TAD I C0764             /                                       @@0602=1764
    TAD I C0765             /                                       @@0603=1765
    TAD I C0766             /                                       @@0604=1766
    SZA CLA                 /                                       @@0605=7640
    JMP I C0763             / long jump to L7600                    @@0606=5763
    TAD I C0762             /                                       @@0607=1762
    CIA                     /                                       @@0610=7041
    DCA   D0754             /                                       @@0611=3354
    JMS   S0746             /                                       @@0612=4346
    JMS   S0746             /                                       @@0613=4346
    JMS   S0740             /                                       @@0614=4340
C0615,  1076                / TAD   C0076                           
    JMS   S0666             /                                       @@0616=4266
    JMS   S0740             /                                       @@0617=4340
C0620,  1065                / TAD   C0065                           
    JMS   S0666             /                                       @@0621=4266
    JMS   S0746             /                                       @@0622=4346
L0623,
    JMS   S0746             /                                       @@0623=4346
    TAD I D0756             /                                       @@0624=1756
    JMS   S0722             /                                       @@0625=4322
    JMS   S0727             /                                       @@0626=4327
    TAD I D0756             /                                       @@0627=1756
    ISZ   D0756             /                                       @@0630=2356
    JMS   S0727             /                                       @@0631=4327
    TAD I D0757             /                                       @@0632=1757
    JMS   S0722             /                                       @@0633=4322
    JMS   S0727             /                                       @@0634=4327
    TAD I D0757             /                                       @@0635=1757
    ISZ   D0757             /                                       @@0636=2357
    JMS   S0727             /                                       @@0637=4327
    JMS   S0740             /                                       @@0640=4340
    TAD I D0760             /                                       @@0641=1760
    ISZ   D0760             /                                       @@0642=2360
    JMS   S0666             /                                       @@0643=4266
    ISZ   D0754             /                                       @@0644=2354
    JMP   L0623             /                                       @@0645=5223
    JMS   S0746             /                                       @@0646=4346
C0647,  1044                / TAD   C0044                           
    CMA                     /                                       @@0650=7040
    DCA   D0754             /                                       @@0651=3354
    JMP   L0661             /                                       @@0652=5261
L0653,
    JMS   S0706             /                                       @@0653=4306
    JMS   S0706             /                                       @@0654=4306
    JMS   S0740             /                                       @@0655=4340
    TAD I D0761             /                                       @@0656=1761
    ISZ   D0761             /                                       @@0657=2361
    JMS   S0666             /                                       @@0660=4266
L0661,
    JMS   S0746             /                                       @@0661=4346
    ISZ   D0754             /                                       @@0662=2354
    JMP   L0653             /                                       @@0663=5253
C0664,  4527                / JMS I C0127                           
C0665,  0011                / AND   AI1                             

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0666
/
/   Called from:
/   0616 0621 0643 0660 
/   Total 0004 (4) calls
////////////////////////////////////////////////////////////////////////////////
S0666,
    0                       / return area
    CLL RAL                 /                                       @@0667=7104
C0670,  3167                / DCA   C0167                           
    TAD   C0767             /                                       @@0671=1367
    DCA   D0755             /                                       @@0672=3355
L0673,
C0673,  1167                / TAD   C0167                           
    RTL                     /                                       @@0674=7006
    RAL                     /                                       @@0675=7004
C0676,  3167                / DCA   C0167                           
C0677,  1167                / TAD   C0167                           
    AND   C0770             /                                       @@0700=0370
    TAD   C0771             /                                       @@0701=1371
C0702,  4547                / JMS I C0147                           
    ISZ   D0755             /                                       @@0703=2355
    JMP   L0673             /                                       @@0704=5273
    JMP I S0666             / return                                @@0705=5666

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0706
/
/   Called from:
/   0653 0654 
/   Total 0002 (2) calls
////////////////////////////////////////////////////////////////////////////////
S0706,
    0                       / return area
    TAD I D0761             /                                       @@0707=1761
    JMS   S0722             /                                       @@0710=4322
C0711,  0133                / AND   C0133                           
    TAD   C0771             /                                       @@0712=1371
C0713,  4547                / JMS I C0147                           
    TAD I D0761             /                                       @@0714=1761
    ISZ   D0761             /                                       @@0715=2361
C0716,  0133                / AND   C0133                           
    TAD   C0771             /                                       @@0717=1371
C0720,  4547                / JMS I C0147                           
    JMP I S0706             / return                                @@0721=5706

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0722
/
/   Called from:
/   0625 0633 0710 
/   Total 0003 (3) calls
////////////////////////////////////////////////////////////////////////////////
S0722,
    0                       / return area
    CLL RTR                 /                                       @@0723=7112
    RTR                     /                                       @@0724=7012
    RTR                     /                                       @@0725=7012
    JMP I S0722             / return                                @@0726=5722

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0727
/
/   Called from:
/   0626 0631 0634 0637 
/   Total 0004 (4) calls
////////////////////////////////////////////////////////////////////////////////
S0727,
    0                       / return area
C0730,  0133                / AND   C0133                           
    SZA                     /                                       @@0731=7440
    TAD   C0772             /                                       @@0732=1372
    SPA                     /                                       @@0733=7510
    TAD   C0773             /                                       @@0734=1373
    TAD   C0774             /                                       @@0735=1374
C0736,  4547                / JMS I C0147                           
    JMP I S0727             / return                                @@0737=5727

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0740
/
/   Called from:
/   0614 0617 0640 0655 
/   Total 0004 (4) calls
////////////////////////////////////////////////////////////////////////////////
S0740,
    0                       / return area
    TAD   C0774             /                                       @@0741=1374
C0742,  4547                / JMS I C0147                           
    TAD   C0774             /                                       @@0743=1374
C0744,  4547                / JMS I C0147                           
    JMP I S0740             / return                                @@0745=5740

////////////////////////////////////////////////////////////////////////////////
/
/   SUBROUTINE:  S0746
/
/   Called from:
/   0612 0613 0622 0623 0646 0661 
/   Total 0006 (6) calls
////////////////////////////////////////////////////////////////////////////////
S0746,
    0                       / return area
    TAD   C0775             /                                       @@0747=1375
C0750,  4547                / JMS I C0147                           
    TAD   C0776             /                                       @@0751=1376
C0752,  4547                / JMS I C0147                           
    JMP I S0746             / return                                @@0753=5746
D0754,  0000                / AND   C0000                           
D0755,  0000                / AND   C0000                           
D0756,  2400                / ISZ I C0000                           
D0757,  2500                / ISZ I C0100                           
D0760,  2600                / ISZ I C0600                           
D0761,  1000                / TAD   C0000                           
C0762,  2332                / ISZ   C0732                           
C0763,
C0763,  7600                / 7600                                  
C0764,  6503                / 6503                                  
C0765,  6701                / KSDR                                  
C0766,  6702                / KSEN                                  
C0767,  7774                / SPA SNA SZL CLA OSR                   
C0770,  0007                / AND   C0007                           
C0771,  0260                / AND   C0660                           
C0772,  7740                / SMA SZA CLA                           
C0773,  0100                / AND   C0100                           
C0774,  0240                / AND   C0640                           
C0775,  0215                / AND   C0615                           
C0776,  0212                / AND   C0612                           

$
