Subversion Repositories pentevo

Rev

Rev 764 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 764 Rev 888
Line 2... Line 2...
2 
;LAST UPDATE: 05.09.2017 savelij
 2 
;LAST UPDATE: 05.09.2017 savelij
3 
 
 3 
 
4 
                TITLE "raznoe.a80"
 4 
                TITLE "raznoe.a80"
5 
 
 5 
 
6 
        IF EMU
 6 
        IF EMU
- 
 
 7 
CMP_VARSTRDOS
7 
CMP_VARSTRDOS   CALL SET_RWPORT0
 8 
;               CALL SET_RWPORT0
8 
                LD HL,(CHANS)
 9 
                LD HL,(CHANS)
9 
                RET
 10 
                RET
10 
 
 11 
 
11 
LOC_2A53_       IF EMU3D2F=1
 12 
LOC_2A53_       IF EMU3D2F=1
12 
                RST30 WOUTCA
 13 
                RST30 WOUTCA