Rev 6 | Rev 624 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download
CCS PCW C Compiler, Version 3.110, 15448Filename: d:\@kaklik\programy\pic_c\prenos\blikac.LSTROM used: 137 (13%)Largest free fragment is 887RAM used: 4 (11%) at main() level5 (14%) worst caseStack: 1 locations*0000: MOVLW 000001: MOVWF 0A0002: GOTO 0270003: NOP.................... #include "D:\@Kaklik\programy\PIC_C\prenos\blikac.h".................... #include <16C84.h>.................... //////// Standard Header file for the PIC16C84 device ////////////////.................... #device PIC16C84.................... #list........................................ #use delay(clock=4000000)0004: MOVLW 100005: MOVWF 040006: MOVF 00,W0007: BTFSC 03.20008: GOTO 0180009: MOVLW 01000A: MOVWF 0D000B: CLRF 0C000C: DECFSZ 0C,F000D: GOTO 00C000E: DECFSZ 0D,F000F: GOTO 00B0010: MOVLW 4A0011: MOVWF 0C0012: DECFSZ 0C,F0013: GOTO 0120014: NOP0015: NOP0016: DECFSZ 00,F0017: GOTO 0090018: RETLW 000019: MOVLW 11001A: MOVWF 04001B: MOVLW FC001C: ANDWF 00,F001D: RRF 00,F001E: RRF 00,F001F: MOVF 00,W0020: BTFSC 03.20021: GOTO 0260022: GOTO 0240023: NOP0024: DECFSZ 00,F0025: GOTO 0230026: GOTO 07A (RETURN).................... #fuses XT,PUT,NOWDT............................................................ #DEFINE SERVO_X PIN_A2 // piny na ktere jsou pripojena serva.................... #DEFINE SERVO_Y PIN_B0.................... #DEFINE TL1 PIN_B1........................................ void main().................... {.................... int i;0027: CLRF 040028: MOVLW 1F0029: ANDWF 03,F.................... while (true).................... {.................... while(input(TL1))002A: BSF 03.5002B: BSF 06.1002C: BCF 03.5002D: BTFSS 06.1002E: GOTO 06A.................... {.................... for(i=0;i<=100;i++)002F: CLRF 0F0030: MOVF 0F,W0031: SUBLW 640032: BTFSS 03.00033: GOTO 04C.................... {.................... output_high(servo_y);0034: BSF 03.50035: BCF 06.00036: BCF 03.50037: BSF 06.0.................... output_high(servo_x);0038: BSF 03.50039: BCF 05.2003A: BCF 03.5003B: BSF 05.2.................... delay_us(1000);003C: MOVLW 01003D: MOVWF 10003E: CALL 004.................... output_low(servo_y);003F: BSF 03.50040: BCF 06.00041: BCF 03.50042: BCF 06.0.................... output_low(servo_x);0043: BSF 03.50044: BCF 05.20045: BCF 03.50046: BCF 05.2.................... delay_ms(20);0047: MOVLW 140048: MOVWF 100049: CALL 004.................... }004A: INCF 0F,F004B: GOTO 030........................................ for(i=0;i<=100;i++)004C: CLRF 0F004D: MOVF 0F,W004E: SUBLW 64004F: BTFSS 03.00050: GOTO 069.................... {.................... output_high(servo_y);0051: BSF 03.50052: BCF 06.00053: BCF 03.50054: BSF 06.0.................... output_high(servo_x);0055: BSF 03.50056: BCF 05.20057: BCF 03.50058: BSF 05.2.................... delay_us(2000);0059: MOVLW 02005A: MOVWF 10005B: CALL 004.................... output_low(servo_y);005C: BSF 03.5005D: BCF 06.0005E: BCF 03.5005F: BCF 06.0.................... output_low(servo_x);0060: BSF 03.50061: BCF 05.20062: BCF 03.50063: BCF 05.2.................... delay_ms(20);0064: MOVLW 140065: MOVWF 100066: CALL 004.................... }0067: INCF 0F,F0068: GOTO 04D.................... }0069: GOTO 02A.................... output_high(servo_y);006A: BSF 03.5006B: BCF 06.0006C: BCF 03.5006D: BSF 06.0.................... output_high(servo_x);006E: BSF 03.5006F: BCF 05.20070: BCF 03.50071: BSF 05.2.................... delay_us(1500);0072: MOVLW 010073: MOVWF 100074: CALL 0040075: MOVLW 020076: MOVWF 100077: MOVLW EC0078: MOVWF 110079: GOTO 019007A: DECFSZ 10,F007B: GOTO 077.................... output_low(servo_y);007C: BSF 03.5007D: BCF 06.0007E: BCF 03.5007F: BCF 06.0.................... output_low(servo_x);0080: BSF 03.50081: BCF 05.20082: BCF 03.50083: BCF 05.2.................... delay_ms(20);0084: MOVLW 140085: MOVWF 100086: CALL 004.................... }0087: GOTO 02A.................... }....................0088: SLEEP