| 0,0 → 1,204 |
|---|
| CCS PCM C Compiler, Version 4.090, 47914 23-I-10 18:21 |
| |
| Filename: D:\svnKaklik\programy\C\PIC_C\mereni\tester serv\blikac.lst |
| |
| ROM used: 141 words (14%) |
| Largest free fragment is 883 |
| RAM used: 7 (19%) at main() level |
| 8 (22%) worst case |
| Stack: 1 locations |
| |
| * |
| 0000: MOVLW 00 |
| 0001: MOVWF 0A |
| 0002: GOTO 02B |
| 0003: NOP |
| .................... #include "blikac.h" |
| .................... #include <16C84.h> |
| .................... //////// Standard Header file for the PIC16C84 device //////////////// |
| .................... #device PIC16C84 |
| .................... #list |
| .................... |
| .................... #use delay(clock=4000000) |
| 0004: MOVLW 13 |
| 0005: MOVWF 04 |
| 0006: MOVF 00,W |
| 0007: BTFSC 03.2 |
| 0008: GOTO 017 |
| 0009: MOVLW 01 |
| 000A: MOVWF 0D |
| 000B: CLRF 0C |
| 000C: DECFSZ 0C,F |
| 000D: GOTO 00C |
| 000E: DECFSZ 0D,F |
| 000F: GOTO 00B |
| 0010: MOVLW 4A |
| 0011: MOVWF 0C |
| 0012: DECFSZ 0C,F |
| 0013: GOTO 012 |
| 0014: GOTO 015 |
| 0015: DECFSZ 00,F |
| 0016: GOTO 009 |
| 0017: RETLW 00 |
| 0018: MOVLW 12 |
| 0019: SUBWF 14,F |
| 001A: BTFSS 03.0 |
| 001B: GOTO 02A |
| 001C: MOVLW 14 |
| 001D: MOVWF 04 |
| 001E: MOVLW FC |
| 001F: ANDWF 00,F |
| 0020: BCF 03.0 |
| 0021: RRF 00,F |
| 0022: RRF 00,F |
| 0023: MOVF 00,W |
| 0024: BTFSC 03.2 |
| 0025: GOTO 02A |
| 0026: GOTO 028 |
| 0027: NOP |
| 0028: DECFSZ 00,F |
| 0029: GOTO 027 |
| 002A: GOTO 07E (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() |
| .................... { |
| 002B: CLRF 04 |
| 002C: MOVLW 1F |
| 002D: ANDWF 03,F |
| .................... int i; |
| .................... while (true) |
| .................... { |
| .................... while(input(TL1)) |
| .................... { |
| 002E: BSF 03.5 |
| 002F: BSF 06.1 |
| 0030: BCF 03.5 |
| 0031: BTFSS 06.1 |
| 0032: GOTO 06E |
| .................... for(i=0;i<=100;i++) |
| 0033: CLRF 12 |
| 0034: MOVF 12,W |
| 0035: SUBLW 64 |
| 0036: BTFSS 03.0 |
| 0037: GOTO 050 |
| .................... { |
| .................... output_high(servo_y); |
| 0038: BSF 03.5 |
| 0039: BCF 06.0 |
| 003A: BCF 03.5 |
| 003B: BSF 06.0 |
| .................... output_high(servo_x); |
| 003C: BSF 03.5 |
| 003D: BCF 05.2 |
| 003E: BCF 03.5 |
| 003F: BSF 05.2 |
| .................... delay_us(1000); |
| 0040: MOVLW 01 |
| 0041: MOVWF 13 |
| 0042: CALL 004 |
| .................... output_low(servo_y); |
| 0043: BSF 03.5 |
| 0044: BCF 06.0 |
| 0045: BCF 03.5 |
| 0046: BCF 06.0 |
| .................... output_low(servo_x); |
| 0047: BSF 03.5 |
| 0048: BCF 05.2 |
| 0049: BCF 03.5 |
| 004A: BCF 05.2 |
| .................... delay_ms(20); |
| 004B: MOVLW 14 |
| 004C: MOVWF 13 |
| 004D: CALL 004 |
| .................... } |
| 004E: INCF 12,F |
| 004F: GOTO 034 |
| .................... |
| .................... for(i=0;i<=100;i++) |
| 0050: CLRF 12 |
| 0051: MOVF 12,W |
| 0052: SUBLW 64 |
| 0053: BTFSS 03.0 |
| 0054: GOTO 06D |
| .................... { |
| .................... output_high(servo_y); |
| 0055: BSF 03.5 |
| 0056: BCF 06.0 |
| 0057: BCF 03.5 |
| 0058: BSF 06.0 |
| .................... output_high(servo_x); |
| 0059: BSF 03.5 |
| 005A: BCF 05.2 |
| 005B: BCF 03.5 |
| 005C: BSF 05.2 |
| .................... delay_us(2000); |
| 005D: MOVLW 02 |
| 005E: MOVWF 13 |
| 005F: CALL 004 |
| .................... output_low(servo_y); |
| 0060: BSF 03.5 |
| 0061: BCF 06.0 |
| 0062: BCF 03.5 |
| 0063: BCF 06.0 |
| .................... output_low(servo_x); |
| 0064: BSF 03.5 |
| 0065: BCF 05.2 |
| 0066: BCF 03.5 |
| 0067: BCF 05.2 |
| .................... delay_ms(20); |
| 0068: MOVLW 14 |
| 0069: MOVWF 13 |
| 006A: CALL 004 |
| .................... } |
| 006B: INCF 12,F |
| 006C: GOTO 051 |
| .................... } |
| 006D: GOTO 02E |
| .................... output_high(servo_y); |
| 006E: BSF 03.5 |
| 006F: BCF 06.0 |
| 0070: BCF 03.5 |
| 0071: BSF 06.0 |
| .................... output_high(servo_x); |
| 0072: BSF 03.5 |
| 0073: BCF 05.2 |
| 0074: BCF 03.5 |
| 0075: BSF 05.2 |
| .................... delay_us(1500); |
| 0076: MOVLW 01 |
| 0077: MOVWF 13 |
| 0078: CALL 004 |
| 0079: MOVLW 02 |
| 007A: MOVWF 13 |
| 007B: MOVLW F7 |
| 007C: MOVWF 14 |
| 007D: GOTO 018 |
| 007E: DECFSZ 13,F |
| 007F: GOTO 07B |
| .................... output_low(servo_y); |
| 0080: BSF 03.5 |
| 0081: BCF 06.0 |
| 0082: BCF 03.5 |
| 0083: BCF 06.0 |
| .................... output_low(servo_x); |
| 0084: BSF 03.5 |
| 0085: BCF 05.2 |
| 0086: BCF 03.5 |
| 0087: BCF 05.2 |
| .................... delay_ms(20); |
| 0088: MOVLW 14 |
| 0089: MOVWF 13 |
| 008A: CALL 004 |
| .................... } |
| 008B: GOTO 02E |
| .................... } |
| 008C: SLEEP |
| |
| Configuration Fuses: |
| Word 1: 3FF9 XT NOWDT PUT NOPROTECT |