Responder al tema

Mensaje

[QUOTE="Villlo, post: 1301716, member: 528114"]
Tengo muchas dudas y creo que ya me sature, al parcer solo me faltan las horas en mi reloj pero no logro programarlo adecuadamente, intento ponerlo en 12 horas! espero que me puedan ayudar, Gracias, les dejo la imagen en proteus junto con sus codigos de cada GAL16v8

[B][COLOR=rgb(226, 80, 65)]SIMULACIÓN con proteus.
PROGRAMACIÓN con wincupl.[/COLOR][/B]

[ATTACH type="full" width="763px"]187537[/ATTACH]

[B][COLOR=rgb(226, 80, 65)](Codigo que marcará de 0-1 en el display de arriba)[/COLOR][/B][COLOR=rgb(226, 80, 65)] [/COLOR]

[CODE]Código:
/* *************** INPUT PINS *********************/
PIN    1 = clk                         ; /*                                 */
PIN    2 = dir                       ; /*                                 */

/* *************** OUTPUT PINS *********************/
PIN  19   =  Q0                       ; /*                                 */
PIN  18   =  Q1                       ; /*                                 */
PIN  17   =  Q2                       ; /*                                 */
PIN  16   =  Q3                       ; /*                                 */

field mode = [dir];
up= mode:0;
down= mode:1;

field counter = [Q3, Q2, Q1, Q0];
$define p0  'b'  0000
$define p1  'b'  0001
$define p2  'b'  0010

sequenced counter
{
present p0 if up      next p1;
           if down    next p2;

present p1 if up      next  p2;
           if down    next  p0;
          
present p2 if up      next  p0;
           if down    next  p1;

}[/CODE]

[B][COLOR=rgb(226, 80, 65)]CODIGO 0-9 DESPUES marcara un (0 como el 10), (1 como el 11) ,(2 como el 12).[/COLOR][/B][COLOR=rgb(226, 80, 65)] [/COLOR]

[CODE]Código:
/* *************** INPUT PINS *********************/
PIN    1 = clk                         ; /*                                 */
PIN    2 = dir                       ; /*                                 */

/* *************** OUTPUT PINS *********************/
PIN  19   =  Q0                       ; /*                                 */
PIN  18   =  Q1                       ; /*                                 */
PIN  17   =  Q2                       ; /*                                 */
PIN  16   =  Q3                       ; /*                                 */

field mode = [dir];
up= mode:0;
down= mode:1;

field counter = [Q3, Q2, Q1, Q0];
$define p0  'b'  0000
$define p1  'b'  0001
$define p2  'b'  0010
$define p3  'b'  0011
$define p4  'b'  0100
$define p5  'b'  0101
$define p6  'b'  0110
$define p7  'b'  0111
$define p8  'b'  1000
$define p9  'b'  1001
$define p10 'b'  1010
$define p11 'b'  1011
$define p12 'b'  1100

sequenced counter
{
present p0 if up      next p1;
           if down    next p12;

present p1 if up      next  p2;
           if down    next  p0;

present p2 if up      next  p3;
           if down    next  p1;
          
        
present p3 if up      next  p4;
           if down    next  p2;

present p4 if up      next  p5;
           if down    next  p3;

present p5 if up      next  p6;
           if down    next  p4;

present p6 if up      next  p7;
           if down    next  p5;

present p7 if up      next  p8;
           if down    next  p6;

present p8 if up      next  p9;
           if down    next  p7;

present p9 if up      next  p10;
           if up      next  p0;
           if down    next  p8;

present p10 if up    next  p1;
            if down  next  p9;

present p11 if up    next  p2;
            if down  next  p10;

present p12 if up    next  p0;
            if down  next  p11;

}[/CODE]
[/QUOTE]

Verificación