Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <system.h>
- #pragma DATA 0x2007, 0x3F3A
- #pragma CLOCK_FREQ 20000000
- /*
- Program 0 = White leds follow turn indicators
- program 1 = 4 blocks flashing
- Program 2 = Dual scan center in/out
- Program 3 = Traffic advisor Right arrow
- Program 4 = Traffic advisor Right arrow special
- Program 5 = Traffic advisor Left arrow
- Program 6 = Traffic advisor Left arrow special
- Program 7 = Traffic advisor Center out
- Program 8 = Traffic advisor Quadflash ALL rotate frond and rear
- Program 9 = Crossfire
- Program 10 = Scan
- Program 11 = Dual Scan
- Program 12 = Rotate complete
- Program 13 = Flashing lights.
- Program 14 = Dark light left (white led)
- Program 15 = Dark ligt right (white led)
- */
- char delay1 = 100;
- char delayb1 = 150;
- char delayd1 = 50;
- char delay2 = 50;
- char delayb2 = 75;
- char delayd2 = 25;
- char delay3 = 30;
- char delayb3 = 50;
- char delayd3 = 15;
- char delay4 = 30;
- char delayb4 = 50;
- char delayd4 = 15;
- char delay5 = 30;
- char delayb5 = 50;
- char delayd5 = 15;
- char delay6 = 30;
- char delayb6 = 50;
- char delayd6 = 15;
- char delay7 = 30;
- char delayb7 = 50;
- char delayd7 = 15;
- char delay8 = 30;
- char delayb8 = 50;
- char delayd8 = 15;
- char delay9 = 30;
- char delayb9 = 50;
- char delayd9 = 15;
- char delay10 = 30;
- char delayb10 = 50;
- char delayd10 = 15;
- char delay11 = 30;
- char delayb11 = 50;
- char delayd11 = 15;
- char delay12 = 30;
- char delayb12 = 50;
- char delayd12 = 15;
- char delay13 = 30;
- char delayb13 = 50;
- char delayd13 = 15;
- char delay14 = 30;
- char delayb14 = 50;
- char delayd14 = 15;
- char delay15 = 30;
- char delayb15 = 50;
- char delayd15 = 15;
- void main()
- {
- //76543210
- trisa = 00000000b;
- trisb = 00000000b;
- trisc = 11110000b;
- trisd = 11111111b;
- trise = 00000000b;
- porta = 0x00;
- portb = 0x00;
- portc = 0x00;
- portd = 0x00;
- porte = 0x00;
- while(1)
- {
- ////////////////////////////////////////////PROGRAM 1////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 1 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd1);
- portb = 00000000b;
- delay_ms(delayb1);
- portb = 00010000b;
- delay_ms(delayd1);
- portb = 00001000b;
- delay_ms(delayd1);
- portb = 00000000b;
- delay_ms(delayb1);
- portb = 00001000b;
- delay_ms(delayd1);
- portb = 00000100b;
- delay_ms(delayd1);
- portb = 00000000b;
- delay_ms(delayb1);
- portb = 00000100b;
- delay_ms(delayd1);
- portb = 00000010b;
- delay_ms(delayd1);
- portb = 00000000b;
- delay_ms(delayb1);
- portb = 00000010b;
- delay_ms(delayd1);
- portb = 00000001b;
- delay_ms(delayd1);
- portb = 00000000b;
- delay_ms(delayb1);
- portb = 00000001b;
- delay_ms(delayd1);
- portb = 00000000b;
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 1
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay1);
- portb = 00001000b;
- delay_ms(delay1);
- portb = 00000100b;
- delay_ms(delay1);
- portb = 00000010b;
- delay_ms(delay1);
- portb = 00000001b;
- delay_ms(delay1);
- portb = 00000000b;
- }
- }
- ////////////////////////////////////////////PROGRAM 2////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(!test_bit(portc,6))
- if(test_bit(portc,7))
- {
- if(test_bit(portd,0))
- {
- //PROGRAM 2 DUAL
- //76543210
- porta = 00001111b;
- porte = 00000000b;
- portb = 00000001b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00000001b;
- delay_ms(delayd2);
- portb = 00000000b;
- porta = 00000001b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011111b;
- delay_ms(delayd2);
- porta = 00000010b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000100b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00001000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000000b;
- porte = 00000001b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00100000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000000b;
- porte = 00000010b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000000b;
- porte = 00000010b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011111b;
- delay_ms(delayd2);
- porta = 00100000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000000b;
- porte = 00000001b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00001000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000100b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000010b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00000001b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00011110b;
- delay_ms(delayd2);
- porta = 00001111b;
- porte = 00000000b;
- portb = 00000001b;
- delay_ms(delayd2);
- portb = 00000000b;
- delay_ms(delayb2);
- portb = 00000001b;
- delay_ms(delayd2);
- portb = 00000000b;
- }
- if(!test_bit(portd,0))
- {
- //PROGRAM 2 SINGLE
- //76543210
- porta = 00001111b;
- porte = 00000000b;
- portb = 00000001b;
- delay_ms(delay2);
- porta = 00000001b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000010b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000100b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00001000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000000b;
- porte = 00000001b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00100000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000000b;
- porte = 00000010b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000000b;
- porte = 00000010b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00100000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000000b;
- porte = 00000001b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00001000b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000100b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000010b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00000001b;
- porte = 00000000b;
- portb = 00011110b;
- delay_ms(delay2);
- porta = 00001111b;
- porte = 00000000b;
- portb = 00000001b;
- delay_ms(delay2);
- portb = 00000000b;
- }
- }
- ////////////////////////////////////////////PROGRAM 3////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 3 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd3);
- portb = 00000000b;
- delay_ms(delayb3);
- portb = 00010000b;
- delay_ms(delayd3);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 3
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay3);
- }
- }
- ////////////////////////////////////////////PROGRAM 4////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 4 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd4);
- portb = 00000000b;
- delay_ms(delayb4);
- portb = 00010000b;
- delay_ms(delayd4);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 4
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay4);
- }
- }
- ////////////////////////////////////////////PROGRAM 5////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 5 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd5);
- portb = 00000000b;
- delay_ms(delayb5);
- portb = 00010000b;
- delay_ms(delayd5);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 5
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay5);
- }
- }
- ////////////////////////////////////////////PROGRAM 6////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 6 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd6);
- portb = 00000000b;
- delay_ms(delayb6);
- portb = 00010000b;
- delay_ms(delayd6);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 6
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay6);
- }
- }
- ////////////////////////////////////////////PROGRAM 7////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 7 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd7);
- portb = 00000000b;
- delay_ms(delayb7);
- portb = 00010000b;
- delay_ms(delayd7);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 7
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay7);
- }
- }
- ////////////////////////////////////////////PROGRAM 8////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 8 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd8);
- portb = 00000000b;
- delay_ms(delayb8);
- portb = 00010000b;
- delay_ms(delayd8);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 8
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay8);
- }
- }
- ////////////////////////////////////////////PROGRAM 9////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 9 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd9);
- portb = 00000000b;
- delay_ms(delayb9);
- portb = 00010000b;
- delay_ms(delayd9);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 9
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay9);
- }
- }
- ////////////////////////////////////////////PROGRAM 10////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 10 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd10);
- portb = 00000000b;
- delay_ms(delayb10);
- portb = 00010000b;
- delay_ms(delayd10);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 10
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay10);
- }
- }
- ////////////////////////////////////////////PROGRAM 11////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 11 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd11);
- portb = 00000000b;
- delay_ms(delayb11);
- portb = 00010000b;
- delay_ms(delayd11);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 11
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay11);
- }
- }
- ////////////////////////////////////////////PROGRAM 12////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 12 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd12);
- portb = 00000000b;
- delay_ms(delayb12);
- portb = 00010000b;
- delay_ms(delayd12);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 12
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay12);
- }
- }
- ////////////////////////////////////////////PROGRAM 13////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 13 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd13);
- portb = 00000000b;
- delay_ms(delayb13);
- portb = 00010000b;
- delay_ms(delayd13);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 13
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay13);
- }
- }
- ////////////////////////////////////////////PROGRAM 14////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 14 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd14);
- portb = 00000000b;
- delay_ms(delayb14);
- portb = 00010000b;
- delay_ms(delayd14);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 14
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay14);
- }
- }
- ////////////////////////////////////////////PROGRAM 15////////////////////////////////////////
- if(test_bit(portc,4))
- if(test_bit(portc,5))
- if(test_bit(portc,6))
- if(!test_bit(portc,7))
- {
- if(test_bit(portd,0)) // KeyPress
- {
- //Program 15 DUAL
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delayd15);
- portb = 00000000b;
- delay_ms(delayb15);
- portb = 00010000b;
- delay_ms(delayd15);
- }
- if(!test_bit(portd,0)) // KeyPress
- {
- //PROGRAM 15
- //76543210
- porta = 00101111b;
- porte = 00000011b;
- portb = 00010000b;
- delay_ms(delay15);
- }
- }
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment