; ***************************************** ; ; Вход * A3754 ; ; Генератор наложения видеоизображений, используя avr2313 ; ; 15 мая 2004 - 29 июня 2004 ; ; ; ; ***************************************** .include "2313def.inc" .equ RAMSTART=$60 .equ XChars=20; Символы в row .equ YChars=6; Строки в экран .equ ENDDISP=235; длитесь row, чтобы отобразить, это работает хорошо .equ STARTDISP=ENDDISP-YChars*8; row start на, отступить .equ MAXDISPADD = (XChars*YChars-1) +RAMSTART; последнее ОЗУ, используемое disp .equ Fiveus=16; 4.8 нас задерживаются в 10 МГЦ .equ Tenus=33; 9.9 нас задерживаются в 10 МГЦ ;. equ Fiveus=28; 5.8 нас задерживаются в 14.31818 МГЦ ;. equ Tenus=64; 13.4 нас задерживаются в 14.31818 МГЦ .equ BPS96=64; 9600 битов в секунду в 10 МГЦ ;. equ BPS96=92; 9600 битов в секунду в 14.31818 МГЦ .equ TMR80=100; переполнение в 80 нас .equ RingStart=RAMSTART+XChars*YChars; НАЧАЛО Кольцевого Буфера .equ RingLength=4; 4 байта .equ HiAddBit = (1 <<2); set hi обращается к биту для поиска таблицы символа .equ VideoBit=7; Бит PORTB, где видео выходит .equ VideoOn=$80; включить видео вывод .equ VideoOff=$00; на пустой дисплей .equ BlnkBit=6; бит порта для кнопки гашения .def VidOut=r0; видео регистр вывода .def RingStatus=r1; Кольцевое Буферное состояние ; полубайт low считает ptr к символу next вставлять ; полубайт hi держит номер символов стыком in .def CursorX=r2; Наш курсор дисплея X .def CursorY =r3; и Y .def TEMP3=r4; другой временный Редж .def TEMP4=r5; и другой .def TEMP5=r6 .def TEMP6=r7 .def TEMP7=r21 .def ScrollF=r9; мы листаем? .def RowIncL=r13; держится low оценивает add к счету{графу} row .def RowIncH=r14; размещать row в надлежащие биты адреса .def SREG_Save=r15; разместите, чтобы поместить SREG .def TEMP1=r16; Misc временный Редж .def TEMP2=r17; Misc временный Редж .def VSFlag=r18; пометьте синхронизацию vert .def LineCnt=r19; счетчик строки .def CharCnt=r20; символы на строке .def RowCntLow=r23; row символа, чтобы отобразить .def RowCntHi=r24; часть high .org 0 rjmp RESET .org OVF0addr; Таймер 0 переполнения int rjmp TIM0INT .org ACIaddr; прерывание компаратора rjmp COMPINT ; ********************************************************************** ; Вот - основная программа. После инициализации всего, мы входим ; ждущий цикл. Мы будем идти, чтобы бездействовать и ждать запроса на прерывание. Это могло быть ; любой аналоговый компаратор (синхронизирующий обнаруженный импульс) or timer0 ; (переполнитесь, потому что никакая синхронизация не обнаруживала in 80 нас. Каждый запрос на прерывание обработан ; accoringly. После того, как irq обслуживается, мы проверим{отметим} универсальный асинхронный приемопередатчик и доберемся ; любой полученный символ. Тогда, если мы имеем время, мы обработаем символы ; in кольцевой буфер. Это только случается, являемся ли мы больше чем пара ; строки далеко от видео поколения{порождения}, чтобы не вмешиваться. ; ********************************************************************** RESET:; Начало основной программы ldi TEMP1, low (RAMEND) SPL, TEMP1; стек set ptr ldi TEMP1, VideoOn; pb7 vid, ввод других ddrb, TEMP1 ldi TEMP1,$3e; pd1-5 hi, 6 (строб) low PORTD, TEMP1 ldi TEMP1,$7e; pd1-6 выводы ddrd, TEMP1 ;; ; init row increment pointer ldi TEMP1,$80; add 128 row каждый раз mov RowIncL, TEMP1 clr RowIncH ; Буфер Кольца set, чтобы опустеть clr temp1; numchars=0, next extract=0 clr ScrollF ; set экран буферизует и X pointer ldi XL, low (RAMSTART); укажите на первый символ clr XH clr CursorX clr CursorY ; ; и кольцевой буфер clr RingStatus ; ; очистите экран, и дисплей входит в систему сообщение ldi YL, low (RAMSTART) clr YH ldi TEMP1, (XChars*YChars); Заполните Экран ldi TEMP2,32; с пространствами{пробелами} LOADRAM: C-Y +, TEMP2 dec TEMP1 brne LOADRAM ldi YL, low (RAMSTART); дисплей входит в систему сообщение clr YH ldi ZL, low (SIGNONMSG <<1); получите сообщение ldi ZH, high (SIGNONMSG <<1); <<1 из-за адресов слова ВОЙДИТЕ В СИСТЕМУ: lpm adiw ZL, 1 C-Y +, VidOut tst VidOut; войдите в систему сообщение, закончился нулевым{пустым} байтом brne ВХОДЯТ В СИСТЕМУ clr CursorX clr CursorY ; Мы закончили входящийся в систему ; ; ; Сначала, set timer0, чтобы прервать каждые 80 or так мкс ; случай{регистр} in там не никакой видео подарок{настоящее} сигнала. Тем путем, мы ; может все еще получать символы от универсального асинхронного приемопередатчика без синхронизации ; прерывание ldi TEMP1,2; отделение 8 предмасштабов TCCR0, TEMP1 ldi TEMP1, (256-TMR80); переполнение в 80uS, подсчитывает TCNT0, TEMP1 ; ; Теперь set последовательный порт для 9600 битов в секунду, никакое прерывание, хотя ; Это опросится на каждом прерывании, синхронизация переполнение таймера or ldi TEMP1, BPS96; последовательный порт set 9600 битов в секунду UBRR, TEMP1 ldi TEMP1,$10; включите rcv, допускают UCR, TEMP1 ; ; Теперь мы set бездействуем режим и допускаем надлежащим прерываниям ldi TEMP1, (1 <