User Tag List

Показано с 1 по 5 из 5

Тема: Программный Hires в Радио 86РК

Древовидный режим

Предыдущее сообщение Предыдущее сообщение   Следующее сообщение Следующее сообщение
  1. 10.04.2017, 15:50 #5
    NEO SPECTRUMAN
    NEO SPECTRUMAN вне форума
    Banned
    Регистрация
    22.05.2011
    Адрес
    г. Дзержинск, Украина
    Сообщений
    6,829
    Спасибо Благодарностей отдано 
    483
    Спасибо Благодарностей получено 
    663
    Поблагодарили
    513 сообщений
    Mentioned
    10 Post(s)
    Tagged
    0 Thread(s)

    По умолчанию

    Вот код

    Конечно тут проскакивает баги
    прерывания в начале на разрешаются (но оно то стартует значет прерывания сразу разрешены)
    проскочило лишнее разрешение прерываний (но влиять ни на что оно не должно)
    перепрограммирование(перв е) и правда сильно долгое и не вмещается в одну строку
    но это никак не объясняет такое большое смещение
    и запросы пдп по идеи же не должны начинаться после сброса до старт дисплей...

    Код:
        device zxspectrum48


prtmap = 2    ;1 rk



    if prtmap = 1

crtprt0 = $C000
crtprt1 = $C001        ;$EF01

dmaprt0 = $F000        ;$E000
dmaprt4 = $F004
dmaprt8 = $F008

    endif

    if prtmap = 2

crtprt0 = $EF00
crtprt1 = $EF01        ;$EF01

dmaprt0 = $F000        ;$E000
dmaprt4 = $F004
dmaprt8 = $F008

keyprt0 = $ED00
keyprt1 = $ED01

    endif

    org $0000
beginfile

    defb high startaddr,low startaddr
    defb high endaddr, low endaddr

    
startaddr

    ei
    xor a
    ld (keyprt0),a
    
init    

    ld hl,vsync
i1    ld (hl),$7E    ;ld a,(hl)
    inc hl
    ld (hl),$A2    ;and a,d
    inc hl
    ld (hl),$C0    ;ret nz
;;;    ld (hl),$C8    ;ret z
    inc hl
    ld a,h
    cp $c0
    jp nz,i1
    
    ld (hl),$C3
    inc hl
    ld (hl),low vsync
    inc hl
    ld (hl),high vsync

;---------------------------------------------------------

res

    ld d,$20
    ld e,$01

    ld bc,keyprt1

        di

    ld hl,crtprt1

    ld a,(hl)

    call vsync    ;22


    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),$FF;63    ;VVRR RRRR 00 1char строка КСИ
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13;$13 ;$93;$13;MFCC ZZZZ

    inc l



    ld hl,dmaprt8                        ;10
    ld (hl),$80    ;Установка автозагрузки

    ld l,$04    ;канал 2 начальный адрес        ;7t
    ld (hl),low scr        ;
    ld (hl),high scr    ;

    inc l        ;канал 2 количество циклов
    ld (hl),$FF    ;23
    ld (hl),$53    ;49    ;mmss ssss

    ld l,$08    ;Запись в РгР
    ld (hl),$A4    ;Разрешение ПД ДЛЯ КАНАЛА 2
            ;УСТАНОВКА УДЛИНЕННОЙ ЗАПИСИ
            ;УСТАНОВКА АВТОЗАГРУЗКИ

;---------------------------------------------------------

    ld hl,crtprt1

        ;39t
        dup 5
        ld a,a
        edup
        nop

    jp l0start
                ;109

;---------------------------------------------------------

l0    call vsync    ;22

    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),$FF;63    ;VVRR RRRR 00 1char строка КСИ  
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13    ;$13;$93;$13;MFCC ZZZZ 

    inc l

l0start
            ;start display
    ld (hl),$23;$27    ;001S SSBB    ;7 dma pause; 8bytes  23no pause

        ld a,a
        ld a,a
        ld a,a
        nop
        nop    ;23    

;---------------------------------------------------------

l1    call vsync

    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),63    ;VVRR RRRR 00 1char строка КСИ
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13    ;$13;$93;$13;MFCC ZZZZ

    inc l
            ;start display
    ld (hl),$23;$27    ;001S SSBB    ;7 dma pause; 8bytes  23no pause
    
        ld a,a
        ld a,a
        ld a,a
        nop
        nop    ;23

;---------------------------------------------------------

