; PICBASIC PRO(TM) Compiler 2.50c, (c) 1998, 2008 microEngineering Labs, Inc. All Rights Reserved. PM_USED EQU 1 INCLUDE "12F629.INC" ; Define statements. #define DEBUG_REG GPIO #define DEBUG_BIT 5 #define DEBUG_BAUD 9600 #define DEBUG_MODE 0 #define DEBUG_PACING 1000 #define OSCCAL_1K 1 RAM_START EQU 00020h RAM_END EQU 0005Fh RAM_BANKS EQU 00001h BANK0_START EQU 00020h BANK0_END EQU 0005Fh EEPROM_START EQU 02100h EEPROM_END EQU 0217Fh R0 EQU RAM_START + 000h R1 EQU RAM_START + 002h R2 EQU RAM_START + 004h R3 EQU RAM_START + 006h R4 EQU RAM_START + 008h R5 EQU RAM_START + 00Ah R6 EQU RAM_START + 00Ch R7 EQU RAM_START + 00Eh R8 EQU RAM_START + 010h FLAGS EQU RAM_START + 012h GOP EQU RAM_START + 013h RM1 EQU RAM_START + 014h RM2 EQU RAM_START + 015h RR1 EQU RAM_START + 016h RR2 EQU RAM_START + 017h _tagID EQU RAM_START + 018h T1 EQU RAM_START + 025h T2 EQU RAM_START + 027h _char EQU RAM_START + 029h _chips EQU RAM_START + 02Ah _idx EQU RAM_START + 02Bh _rec_chips EQU RAM_START + 02Ch _PORTL EQU GPIO _PORTH EQU GPIO _TRISL EQU TRISIO _TRISH EQU TRISIO #define _red _GPIO??1 #define _green _GPIO??0 #define _relay _GPIO??2 #define _GPIO??1 GPIO, 001h #define _GPIO??0 GPIO, 000h #define _GPIO??2 GPIO, 002h #define _TRISIO??3 TRISIO, 003h #define _TRISIO??4 TRISIO, 004h #define _TRISIO??0 TRISIO, 000h #define _TRISIO??1 TRISIO, 001h #define _TRISIO??2 TRISIO, 002h #define _TRISIO??5 TRISIO, 005h #define _GPIO??5 GPIO, 005h #define _GPIO??4 GPIO, 004h #define _GPIO??3 GPIO, 003h INCLUDE "IMMOBL~2.MAC" INCLUDE "PBPPIC14.LIB" ASM? device mclr_off, pwrt_on, bod_off, wdt_off ;Config switches, different from PBP default ENDASM? MOVE?CB 007h, CMCON MOVE?CT 001h, _TRISIO??3 MOVE?CT 001h, _TRISIO??4 MOVE?CT 000h, _TRISIO??0 MOVE?CT 000h, _TRISIO??1 MOVE?CT 000h, _TRISIO??2 MOVE?CT 000h, _TRISIO??5 MOVE?CT 000h, _GPIO??5 MOVE?CT 000h, _GPIO??2 MOVE?CT 001h, _GPIO??0 MOVE?CT 001h, _GPIO??1 MOVE?CB 000h, _chips MOVE?CB 000h, _rec_chips LOW?T _green PAUSE?C 001F4h HIGH?T _green DEBUG?C 00Dh DEBUG?C 00Ah DEBUG?C 049h DEBUG?C 06Dh DEBUG?C 06Dh DEBUG?C 06Fh DEBUG?C 062h DEBUG?C 069h DEBUG?C 06Ch DEBUG?C 069h DEBUG?C 073h DEBUG?C 065h DEBUG?C 072h DEBUG?C 020h DEBUG?C 076h DEBUG?C 031h DEBUG?C 02Eh DEBUG?C 030h DEBUG?C 00Dh DEBUG?C 00Ah DEBUG?C 041h DEBUG?C 06Eh DEBUG?C 064h DEBUG?C 072h DEBUG?C 065h DEBUG?C 077h DEBUG?C 020h DEBUG?C 048h DEBUG?C 075h DEBUG?C 078h DEBUG?C 074h DEBUG?C 061h DEBUG?C 062h DEBUG?C 06Ch DEBUG?C 065h DEBUG?C 020h DEBUG?C 068h DEBUG?C 074h DEBUG?C 074h DEBUG?C 070h DEBUG?C 03Ah DEBUG?C 02Fh DEBUG?C 02Fh DEBUG?C 077h DEBUG?C 077h DEBUG?C 077h DEBUG?C 02Eh DEBUG?C 068h DEBUG?C 075h DEBUG?C 078h DEBUG?C 02Eh DEBUG?C 06Eh DEBUG?C 065h DEBUG?C 074h DEBUG?C 02Eh DEBUG?C 061h DEBUG?C 075h DEBUG?C 00Dh DEBUG?C 00Ah LABEL?L _main LOW?T _red DEBUG?C 057h DEBUG?C 061h DEBUG?C 069h DEBUG?C 074h DEBUG?C 069h DEBUG?C 06Eh DEBUG?C 067h DEBUG?C 020h DEBUG?C 066h DEBUG?C 06Fh DEBUG?C 072h DEBUG?C 020h DEBUG?C 074h DEBUG?C 061h DEBUG?C 067h DEBUG?C 02Eh DEBUG?C 02Eh DEBUG?C 02Eh DEBUG?C 00Dh DEBUG?C 00Ah SERIN2DPIN?T _GPIO??4 SERIN2MODE?C 054h SERIN2TIME?C 00FA0h LABEL?L L00001 SERIN2WAIT?CLL 002h, L00001, _main SERIN2COUNT?C 00Ah SERIN2STR?BL _tagID, _main DEBUG?C 047h DEBUG?C 06Fh DEBUG?C 074h DEBUG?C 020h DEBUG?C 020h DEBUG?C 020h DEBUG?C 020h DEBUG?C 03Ah DEBUG?C 020h MOVE?CB 001h, _idx MOVE?CB 001h, _idx LABEL?L L00002 CMPGT?BCL _idx, 00Ah, L00003 DEBUGCOUNT?C 000h AOUT?BBB _tagID, _idx, T1 DEBUGNUM?B T1 DEBUGHEX? NEXT?BCL _idx, 001h, L00002 LABEL?L L00003 DEBUG?C 00Dh DEBUG?C 00Ah CMPNE?TCL _GPIO??3, 000h, L00004 HIGH?T _red GOTO?L _writechip GOTO?L L00005 LABEL?L L00004 LOW?T _green MOVE?CB 000h, _chips LABEL?L _nextchip LABEL?L L00006 CMPGE?BCL _chips, 00Ah, L00007 DEBUG?C 052h DEBUG?C 06Fh DEBUG?C 06Dh DEBUG?C 020h DEBUG?C 068h DEBUG?C 061h DEBUG?C 073h DEBUG?C 03Ah DEBUG?C 020h MOVE?CB 001h, _idx MOVE?CB 001h, _idx LABEL?L L00008 CMPGT?BCL _idx, 00Ah, L00009 MUL?BCW _chips, 00Ah, T1 ADD?BWW _idx, T1, T1 READ?WB T1, _char DEBUGCOUNT?C 000h DEBUGNUM?B _char DEBUGHEX? AOUT?BBB _tagID, _idx, T1 CMPEQ?BBL _char, T1, L00010 DEBUG?C 020h DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 020h DEBUG?C 04Eh DEBUG?C 06Fh DEBUG?C 06Dh DEBUG?C 061h DEBUG?C 074h DEBUG?C 063h DEBUG?C 068h DEBUG?C 020h DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 00Dh DEBUG?C 00Ah ADD?BCB _chips, 001h, _chips GOTO?L _nextchip LABEL?L L00010 NEXT?BCL _idx, 001h, L00008 LABEL?L L00009 DEBUG?C 020h DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 020h DEBUG?C 04Dh DEBUG?C 061h DEBUG?C 074h DEBUG?C 063h DEBUG?C 068h DEBUG?C 065h DEBUG?C 064h DEBUG?C 020h DEBUG?C 063h DEBUG?C 068h DEBUG?C 069h DEBUG?C 070h DEBUG?C 020h DEBUGCOUNT?C 000h ADD?BCW _chips, 001h, T1 DEBUGNUM?W T1 DEBUGDEC? DEBUG?C 020h DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 02Ah DEBUG?C 00Dh DEBUG?C 00Ah HIGH?T _red LOW?T _green HIGH?T _relay PAUSE?C 003E8h HIGH?T _green GOTO?L _done GOTO?L L00006 LABEL?L L00007 HIGH?T _green GOTO?L _main LABEL?L L00005 LABEL?L _writechip CMPGE?BCL _rec_chips, 00Ah, L00012 MOVE?CB 001h, _idx DEBUG?C 057h DEBUG?C 072h DEBUG?C 069h DEBUG?C 074h DEBUG?C 069h DEBUG?C 06Eh DEBUG?C 067h DEBUG?C 03Ah DEBUG?C 020h MOVE?CB 001h, _idx LABEL?L L00014 CMPGT?BCL _idx, 00Ah, L00015 MUL?BCW _rec_chips, 00Ah, T1 ADD?BWW _idx, T1, T1 AOUT?BBB _tagID, _idx, T2 WRITE?WB T1, T2 DEBUGCOUNT?C 000h AOUT?BBB _tagID, _idx, T1 DEBUGNUM?B T1 DEBUGHEX? NEXT?BCL _idx, 001h, L00014 LABEL?L L00015 DEBUG?C 00Dh DEBUG?C 00Ah LOW?T _green LOW?T _red PAUSE?C 001F4h HIGH?T _green HIGH?T _red ADD?BCB _rec_chips, 001h, _rec_chips GOTO?L _main GOTO?L L00013 LABEL?L L00012 DEBUG?C 04Dh DEBUG?C 061h DEBUG?C 078h DEBUG?C 069h DEBUG?C 06Dh DEBUG?C 075h DEBUG?C 06Dh DEBUG?C 020h DEBUG?C 063h DEBUG?C 068h DEBUG?C 069h DEBUG?C 070h DEBUG?C 073h DEBUG?C 020h DEBUG?C 072h DEBUG?C 065h DEBUG?C 063h DEBUG?C 06Fh DEBUG?C 072h DEBUG?C 064h DEBUG?C 065h DEBUG?C 064h DEBUG?C 00Dh DEBUG?C 00Ah LOW?T _red PAUSE?C 007D0h HIGH?T _red PAUSE?C 007D0h GOTO?L _main LABEL?L L00013 LABEL?L _done END? END