Programming Manual Elektor Proton Robot - ELEKTOR.se

Two push buttons (red and black) on the body
Pushing the buttons will have effect on the Led’s and the buzzer
PIC16F887
ATMEGA32
Demoprogram Flowcode PIC V4
Demoprogram Flowcode AVR V4
PROTDEM_FCPIC_SWI.fcf
PROTDEM_FCAVR_SWI.fcf_avr
Demoprogram Hitech C lite for PIC
Demoprogram WinAVR C for AVR
#include
#include
#include "PIC_PROTON_LIB.h"
#define _XTAL_FREQ 19660800
__CONFIG(0x2ff2); // set HS Xtal etc
__CONFIG(0x3fff);
void main()
{
// init AD & Option reg
ANSEL = 0;
ANSELH = 0;
OPTION = 0xC0;
// end of init
__delay_ms(250);
__delay_ms(250); //wait for stable power supply
TRISB |=0b00110000; //B4-B5 input - SWITCHES
TRISD = 0x00; // PORTD = OUTPUT = leds
TRISA &= ~0x10; //PIN A4 =OUT= LS
}
while (1)
{
if (PORTB & 0b00010000) //red switch
{
PORTD = 0x0F;
PORTA |= 0x10; //pin A4 High
__delay_ms(1);
PORTA &= ~0x10; //pin A4 Low
__delay_ms(1);
}
else if (PORTB & 0b00100000) //black switch
{
PORTD = 0xF0;
PORTA |= 0x10; //pin A4 High
__delay_us(500);
PORTA &= ~0x10; //pin A4 Low
__delay_us(500);
}
else PORTD = 0x00;
}
#define F_CPU 19660800UL
#include
#include "AVR_PROTON_LIB.h"
int main ( void )
{
_delay_ms(250);
_delay_ms(250); //wait for stable power supply
DDRD &=~0b00001100; //D2 and D3 input - SWITCHES
DDRB = 0xFF; // PORTB = OUTPUT = leds
DDRD |= 0x80; //PIN D7 = output
}
while (1)
{
if (PIND & 0b00000100) //red switch
{
PORTB = 0x0F;
PORTD |= 0x80; //pin D7 High
_delay_ms(1);
PORTD &= ~0x80; //pin D7 Low
_delay_ms(1);
}
else if (PIND & 0b00001000) //black switch
{
PORTB = 0xF0;
PORTD |= 0x80; //pin D7 High
_delay_us(500);
PORTD &= ~0x80; //pin D7 Low
_delay_us(500);
}
else PORTB = 0x00;
}
Bart Huyskens Manual Elektor Proton V1.0 3 April 2011 40