// 14/Agosto/05
// vszener@gmail.com
// Programa: Coche Fantastico
// Version: 2.0
//
// Dispositivo: PIC 16F648A Compilador: CCS vs3.227
// Entorno IDE: MPLAB IDE v7.20 Simulador: Proteus 6.7sp3
//
// Notas: Barrido de led's simulando la iluminacion del coche fantastico por el
// puerto B. Adaptacion del codigo en basic de lordlafebre
//
// RB0 -> 1º Led
// RB1 -> 2º Led
// RB2 -> 3º Led
// RB3 -> 4º Led
// RB4 -> 5º Led
// RB5 -> 6º Led
// RB6 -> 7º Led
// RB7 -> 8º Led
// En la variable cont se va almacenando los valores 1-2-4-8-16-32-64-128
// que en binario corresponden a la secuencia 00000001-00000010-00000100...
// son los led's a iluminar, coincidiendo con la secuencia de iluminacion
// del coche fantastico(version Ecuatoriana: auto fantastico)
//////////////////////////////////////////////////////////////////////////////////
#include <16f648a.h> //pic a utilizar
#fuses XT,NOWDT,NOPROTECT,PUT,NOLVP //ordenes para el programador
#use delay (clock=4000000) //Fosc=4Mhz
#use standard_io(B) //puerto B como salida
///PROGRAMA
void main( void )
{
int i, cont; //variables definidas
set_tris_b( 0x00 ) ; //portb como salida
disable_interrupts( GLOBAL) ; //todas las interrupciones desactivadas
do { //bucle...
cont= 1 ; //inicializar...
i= 1 ; //...variables
do { //led's on derecha
output_b( cont) ; //ilumino led correspondiente
delay_ms( 100 ) ;
cont= cont* 2 ;
i++; //incremento i
} while ( i< 8 ) ;
i= 1 ; //reset valor i
do { //led's on izquierda
output_b( cont) ; //ilumino led correspondiente
delay_ms( 100 ) ;
cont= cont/ 2 ;
i++; //incremento i
} while ( i< 8 ) ;
} while ( TRUE) ; //...infinito
}
Ly8JCQkJCQkgICAxNC9BZ29zdG8vMDUKLy8JCQkJCQl2c3plbmVyQGdtYWlsLmNvbQovLwlQcm9ncmFtYToJQ29jaGUgRmFudGFzdGljbwovLwlWZXJzaW9uOgkyLjAKLy8KLy8JRGlzcG9zaXRpdm86IFBJQyAxNkY2NDhBCQkJQ29tcGlsYWRvcjoJIENDUyB2czMuMjI3Ci8vCUVudG9ybm8gSURFOiBNUExBQiBJREUgdjcuMjAJCVNpbXVsYWRvcjoJIFByb3RldXMgNi43c3AzCi8vCi8vCU5vdGFzOiBCYXJyaWRvIGRlIGxlZCdzIHNpbXVsYW5kbyBsYSBpbHVtaW5hY2lvbiBkZWwgY29jaGUgZmFudGFzdGljbyBwb3IgZWwKLy8JCSAgIHB1ZXJ0byBCLiBBZGFwdGFjaW9uIGRlbCBjb2RpZ28gZW4gYmFzaWMgZGUgbG9yZGxhZmVicmUKLy8KLy8JCQkJUkIwIC0+IDHCuiBMZWQKLy8JCQkJUkIxIC0+IDLCuiBMZWQKLy8JCQkJUkIyIC0+IDPCuiBMZWQKLy8JCQkJUkIzIC0+IDTCuiBMZWQKLy8JCQkJUkI0IC0+IDXCuiBMZWQKLy8JCQkJUkI1IC0+IDbCuiBMZWQKLy8JCQkJUkI2IC0+IDfCuiBMZWQKLy8JCQkJUkI3IC0+IDjCuiBMZWQKLy8JCSAgIEVuIGxhIHZhcmlhYmxlIGNvbnQgc2UgdmEgYWxtYWNlbmFuZG8gbG9zIHZhbG9yZXMgMS0yLTQtOC0xNi0zMi02NC0xMjgKLy8JCSAgIHF1ZSBlbiBiaW5hcmlvIGNvcnJlc3BvbmRlbiBhIGxhIHNlY3VlbmNpYSAwMDAwMDAwMS0wMDAwMDAxMC0wMDAwMDEwMC4uLgovLwkJICAgc29uIGxvcyBsZWQncyBhIGlsdW1pbmFyLCBjb2luY2lkaWVuZG8gY29uIGxhIHNlY3VlbmNpYSBkZSBpbHVtaW5hY2lvbgovLwkJICAgZGVsIGNvY2hlIGZhbnRhc3RpY28odmVyc2lvbiBFY3VhdG9yaWFuYTogYXV0byBmYW50YXN0aWNvKQovLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vLy8vCgojaW5jbHVkZSA8MTZmNjQ4YS5oPgkJCQkvL3BpYyBhIHV0aWxpemFyCiNmdXNlcyBYVCxOT1dEVCxOT1BST1RFQ1QsUFVULE5PTFZQCQkvL29yZGVuZXMgcGFyYSBlbCBwcm9ncmFtYWRvcgojdXNlIGRlbGF5IChjbG9jaz00MDAwMDAwKQkJCS8vRm9zYz00TWh6CiN1c2Ugc3RhbmRhcmRfaW8oQikJCQkJCS8vcHVlcnRvIEIgY29tbyBzYWxpZGEKCi8vL1BST0dSQU1BCnZvaWQgbWFpbih2b2lkKQp7CglpbnQgaSxjb250OwkJCQkJCS8vdmFyaWFibGVzIGRlZmluaWRhcwoJc2V0X3RyaXNfYigweDAwKTsJCQkJLy9wb3J0YiBjb21vIHNhbGlkYQoJZGlzYWJsZV9pbnRlcnJ1cHRzKEdMT0JBTCk7CQkvL3RvZGFzIGxhcyBpbnRlcnJ1cGNpb25lcyBkZXNhY3RpdmFkYXMKCglkb3sJCQkJCQkJCS8vYnVjbGUuLi4KCQljb250PTE7CQkJCQkJLy9pbmljaWFsaXphci4uLgoJCWk9MTsJCQkJCQkvLy4uLnZhcmlhYmxlcwoKCQlkb3sJCQkJCQkJLy9sZWQncyBvbiBkZXJlY2hhCgkJCW91dHB1dF9iKGNvbnQpOwkJCS8vaWx1bWlubyBsZWQgY29ycmVzcG9uZGllbnRlCgkJCWRlbGF5X21zKDEwMCk7CgkJCWNvbnQ9Y29udCoyOwoJCQlpKys7CQkJCQkvL2luY3JlbWVudG8gaQoJCQl9d2hpbGUoaTw4KTsKCgkJaT0xOwkJCQkJCS8vcmVzZXQgdmFsb3IgaQoKCQlkb3sJCQkJCQkJLy9sZWQncyBvbiBpenF1aWVyZGEKCQkJb3V0cHV0X2IoY29udCk7CQkJLy9pbHVtaW5vIGxlZCBjb3JyZXNwb25kaWVudGUKCQkJZGVsYXlfbXMoMTAwKTsKCQkJY29udD1jb250LzI7CgkJCWkrKzsJCQkJCS8vaW5jcmVtZW50byBpCgkJCX13aGlsZShpPDgpOwoKCQl9d2hpbGUoVFJVRSk7CQkJCS8vLi4uaW5maW5pdG8KfQo=
compilation info
prog.s: Assembler messages:
prog.s:32: Error: no such instruction: `void main(void)'
prog.s:33: Error: junk at end of line, first unrecognized character is `{'
prog.s:34: Error: too many memory references for `int'
prog.s:35: Error: invalid character '(' in mnemonic
prog.s:36: Error: invalid character '(' in mnemonic
prog.s:38: Error: invalid character '{' in mnemonic
prog.s:42: Error: invalid character '{' in mnemonic
prog.s:43: Error: invalid character '(' in mnemonic
prog.s:44: Error: invalid character '(' in mnemonic
prog.s:46: Error: invalid character '+' in mnemonic
prog.s:47: Error: junk at end of line, first unrecognized character is `}'
prog.s:51: Error: invalid character '{' in mnemonic
prog.s:52: Error: invalid character '(' in mnemonic
prog.s:53: Error: invalid character '(' in mnemonic
prog.s:55: Error: invalid character '+' in mnemonic
prog.s:56: Error: junk at end of line, first unrecognized character is `}'
prog.s:58: Error: junk at end of line, first unrecognized character is `}'
prog.s:59: Error: junk at end of line, first unrecognized character is `}'
stdout