TITLE "AUTOMATIC DISASSEMBLY OF maindec-8l-d0ab-pb.bin BY D8TAPE"
////////////////////////////////////////////////////////////////////////////////
/
/   Automatic Disassembly of maindec-8l-d0ab-pb.bin
/   Generated 2010 02 19 00:10:31
/   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
/
/   0062 locations used, 0047 code and 0013 data
////////////////////////////////////////////////////////////////////////////////

*0202
    AND I C0260             /                                       @@0202=0660
    NOP                     /                                       @@0203=7000
    NOP                     /                                       @@0204=7000
    TAD I C0260             /                                       @@0205=1660
    NOP                     /                                       @@0206=7000
    NOP                     /                                       @@0207=7000
    JMP I C0257             / long jump to L7600                    @@0210=5657
L0211,
    NOP                     /                                       @@0211=7000
    NOP                     /                                       @@0212=7000
    CLA                     /                                       @@0213=7200
    DCA I C0260             /                                       @@0214=3660
    NOP                     /                                       @@0215=7000
    NOP                     /                                       @@0216=7000
    CLA IAC                 /                                       @@0217=7201
    ISZ I C0260             /                                       @@0220=2660
    NOP                     /                                       @@0221=7000
    NOP                     /                                       @@0222=7000
    CLA                     /                                       @@0223=7200
    TAD   C0252             /                                       @@0224=1252
C0225,  3000                / DCA   C0000                           
    CLA CLL CML RTL         / AC = 0002                             @@0226=7326
C0227,  4660                / JMS I C0260                           
    NOP                     /                                       @@0230=7000
    NOP                     /                                       @@0231=7000
    CLA                     /                                       @@0232=7200
    TAD   C0261             /                                       @@0233=1261
    DCA   D0253             /                                       @@0234=3253
    DCA   D0254             /                                       @@0235=3254
L0236,
    TAD   D0254             /                                       @@0236=1254
    IAC                     /                                       @@0237=7001
    DCA   D0255             /                                       @@0240=3255
    TAD   C0256             /                                       @@0241=1256
    DCA I D0255             /                                       @@0242=3655
    ISZ I D0254             /                                       @@0243=2654
    NOP                     /                                       @@0244=7000
    JMS I D0254             / long call to S0000                    @@0245=4654
    NOP                     /                                       @@0246=7000
    ISZ   D0254             /                                       @@0247=2254
    ISZ   D0253             /                                       @@0250=2253
    JMP   L0236             /                                       @@0251=5236
C0252,  7402                / HLT                                   
D0253,  0000                / AND   C0000                           
D0254,  0000                / AND   C0000                           
D0255,  0000                / AND   C0000                           
C0256,  5600                / JMP I C0200                           
C0257,
C0257,  7600                / 7600                                  
C0260,  7777                / CLA MQA SCA MQL LSR +                 
C0261,  7741                / CLA MQA SCA                           

*7600
L7600,
    JMP I C7601             / long jump to L0211                    @@7600=5601
C7601,
C7601,  0211                / AND   C7611                           

$