l2    call vsync

    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),63    ;VVRR RRRR 00 1char строка КСИ 
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13    ;$13;$93;$13;MFCC ZZZZ

    inc l
            ;start display
    ld (hl),$23;$27    ;001S SSBB    ;7 dma pause; 8bytes  23no pause

    ld (hl),$A0    ;разрешить прерывания - КАК ОНО ЗДЕСЬ ОКАЗАЛОСЬ? о_О

        ld a,a
        ld a,a
        ld a,a
        nop
        nop    ;23

;---------------------------------------------------------

l3    call vsync

    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),63    ;VVRR RRRR 00 1char строка КСИ
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13    ;$13;$93;$13;MFCC ZZZZ

    inc l
            ;start display
    ld (hl),$23;$27    ;001S SSBB    ;7 dma pause; 8bytes  23no pause


        ld a,a
        ld a,a
        ld a,a
        nop
        nop    ;23

;---------------------------------------------------------

l4    call vsync

    ld (hl),$00    ;0000 0000 reset
    dec l
    ld (hl),77    ;SHHH HHHH 0normal rows ; 78 ширина экрана знакомест
    ld (hl),63    ;VVRR RRRR 00 1char строка КСИ
    ld (hl),$40    ;UUUU LLLL
    ld (hl),$13    ;$93;$13;MFCC ZZZZ

    inc l
            ;start display
    ld (hl),$23;$27    ;001S SSBB    ;7 dma pause; 8bytes  23no pause





    ld a,(BC)    ;7    keyprt1
    and e        ;4 11    2t lose
    jp nz,l0        ;10 10 

    ei

        ld a,$FF
w1        ld a,a
        ld a,a
        ld a,a
        ld a,a
        ld a,a
        dec a
        jp nz,w1

    jp res    ;10





