Temat: szybki szpil z wincupl

ktos moze to przetestowac/ocenic ?

Name     sdx ;
PartNo   00 ;
Date     2010-09-11 ;
Revision 01 ;
Designer lotharek ;
Company   ;
Assembly None ;
Location  ;
Device   f1502ispplcc44 ;



PROPERTY ATMEL {PREASSIGN KEEP};
PROPERTY ATMEL {OUTPUT_FAST OFF};
/* *************** INPUT PINS *********************/




PIN 25= on     ; /*  on/off              */
PIN 12= !h7   ; /*  MMU HOLE 7         */
PIN 9= h8     ; /*  MMU HOLE 8         */
PIN 5= p12     ; /*  MMU PIN 12         */
PIN 4= p19     ; /*  MMU PIN 19         */
PIN 19= h19    ; /*  MMU HOLE 19        */
PIN 6= h12     ; /*  MMU HOLE 12        */
PIN 8= p8      ; /*  MMU PIN 8 /t3      */
PIN 11 = p7    ; /*  MMU PIN 7          */
PIN 28= oe     ; /*  Eprom OE           */
pin 36=a0    ;
pin 33=a1    ;
pin 34=a2    ;
pin 40=a3    ;
pin 41=a4    ;
pin 43=a5    ;
pin 44=a6    ;
pin 1 =a7    ;

PIN 21= o2    ;
PIN 20= cctl  ;
PIN 24= rw    ;
pin 39= !clr    ;
PIN 37 = clock;


i8='b'0;


pin 14=q1;
pin 16=q2;
pin 17=q3;
pin 18=q5;
pinnode =q4;

pin 26 =clk2;


[q1..q5].D=[a0..a4];
[q1..q5].CK=clock;
[q1..q5].AR=clr;






oe = !q4  # !on # p12  # !rw;
h12 = ! ( !q4 & on & q3 & !p12  # !on & !p12);
h19 = !(!q4 & on & q3 & !p19 # !on & !p19);
p8 = q4 & on   # !on & h8 # !q4 & q3 & h8;
p7 = !(q4 & on   # !q4 & on & !q3 # h7 );
clk2 = !(!o2  # cctl  # rw  # i8  # !a5 # !a6 # !a7);


nie wiem czy mi sie komput wiesza, ale kompilacja daje ładny powrót do pulpitu.

CLR przez opornik i diode do 5V i c10uF do gnd - w wiadomym celu.

ps. no chyba ze cos spieprzylem, to prosze o publiczna krytyke

Ostatnio edytowany przez lotharek (2012-08-06 23:06:39)

serdecznie proszę o maile na lotharek@lotharek.pl z tematem ATARIAREA - inne formy komunikacji zawodzą...
"The worth of all people is dependent on how they spend their life making contributions" - Kano Jigoro
FKMC /Fan Klub Malej Czarnej/   @Grey

2

Odp: szybki szpil z wincupl

Weź no zrób cóś z tym pinem 12, bo to gnd :D

3

Odp: szybki szpil z wincupl

juz dziala :-) fitter swirowal


Name     sdx ;
PartNo   00 ;
Date     2010-09-11 ;
Revision 01 ;
Designer lotharek ;
Company   ;
Assembly None ;
Location  ;
Device   f1502ispplcc44 ;



PROPERTY ATMEL {PREASSIGN KEEP};
PROPERTY ATMEL {OUTPUT_FAST OFF};
/* *************** INPUT PINS *********************/




PIN 1                =    on                   ; /*  on/off             */
PIN 44                =    !h7                   ; /*  MMU HOLE 7         */
PIN 43                =    h8                    ; /*  MMU HOLE 8         */
PIN 41                =    p12                ; /*  MMU PIN 12         */
PIN 40                =    p19                 ; /*  MMU PIN 19         */
PIN [2,4,5,6,8,9,11,12]    =    [a0..a7]            ; /*  LINIE ADRESOWE     */    
PIN 36                =    o2                  ;
PIN 37                =    cctl                  ;
PIN 39                =    rw                    ;
pin 14                =    !clr                ;


/* *************** OUTPUT PINS *********************/

pin 18                =    q1                ;
pin 19                =    q2                ;
pin 20                =    q3                ;
pin 24                =    q5                ;

PIN 17                =    p8                      ; /*  MMU PIN 8 /t3      */
PIN 16             =     p7                    ; /*  MMU PIN 7          */
PIN 26                =     h19                ; /*  MMU HOLE 19        */
PIN 25                =     h12                 ; /*  MMU HOLE 12        */
PIN 27                =     oe                 ; /*  Eprom OE           */
PIN 34             =     write                ; /*   --> zworka--> FLASH WR      */

/* *************** Declarations *********************/
i8='b'0;
pinnode =clk2;
pinnode =q4;
/* *************** EQUATIONS *********************/


[q1..q5].D=![a0..a4];
[q1..q5].CK=clk2;
[q1..q5].Ap=clr;
oe = !q4  # !on # p12  # !rw;
h12 = ! ( !q4 & on & q3 & !p12  # !on & !p12);
h19 = !(!q4 & on & q3 & !p19 # !on & !p19);
p8 = q4 & on   # !on & h8 # !q4 & q3 & h8;
p7 = !(q4 & on   # !q4 & on & !q3 # h7 );
clk2 = !(!o2  # cctl  # rw  # i8  # !a5 # !a6 # !a7);
write= !(o2&!(rw &rw));

Ostatnio edytowany przez lotharek (2012-08-09 18:11:13)

serdecznie proszę o maile na lotharek@lotharek.pl z tematem ATARIAREA - inne formy komunikacji zawodzą...
"The worth of all people is dependent on how they spend their life making contributions" - Kano Jigoro
FKMC /Fan Klub Malej Czarnej/   @Grey