8049

[shoorick]

кстати, в одной клаве встретил микроэвм: написано Intel Cоpyr³ght. посмотрел - LC -цепочка не к "тем" выводам припаяна. ну, думаю, хрен с ним - уже выпаял ее в впаял в другую платку, когда обратил внимание, что выводы вроде как бы и соответствуют, но на 1 сдвинуты. тут меня осенило - посчитал выводы - 42, причем 2 и 41 не подключены. т.е. тот же 8048/49, только корпус чуть другой

[shoorick]

в связи с похолоданием опять достал паяльник

спаял картонный компутир



для тестирования сэмулировал светофор



вот как оно работает:



а это программа:

Code: Select all

;=======================================================================
            .CR 8048
            .TF SVETOFOR.BIN,BIN
            .LI on
;-----------------------------------------------------------------------
            DIS TCNTI
LOOP1
            MOV  R1,#PATTERN
LOOP
            MOV  A,R1
            MOVP A,@A
            OUTL P1,A
            INC  R1
            MOV  A,R1
            MOVP A,@A
            JZ   LOOP1
            CALL DELX
            INC  R1
            JMP  LOOP
;-----------------------------------------------------------------------
DELX       
            MOV R2,A
DELXLOOP   
            CALL DEL05
            DJNZ R2,DELXLOOP
            RET            
;-----------------------------------------------------------------------
DEL05       
            MOV R0,#60 
DEL05LOOP   
            CALL DELAY
            DJNZ R0,DEL05LOOP
            RET            
;-----------------------------------------------------------------------
DELAY       
            CLR A
            MOV T,A
            STRT T
DELOOP      
            JTF DELOK
            JMP DELOOP
DELOK       
            STOP TCNT
            RET                        
;=======================================================================
PATTERN     .DB $FB,8
            .DB $F9,4
            .DB $FE,4
            .DB $FF,1
            .DB $FE,1
            .DB $FF,1
            .DB $FE,1
            .DB $FD,4
            .DB $FF,0
;=======================================================================
            

в ролях снималась 1816ВЕ39, как-то раз неудачно мною выпаянная, выброшенная и вытащенная из мусорного ведра назад

[Shaos]

приколько

[shoorick]

немного обобщил