scr





    define _ 3,
    define J 1,
    define L 2,
    define U 0,



    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ J _ L L U L J U J U _ _ J _ $F1 
    defb _ J _ L _ L J J _ J _ _ _ U _ $F1
    defb _ J U L L U L J U J U _ J U _ $F1
    defb _ J _ L L L J J _ _ J _ U U _ $F1
    defb _ J _ L L L J J U J U J U U _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ J U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ U U U U _ $F1
    defb _ _ _ _ _ _ U _ _ J U U U L _ $F1
    defb _ _ _ _ _ _ U _ _ U U U U _ _ $F1
    defb _ _ _ _ _ U _ _ J U U U L _ _ $F1
    defb _ _ _ _ _ U _ _ U U U U _ _ _ $F1
    defb _ _ _ _ U _ _ J U U U L _ _ _ $F1
    defb _ _ _ _ U _ _ U U U U _ _ _ _ $F1
    defb _ _ _ U _ _ J U U U L _ _ _ _ $F1
    defb _ _ _ U _ _ U U U U _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb L _ L _ L _ L _ L _ L _ L _ L $F1
    defb J _ J _ J _ J _ J _ J _ J _ J $F1
    defb _ L _ L _ L _ L _ L _ L _ L _ $F1
    defb _ J _ J _ J _ J _ J _ J _ J _ $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb J _ L J _ L J _ L J _ L J _ L $F1
    defb _ L J _ L J _ L J _ L J _ L J $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb L L L L L L L L L L L L L L L $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ J _ L L U L J U J U _ _ _ $F1
    defb U _ J _ L _ L J J _ J _ _ _ _ $F1
    defb U _ J U L L U L J U J U _ _ _ $F1
    defb U _ J _ L L L J J _ _ J _ _ _ $F1
    defb U _ J _ L L L J J U J U _ _ _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ L _ $F1
    defb U _ _ J _ L _ _ _ _ _ _ J L _ $F1
    defb U _ _ J U L L _ _ _ _ _ _ L _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ L _ $F1
    defb U _ _ J _ L L _ _ _ _ _ J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ J _ L L U L J U J U _ $F1
    defb U _ _ _ J _ L _ L J J _ J _ _ $F1
    defb U _ _ _ J U L L U L J U J U _ $F1
    defb U _ _ _ J _ L L L J J _ _ J _ $F1
    defb U _ _ _ J _ L L L J J U J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ _ J _ L L U L J U J U $F1
    defb U _ _ _ _ J _ L _ L J J _ J _ $F1
    defb U _ _ _ _ J U L L U L J U J U $F1
    defb U _ _ _ _ J _ L L L J J _ _ J $F1
    defb _ _ _ _ _ J _ L L L J J U J U $F1 ;1024


    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ J _ L L U L J U J U _ _ J _ $F1 
    defb _ J _ L _ L J J _ J _ _ _ U _ $F1
    defb _ J U L L U L J U J U _ J U _ $F1
    defb _ J _ L L L J J _ _ J _ U U _ $F1
    defb _ J _ L L L J J U J U J U U _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ J U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ U U U U _ $F1
    defb _ _ _ _ _ _ U _ _ J U U U L _ $F1
    defb _ _ _ _ _ _ U _ _ U U U U _ _ $F1
    defb _ _ _ _ _ U _ _ J U U U L _ _ $F1
    defb _ _ _ _ _ U _ _ U U U U _ _ _ $F1
    defb _ _ _ _ U _ _ J U U U L _ _ _ $F1
    defb _ _ _ _ U _ _ U U U U _ _ _ _ $F1
    defb _ _ _ U _ _ J U U U L _ _ _ _ $F1
    defb _ _ _ U _ _ U U U U _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb L _ L _ L _ L _ L _ L _ L _ L $F1
    defb J _ J _ J _ J _ J _ J _ J _ J $F1
    defb _ L _ L _ L _ L _ L _ L _ L _ $F1
    defb _ J _ J _ J _ J _ J _ J _ J _ $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb J _ L J _ L J _ L J _ L J _ L $F1
    defb _ L J _ L J _ L J _ L J _ L J $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb L L L L L L L L L L L L L L L $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ J _ L L U L J U J U _ _ _ $F1
    defb U _ J _ L _ L J J _ J _ _ _ _ $F1
    defb U _ J U L L U L J U J U _ _ _ $F1
    defb U _ J _ L L L J J _ _ J _ _ _ $F1
    defb U _ J _ L L L J J U J U _ _ _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U L _ $F1
    defb U _ _ J _ L _ _ _ _ _ _ _ J _ $F1
    defb U _ _ J U L L _ _ _ _ _ _ L _ $F1
    defb U _ _ J _ L L _ _ _ _ _ J _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ J _ L L U L J U J U _ $F1
    defb U _ _ _ J _ L _ L J J _ J _ _ $F1
    defb U _ _ _ J U L L U L J U J U _ $F1
    defb U _ _ _ J _ L L L J J _ _ J _ $F1
    defb U _ _ _ J _ L L L J J U J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ _ J _ L L U L J U J U $F1
    defb U _ _ _ _ J _ L _ L J J _ J _ $F1
    defb U _ _ _ _ J U L L U L J U J U $F1
    defb U _ _ _ _ J _ L L L J J _ _ J $F1
    defb _ _ _ _ _ J _ L L L J J U J U $F1 ;1024


    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ J _ L L U L J U J U _ _ J _ $F1 
    defb _ J _ L _ L J J _ J _ _ _ U _ $F1
    defb _ J U L L U L J U J U _ J U _ $F1
    defb _ J _ L L L J J _ _ J _ U U _ $F1
    defb _ J _ L L L J J U J U J U U _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ J U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ U U U U _ $F1
    defb _ _ _ _ _ _ U _ _ J U U U L _ $F1
    defb _ _ _ _ _ _ U _ _ U U U U _ _ $F1
    defb _ _ _ _ _ U _ _ J U U U L _ _ $F1
    defb _ _ _ _ _ U _ _ U U U U _ _ _ $F1
    defb _ _ _ _ U _ _ J U U U L _ _ _ $F1
    defb _ _ _ _ U _ _ U U U U _ _ _ _ $F1
    defb _ _ _ U _ _ J U U U L _ _ _ _ $F1
    defb _ _ _ U _ _ U U U U _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb L _ L _ L _ L _ L _ L _ L _ L $F1
    defb J _ J _ J _ J _ J _ J _ J _ J $F1
    defb _ L _ L _ L _ L _ L _ L _ L _ $F1
    defb _ J _ J _ J _ J _ J _ J _ J _ $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb J _ L J _ L J _ L J _ L J _ L $F1
    defb _ L J _ L J _ L J _ L J _ L J $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb L L L L L L L L L L L L L L L $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ J _ L L U L J U J U _ _ _ $F1
    defb U _ J _ L _ L J J _ J _ _ _ _ $F1
    defb U _ J U L L U L J U J U _ _ _ $F1
    defb U _ J _ L L L J J _ _ J _ _ _ $F1
    defb U _ J _ L L L J J U J U _ _ _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U L _ $F1
    defb U _ _ J _ L _ _ _ _ _ _ _ J _ $F1
    defb U _ _ J U L L _ _ _ _ _ J L _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ J _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U L _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ J _ L L U L J U J U _ $F1
    defb U _ _ _ J _ L _ L J J _ J _ _ $F1
    defb U _ _ _ J U L L U L J U J U _ $F1
    defb U _ _ _ J _ L L L J J _ _ J _ $F1
    defb U _ _ _ J _ L L L J J U J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ _ J _ L L U L J U J U $F1
    defb U _ _ _ _ J _ L _ L J J _ J _ $F1
    defb U _ _ _ _ J U L L U L J U J U $F1
    defb U _ _ _ _ J _ L L L J J _ _ J $F1
    defb _ _ _ _ _ J _ L L L J J U J U $F1 ;1024





    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ J _ L L U L J U J U _ _ J _ $F1 
    defb _ J _ L _ L J J _ J _ _ _ U _ $F1
    defb _ J U L L U L J U J U _ J U _ $F1
    defb _ J _ L L L J J _ _ J _ U U _ $F1
    defb _ J _ L L L J J U J U J U U _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ J U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ U U U U _ $F1
    defb _ _ _ _ _ _ U _ _ J U U U L _ $F1
    defb _ _ _ _ _ _ U _ _ U U U U _ _ $F1
    defb _ _ _ _ _ U _ _ J U U U L _ _ $F1
    defb _ _ _ _ _ U _ _ U U U U _ _ _ $F1
    defb _ _ _ _ U _ _ J U U U L _ _ _ $F1
    defb _ _ _ _ U _ _ U U U U _ _ _ _ $F1
    defb _ _ _ U _ _ J U U U L _ _ _ _ $F1
    defb _ _ _ U _ _ U U U U _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb L _ L _ L _ L _ L _ L _ L _ L $F1
    defb J _ J _ J _ J _ J _ J _ J _ J $F1
    defb _ L _ L _ L _ L _ L _ L _ L _ $F1
    defb _ J _ J _ J _ J _ J _ J _ J _ $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb J _ L J _ L J _ L J _ L J _ L $F1
    defb _ L J _ L J _ L J _ L J _ L J $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb L L L L L L L L L L L L L L L $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ J _ L L U L J U J U _ _ _ $F1
    defb U _ J _ L _ L J J _ J _ _ _ _ $F1
    defb U _ J U L L U L J U J U _ _ _ $F1
    defb U _ J _ L L L J J _ _ J _ _ _ $F1
    defb U _ J _ L L L J J U J U _ _ _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ L J _ $F1
    defb U _ _ J _ L _ _ _ _ _ _ L J _ $F1
    defb U _ _ J U L L _ _ _ _ _ U U _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ J _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ J _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ J _ L L U L J U J U _ $F1
    defb U _ _ _ J _ L _ L J J _ J _ _ $F1
    defb U _ _ _ J U L L U L J U J U _ $F1
    defb U _ _ _ J _ L L L J J _ _ J _ $F1
    defb U _ _ _ J _ L L L J J U J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ _ J _ L L U L J U J U $F1
    defb U _ _ _ _ J _ L _ L J J _ J _ $F1
    defb U _ _ _ _ J U L L U L J U J U $F1
    defb U _ _ _ _ J _ L L L J J _ _ J $F1
    defb _ _ _ _ _ J _ L L L J J U J U $F1 ;1024





    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ J _ L L U L J U J U _ _ J _ $F1 
    defb _ J _ L _ L J J _ J _ _ _ U _ $F1
    defb _ J U L L U L J U J U _ J U _ $F1
    defb _ J _ L L L J J _ _ J _ U U _ $F1
    defb _ J _ L L L J J U J U J U U _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ J U U U _ $F1
    defb _ _ _ _ _ _ _ U _ _ U U U U _ $F1
    defb _ _ _ _ _ _ U _ _ J U U U L _ $F1
    defb _ _ _ _ _ _ U _ _ U U U U _ _ $F1
    defb _ _ _ _ _ U _ _ J U U U L _ _ $F1
    defb _ _ _ _ _ U _ _ U U U U _ _ _ $F1
    defb _ _ _ _ U _ _ J U U U L _ _ _ $F1
    defb _ _ _ _ U _ _ U U U U _ _ _ _ $F1
    defb _ _ _ U _ _ J U U U L _ _ _ _ $F1
    defb _ _ _ U _ _ U U U U _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb L _ L _ L _ L _ L _ L _ L _ L $F1
    defb J _ J _ J _ J _ J _ J _ J _ J $F1
    defb _ L _ L _ L _ L _ L _ L _ L _ $F1
    defb _ J _ J _ J _ J _ J _ J _ J _ $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb J _ L J _ L J _ L J _ L J _ L $F1
    defb _ L J _ L J _ L J _ L J _ L J $F1
    defb L J _ L J _ L J _ L J _ L J _ $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb L L L L L L L L L L L L L L L $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb J J J J J J J J J J J J J J J $F1
    defb U U U U U U U U U U U U U U U $F1
    defb L L L L L L L L L L L L L L L $F1
    defb U U U U U U U U U U U U U U U $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ J _ L L U L J U J U _ _ _ $F1
    defb U _ J _ L _ L J J _ J _ _ _ _ $F1
    defb U _ J U L L U L J U J U _ _ _ $F1
    defb U _ J _ L L L J J _ _ J _ _ _ $F1
    defb U _ J _ L L L J J U J U _ _ _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U U _ $F1
    defb U _ _ J _ L _ _ _ _ _ _ L _ _ $F1
    defb U _ _ J U L L _ _ _ _ _ U L _ $F1
    defb U _ _ J _ L L _ _ _ _ _ _ J _ $F1
    defb U _ _ J _ L L _ _ _ _ _ U L _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ J _ L L U L J U J U _ $F1
    defb U _ _ _ J _ L _ L J J _ J _ _ $F1
    defb U _ _ _ J U L L U L J U J U _ $F1
    defb U _ _ _ J _ L L L J J _ _ J _ $F1
    defb U _ _ _ J _ L L L J J U J U _ $F1
    defb U _ _ _ _ _ _ _ _ _ _ _ _ _ _ $F1
    defb U _ _ _ _ J _ L L U L J U J U $F1
    defb U _ _ _ _ J _ L _ L J J _ J _ $F1
    defb U _ _ _ _ J U L L U L J U J U $F1
    defb U _ _ _ _ J _ L L L J J _ _ J $F1
    defb _ _ _ _ _ J _ L L L J J U J U $F1 ;1024



    undefine _
    undefine J
    undefine L
    undefine U


