Loaded 654 bytes for Assembly/TR2GP.k3
Reached end of file


=============== Second pass
===========================


     33 W0 = E27
     34 Y0 = E28
    0/0: 200 260 022                                                   
                                                                       
                                                                       V9; W0;
    4/0: 200 260 032|200 260 032                                       RESTART; J999; J999;
                                                                       PROGRAM;
V-store at 00011 = 000 000 000 000 000 020                                V1 = B20;        (plotter pen-down command);
V-store at 00012 = 000 000 000 011 000 011                                V2 = Q0/AV1/AV1; (to plot data);
V-store at 00013 = 000 000 000 011 000 011                                V3 = Q0/AV1/AV1; (to read data);
V-store at 00014 = 000 000 000 000 000 002                                V4 = B02;        (TR device-type code);
V-store at 00015 = 000 000 000 000 000 020                                V5 = B20;        (GP device-type code);
                                                                       
   22/0: 300 000 014|304 000 005|200 220 000                              V4; SET 5; OUT;  (claim TR);
   23/3: 300 000 013|170 076|170 070                                      V3; =Q3; =C3;    (set up Q3 for TR input);
   24/4: 300 000 015|304 000 005|200 220 000                              V5; SET 5; OUT;  (claim GP);
   26/1: 300 000 012|170 056|170 050                                      V2; =Q2; =C2;    (set up Q2 for GP output);
                                                                       
   27/2: 130 050                                                          POCQ2;           (pen down);
                                                                       
   27/4: 017|017                                                       *1;
   30/0: 124 070                                                          PICQ3;           (read one plotting command from TR);
   30/2: 121 060|220 340 032                                              PARQ3; J999TR;   (exit loop to 999 at EOF);
   31/1: 130 050                                                          POCQ2;           (write one plotting command to GP);
   31/3: 200 260 030                                                      J1;
                                                                       
                                                                       999;
   32/0: 041|200 220 000                                                  ZERO; OUT;       (end run);
=== Start P-1V-1; at address 27
                                                                       FINISH;
Reached end of file
