// Pebbles Molly Cards PAL IC8
// 

// for GAL22V10 device.

TITLE IC8;

// inputs

// pin 7  is Vcc
// pin 21 is Gnd

pin 1 = clock ;                      // clock input
pin 2 = a1;
pin 3 = a2;
pin 4 = !csel3; // 0x60_0000
pin 5 = !csel1;	// 0x20_0000
pin 6 = !csel2; // 0x40_0000
pin 7 = a4;     // Needed for IDE port (wire link).
pin 8 = a19;
pin 9 = !rd;
pin 10 = !wrlo;
pin 11 = delay_in;

// outputs

pin 23 = !idecs0;
pin 22 = !idecs1;
pin 21 = !ethiow;
pin 20 = !ethior;
pin 19 = !ramcs;
pin 18 = !cselexp;	// expansion
pin 17 = !wait;

pin 16 = d3;
pin 15 = d2;
pin 14 = d1;

// output logic equations


// Ram at 0x20_0000
ramcs = csel1;	

// Expansion at 0x40_0000
cselexp = csel2;

// IDE and Ethernet at 0x60_0000
ethiowr1 = wrlo & csel3 & a19;  // 68_0000
ethiord1 = rd & csel3 & a19;

ethiow =ethiowr1;
ethior =ethiord1;


idecs0 = csel3 & !a19 & !a4; // 60_0000
idecs1 = csel3 & !a19 &  a4;


ether = ethiowr1 # ethiord1;

max = d1 & d2 & d3;
d1.d = !clear & (d1 $ !max);
d2.d = !clear & (d2 $ (!max & d1));
d3.d = !clear & (d3 $ (!max & d1 & d2));

wait = ether & !max;
clear = !ether;


// eof



















./p3 p22v10 -jp test1.pld > /homes/djg/public_html/a.txt
<<< Sum C436 >>> 
cat /homes/djg/public_html/a.txt
CBG pal compiler V3.12

Compiling IC8.
Source file parsed.
                 *-----\/-----*  
           CLOCK | 1       24 | VCC                 Pal name :IC8.
              A1 | 2       23 | ! IDECS0            Pal type :P22V10.
              A2 | 3       22 | ! IDECS1            
         CSEL3 ! | 4       21 | ! ETHIOW            
         CSEL1 ! | 5       20 | ! ETHIOR            
         CSEL2 ! | 6       19 | ! RAMCS             
              A4 | 7       18 | ! CSELEXP           
             A19 | 8       17 | ! WAIT              
            RD ! | 9       16 | D3                  
          WRLO ! | 10      15 | D2                  
        DELAY_IN | 11      14 | D1                  
             GND | 12      13 |                     
                 *------------*  

Jedec format fuse programming.
 [CBG PAL COMPILER Version 12]
Pal name :IC8.Pal type :P22V10.
*
F0*
QP 24*
L44 11111111111111111111111111111111111111111111*
L88 11111111111110111111111110111011111111111111*
L5808 01*
L440 11111111111111111111111111111111111111111111*
L484 11111111111110111111111101111011111111111111*
L5810 01*
L924 11111111111111111111111111111111111111111111*
L968 11111111111110111111111111110111111110111111*
L5812 01*
L1496 11111111111111111111111111111111111111111111*
L1540 11111111111110111111111111110111101111111111*
L5814 01*
L2156 11111111111111111111111111111111111111111111*
L2200 11111111111111111011111111111111111111111111*
L5816 01*
L2904 11111111111111111111111111111111111111111111*
L2948 11111111111111111111101111111111111111111111*
L5818 01*
L3652 11111111111111111111111111111111111111111111*
L3696 11111111111110111111111111110111111110011111*
L3740 11111111111110111111111111110111110110111111*
L3784 11111111111110111111111111110101111110111111*
L3828 11111111111110111111111111110111101111011111*
L3872 11111111111110111111111111110111100111111111*
L3916 11111111111110111111111111110101101111111111*
L5820 01*
L4312 11111111111111111111111111111111111111111111*
L4356 11111111111110111111111111110110111110011111*
L4400 11111111111110111111111111110110110110111111*
L4444 11111111111110111111111111110110101111011111*
L4488 11111111111110111111111111110110100111111111*
L4532 11111111111110111111111111110111111010101111*
L4576 11111111111110111111111111110111101011101111*
L5822 1*
L4884 11111111111111111111111111111111111111111111*
L4928 11111111111110111111111111110110111010101111*
L4972 11111111111110111111111111110111111010011111*
L5016 11111111111110111111111111110110101011101111*
L5060 11111111111110111111111111110111101011011111*
L5104 11111111111110111111111111110111110110101111*
L5148 11111111111110111111111111110111100111101111*
L5824 1*
L5368 11111111111111111111111111111111111111111111*
L5412 11111111111110111111111111110110111010101111*
L5456 11111111111110111111111111110110101011101111*
L5500 11111111111110111111111111110111111110011111*
L5544 11111111111110111111111111110111101111011111*
L5826 1*
CC436*
92B8
<<< Sum C436 >>> 
No errors.  Successful completion (24).