vsync

    ;ld a,(hl)    ;7
    ;and a,d    ;4
    ;ret nz        ;5/11
            ;16 ;22
            ;разброс 12 знакомест



endaddr
    lua pass3
    startaddr = (_c("startaddr"))
    endaddr = (_c("endaddr"))
    csum = 0
    for cnt = startaddr,endaddr - 1,1 do
    csum = (csum + (sj.get_byte(cnt) * 257)) % 65536
    end
    _pl("csum = "..csum)
    print (csum)
    endlua

    display csum and $FFFF
;    defb 0,$E6,high csum,low csum    ;rk*
    defb 0,0,$E6,high csum,low csum    ;rk

endfile

    savebin "hrs_00_0.rka", beginfile, endfile-beginfile
    самое интересное что на фотках после перезапуска
    картинка выравнивается правильно на первую строку(на вид)

    хотя если "цыфры разные" скорей всего нет синхронизации(так как вверху должно быть 1)
    и телек\тюнер просто подогнал частоту развертки пока не появилось стабильное изображение
    хотя и дырки в 4 пикселя не видно!!
    может синхронизация и есть

    - - - Добавлено - - -

    Если начать с перепрограммирования ПДП
    а потом делать сброс

    то изображение рвет уже в самом emu80)))))
    Последний раз редактировалось NEO SPECTRUMAN; 10.04.2017 в 22:01.
    Ответить с цитированием Ответить с цитированием
« Предыдущая тема | Следующая тема »

Информация о теме

Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Радио-86РК: Игры
    от rnd.gen в разделе Радио-86РК
    Ответов: 146
    Последнее: 10.12.2025, 06:29
  2. Радио-86РК: По страницам журнала "Радио"
    от Viktor2312 в разделе Радио-86РК
    Ответов: 79
    Последнее: 13.02.2014, 08:34
  3. Радио 86рк на AVR
    от PWA в разделе Радио-86РК
    Ответов: 6
    Последнее: 10.06.2013, 13:01
  4. Электроника КР-02 радио 86рк
    от serj0611 в разделе Барахолка (архив)
    Ответов: 2
    Последнее: 25.04.2011, 17:14
  5. Радио 86РК
    от Shnurkov в разделе Барахолка (архив)
    Ответов: 1
    Последнее: 02.01.2009, 12:52

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •  

Правила форума