Пт мар 29, 2019 07:05:35
;*******************************************************************************
#include <p18lf2620.inc>
;*******************************************************************************
; TODO INSERT INCLUDE CODE HERE
;*******************************************************************************
; PIC18LF2620 Configuration Bit Settings
; CONFIG1H
CONFIG OSC = HSPLL ; Oscillator Selection bits (HS oscillator, PLL enabled (Clock Frequency = 4 x FOSC1))
CONFIG FCMEN = OFF ; Fail-Safe Clock Monitor Enable bit (Fail-Safe Clock Monitor disabled)
CONFIG IESO = OFF ; Internal/External Oscillator Switchover bit (Oscillator Switchover mode disabled)
; CONFIG2L
CONFIG PWRT = OFF ; Power-up Timer Enable bit (PWRT disabled)
CONFIG BOREN = OFF ; Brown-out Reset Enable bits (Brown-out Reset disabled in hardware and software)
CONFIG BORV = 2 ; Brown Out Reset Voltage bits ()
; CONFIG2H
; CONFIG WDT = ON ; Watchdog Timer Enable bit (WDT enabled)
CONFIG WDT = OFF ; Watchdog Timer Enable bit (WDT disabled (control is placed on the SWDTEN bit))
CONFIG WDTPS = 32768 ; Watchdog Timer Postscale Select bits (1:32768)
; CONFIG3H
CONFIG CCP2MX = PORTC ; CCP2 MUX bit (CCP2 input/output is multiplexed with RC1)
CONFIG PBADEN = OFF ; PORTB A/D Enable bit (PORTB<4:0> pins are configured as digital I/O on Reset)
CONFIG LPT1OSC = OFF ; Low-Power Timer1 Oscillator Enable bit (Timer1 configured for higher power operation)
CONFIG MCLRE = ON ; MCLR Pin Enable bit (MCLR pin enabled; RE3 input pin disabled)
; CONFIG4L
CONFIG STVREN = OFF ; Stack Full/Underflow Reset Enable bit (Stack full/underflow will not cause Reset)
CONFIG LVP = OFF ; Single-Supply ICSP Enable bit (Single-Supply ICSP disabled)
CONFIG XINST = OFF ; Extended Instruction Set Enable bit (Instruction set extension and Indexed Addressing mode disabled (Legacy mode))
; CONFIG5L
CONFIG CP0 = OFF ; Code Protection bit (Block 0 (000800-003FFFh) not code-protected)
CONFIG CP1 = OFF ; Code Protection bit (Block 1 (004000-007FFFh) not code-protected)
CONFIG CP2 = OFF ; Code Protection bit (Block 2 (008000-00BFFFh) not code-protected)
CONFIG CP3 = OFF ; Code Protection bit (Block 3 (00C000-00FFFFh) not code-protected)
; CONFIG5H
CONFIG CPB = OFF ; Boot Block Code Protection bit (Boot block (000000-0007FFh) not code-protected)
CONFIG CPD = OFF ; Data EEPROM Code Protection bit (Data EEPROM not code-protected)
; CONFIG6L
CONFIG WRT0 = OFF ; Write Protection bit (Block 0 (000800-003FFFh) not write-protected)
CONFIG WRT1 = OFF ; Write Protection bit (Block 1 (004000-007FFFh) not write-protected)
CONFIG WRT2 = OFF ; Write Protection bit (Block 2 (008000-00BFFFh) not write-protected)
CONFIG WRT3 = OFF ; Write Protection bit (Block 3 (00C000-00FFFFh) not write-protected)
; CONFIG6H
CONFIG WRTC = OFF ; Configuration Register Write Protection bit (Configuration registers (300000-3000FFh) not write-protected)
CONFIG WRTB = OFF ; Boot Block Write Protection bit (Boot Block (000000-0007FFh) not write-protected)
CONFIG WRTD = OFF ; Data EEPROM Write Protection bit (Data EEPROM not write-protected)
; CONFIG7L
CONFIG EBTR0 = OFF ; Table Read Protection bit (Block 0 (000800-003FFFh) not protected from table reads executed in other blocks)
CONFIG EBTR1 = OFF ; Table Read Protection bit (Block 1 (004000-007FFFh) not protected from table reads executed in other blocks)
CONFIG EBTR2 = OFF ; Table Read Protection bit (Block 2 (008000-00BFFFh) not protected from table reads executed in other blocks)
CONFIG EBTR3 = OFF ; Table Read Protection bit (Block 3 (00C000-00FFFFh) not protected from table reads executed in other blocks)
; CONFIG7H
CONFIG EBTRB = OFF ; Boot Block Table Read Protection bit (Boot Block (000000-0007FFh) not protected from table reads executed in other blocks)
;=========================
; ПЕРЕМЕННЫЕ
;=========================
CBLOCK H'10'
temp
temp_code
count ;СЧЕТЧИК БАЙТ
n ;СЧЕТЧИК ПОЛУБАЙТ
nnn ;ВСЯКОЕ
red
green
blue ;ЗНАЧЕНЯ БАЙТА ЦВЕТА
box_zigzag ;ЗНАЧЕНИЯ ТАБЛИЦЫ RGB
word_hi ; СТАРШИЙ ПОЛНЫЙ КОД ЦВЕТА
word_hi_hi ; СТАРШИЙ ПОЛУБАЙТ КОДА ЦВЕТА
word_hi_low ; МЛАДШИЙ ПОЛУБАЙТ КОДА ЦВЕТА
word_low ; МЛАДШИЙ ПОЛНЫЙ КОД ЦВЕТА
word_low_hi ; СТАРШИЙ ПОЛУБАЙТ КОДА ЦВЕТА
word_low_low ; МЛАДШИЙ ПОЛУБАЙТ КОДА ЦВЕТА
Reg_1
Reg_2
Reg_3
Reg_4 ;РЕГИСТРЫ ДЛЯ ЗАДЕРЖЕК
ENDC
CBLOCK H'100'
edat0 ;:256 БАЙТ (100-1FF)
ENDC
CBLOCK 0X200
data_RGB ;16*16*2=512 512*3=1536 байт (200-7FF)
ENDC
;=========================
; ДАННЫЕ EEPROM "РИСУНОК"
;=========================
DATAEE ORG 0XF00000
DE H'2B',H'BB',H'BB',H'00',H'55',H'88',H'00',H'11'
DE "titr" ; Place 't' 'i' 't' 'r'
;=========================
; КОНСТАНТЫ
;=========================
#DEFINE LED_GREEN LATA,0 ;ЗЕЛЁНЫЙ СВЕТОДИОД НА ПЛАТЕ
#DEFINE ZIGZAG LATB,0 ;ВЫХОД НА LED ЛЕНТУ
BSR_SFR EQU .1 ;ВЫБОР БАНКА SFR
COUNT_CONST EQU .255 ;256 БАЙТ EDAT0...
MASK EQU B'00001111' ;МАСКА ДЛЯ ВЫДЕЛЕНИЯ МЛАДШЕГО ПОЛУБАЙТА
;=========================
; Reset Vectored
;*******************************************************************************
ORG 0x0000 ; predocessored redeset vectored
GOTO START ; greeno to blueegreeninningreen of predogreenredam
;*******************************************************************************
; TODO Step #4 - Interedredupt Seredvice Routines
;*******************************************************************************
; ИНИЦИАЛИЗАЦИЯ
;*******************************************************************************
ORG H'20'
START
MOVLW BSR_SFR ;ВЫБИРАЕМ БАНК SFR
MOVWF BSR
CLRF PORTA
CLRF LATA
MOVLW B'00001111'
MOVWF ADCON1 ;ЦИФРОВЫЕ I/O
MOVLW B'00000111'
MOVWF CMCON ;OFF COMPARATORS
MOVLW B'00000000' ;1,2,3,4,6,7-ВХОДЫ, 0,5-ВЫХОДЫ
MOVWF TRISA ;
CLRF PORTB
CLRF LATB
MOVLW B'00001111'
MOVWF ADCON1 ;ЦИФРОВЫЕ I/O ПОВТОРНО ЗАЧЕМ?
MOVLW B'00011110' ;ПРОВЕРИТЬ SS=1
MOVWF TRISB ;ВЫХОДЫ 0,5,6,7; ВХОДЫ 1,2,3,4 КНОПКИ УПРАВЛЕНИЯ
CLRF PORTC
CLRF LATC
MOVLW B'00000000' ;
MOVWF TRISC ;ПОКА ВСЕ ВЫХОДЫ
BSF SSPSTAT, SMP ;ОПРОС ВХОДА В КОНЦЕ ПЕРИОДА ВЫВОДА ДАННЫХ
BSF SSPSTAT, CKE ;ПО ПЕРЕДНЕМУ ФРОНТУ
MOVLW B'00000000' ;ВЕДУЩ. РЕЖИМ SPI, Fosc /4-ЧАСТОТА, ПАСС. УР. СИГН. НИЗКИЙ УР
MOVWF SSPCON1 ;MSSP ВЫКЛЮЧЕН ПОКА (5)
MOVLW B'01110100' ;10 mhz
MOVWF OSCCON ;ВНЕШНИЙ КВАРЦ, 10 МГЦ (PLL*4=40 МГЦ)
MOVLW B'00000000'
MOVWF OSCTUNE
MOVWF INTCON ;
BCF WDTCON,SWDTEN ;WDT ТАЙМЕР ОТКЛЮЧЕН
CLRF LATA
CLRF LATB
CLRF LATC
;=========================
; РИСУНОК
;=========================
ORG 0x100 ; УТОЧНИТЬ АДРЕС (100 - 1FF)ПАМЯТЬ ПРОГРАММ
PICTURE
db H'17',H'11',H'11',H'11',H'44',H'44',H'44',H'64',H'11',H'11',H'11',H'11',H'44',H'44',H'44',H'64'
db H'11',H'11',H'11',H'11',H'46',H'66',H'66',H'66',H'11',H'11',H'11',H'11',H'46',H'66',H'66',H'66'
db H'11',H'11',H'11',H'11',H'46',H'44',H'44',H'64',H'11',H'11',H'11',H'11',H'46',H'44',H'44',H'64'
db H'11',H'11',H'11',H'11',H'44',H'44',H'44',H'44',H'11',H'11',H'11',H'11',H'44',H'44',H'44',H'44'
db H'11',H'11',H'11',H'11',H'46',H'66',H'66',H'46',H'11',H'11',H'11',H'11',H'46',H'66',H'66',H'46'
db H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'44',H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'44'
db H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'64',H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'64'
db H'44',H'44',H'44',H'44',H'16',H'66',H'66',H'66',H'44',H'44',H'44',H'44',H'16',H'66',H'66',H'66'
db H'44',H'44',H'44',H'44',H'16',H'44',H'44',H'64',H'44',H'44',H'44',H'44',H'16',H'44',H'44',H'64'
db H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'44',H'44',H'44',H'44',H'44',H'14',H'44',H'44',H'44'
db H'66',H'66',H'66',H'66',H'46',H'66',H'66',H'66',H'66',H'66',H'66',H'66',H'46',H'66',H'66',H'66'
db H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'64',H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'64'
db H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'46',H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'46'
db H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'64',H'66',H'66',H'66',H'66',H'44',H'44',H'44',H'64'
db H'66',H'66',H'66',H'66',H'41',H'14',H'44',H'44',H'66',H'66',H'66',H'66',H'41',H'14',H'44',H'44'
db H'66',H'66',H'66',H'66',H'41',H'14',H'44',H'44',H'66',H'66',H'66',H'66',H'41',H'14',H'44',H'74'
;----------
; НАЧАЛО: МОРГАЛКА СВЕТИОДИДОМ
;----------
NNN
BSF LED_GREEN ;ВКЛЮЧАЕМ ЗЕЛЁНЫЙ СВЕТОДИОД
BCF LED_GREEN ;OFF LED
BRA NNN
;=========================
ДАЛЕЕ КОД ПРОГРАММЫ...
END
Пт мар 29, 2019 17:05:58
Пт мар 29, 2019 17:27:26
Пт мар 29, 2019 17:28:23
Пт мар 29, 2019 18:05:41
Пт мар 29, 2019 18:56:17
Пт мар 29, 2019 19:21:40
Пт мар 29, 2019 20:00:12
Пт мар 29, 2019 20:03:53
Пт мар 29, 2019 20:11:24
Сб мар 30, 2019 05:00:52
Сб мар 30, 2019 17:01:01
titr писал(а):в этом коде и нет ничего. кроме инита и вводных данных. самой программы нету. ну или ты забыл часть кода. судя по тексту. выкладывай оригинал программы.
и вообще. ты сам хотел научиться кодить или просто нужны эффекты? на самом деле в сети куча готовых решении по этой ленте. на ардуино?
не проще ли собрать на ней.?
Сб мар 30, 2019 17:19:15
Вт май 14, 2019 11:34:13
Сб май 25, 2019 05:16:49
Сб май 25, 2019 07:03:21
Сб май 25, 2019 11:26:16
Вс май 26, 2019 22:36:59
titr писал(а):в этом коде и нет ничего. кроме инита и вводных данных. самой программы нету. ну или ты забыл часть кода. судя по тексту. выкладывай оригинал программы.
и вообще. ты сам хотел научиться кодить или просто нужны эффекты? на самом деле в сети куча готовых решении по этой ленте. на ардуино?
не проще ли собрать на ней.?
Пн май 27, 2019 07:43:02
Пн май 27, 2019 17:38:23