blizu mi je servis tako da sam trkno do kuci eco ge hej ts asm kako sada da ubacim mmm @zoran nemoj zameriti sto je nepregledno stvarno pokusavam ne znam drugcije da ubacim,miozda i sppem sa cod aj probacu
Code:
:
; PICBASIC PRO(TM) Compiler 2.60, (c) 1998, 2009 microEngineering Labs, Inc. All Rights Reserved.
PM_USED EQU 1
INCLUDE "16F877A.INC"
; Define statements.
#define CODE_SIZE 8
#define osc 20
RAM_START EQU 00020h
RAM_END EQU 001EFh
RAM_BANKS EQU 00004h
BANK0_START EQU 00020h
BANK0_END EQU 0007Fh
BANK1_START EQU 000A0h
BANK1_END EQU 000EFh
BANK2_START EQU 00110h
BANK2_END EQU 0016Fh
BANK3_START EQU 00190h
BANK3_END EQU 001EFh
EEPROM_START EQU 02100h
EEPROM_END EQU 021FFh
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
_blok EQU RAM_START + 018h
_pritisak EQU RAM_START + 019h
_PORTL EQU PORTB
_PORTH EQU PORTC
_TRISL EQU TRISB
_TRISH EQU TRISC
#define _pumpa1 _PORTA??0
#define _pumpa2 _PORTA??1
#define _pumpa3 _PORTA??2
#define _pumpa4 _PORTA??3
#define _pobuda _PORTE??2
#define _taster _PORTE??1
#define _pumpa5 _PORTD??7
#define _pumpa6 _PORTD??6
#define _pumpa7 _PORTD??5
#define _pumpa8 _PORTD??4
#define _pumpa9 _PORTD??3
#define _pumpa10 _PORTD??2
#define _pumpa11 _PORTD??1
#define _pumpa12 _PORTD??0
#define _pumpa13 _PORTC??7
#define _pumpa14 _PORTC??6
#define _pumpa15 _PORTC??5
#define _pumpa16 _PORTC??4
#define _pumpa17 _PORTC??3
#define _pumpa18 _PORTC??2
#define _pumpa19 _PORTC??1
#define _pumpa20 _PORTC??0
#define _PORTA??0 PORTA, 000h
#define _PORTA??1 PORTA, 001h
#define _PORTA??2 PORTA, 002h
#define _PORTA??3 PORTA, 003h
#define _PORTE??2 PORTE, 002h
#define _PORTE??1 PORTE, 001h
#define _PORTD??7 PORTD, 007h
#define _PORTD??6 PORTD, 006h
#define _PORTD??5 PORTD, 005h
#define _PORTD??4 PORTD, 004h
#define _PORTD??3 PORTD, 003h
#define _PORTD??2 PORTD, 002h
#define _PORTD??1 PORTD, 001h
#define _PORTD??0 PORTD, 000h
#define _PORTC??7 PORTC, 007h
#define _PORTC??6 PORTC, 006h
#define _PORTC??5 PORTC, 005h
#define _PORTC??4 PORTC, 004h
#define _PORTC??3 PORTC, 003h
#define _PORTC??2 PORTC, 002h
#define _PORTC??1 PORTC, 001h
#define _PORTC??0 PORTC, 000h
INCLUDE "UNTITLED.MAC"
INCLUDE "PBPPIC14.LIB"
INPUT?T _taster
OUTPUT?T _pobuda
OUTPUT?T _pumpa1
OUTPUT?T _pumpa2
OUTPUT?T _pumpa3
OUTPUT?T _pumpa4
OUTPUT?T _pumpa5
OUTPUT?T _pumpa6
OUTPUT?T _pumpa7
OUTPUT?T _pumpa8
OUTPUT?T _pumpa9
OUTPUT?T _pumpa10
OUTPUT?T _pumpa11
OUTPUT?T _pumpa12
OUTPUT?T _pumpa13
OUTPUT?T _pumpa14
OUTPUT?T _pumpa15
OUTPUT?T _pumpa16
OUTPUT?T _pumpa17
OUTPUT?T _pumpa18
OUTPUT?T _pumpa19
OUTPUT?T _pumpa20
MOVE?CB 001h, _blok
MOVE?CB 000h, _pritisak
LOW?T _pumpa1
LOW?T _pumpa2
LOW?T _pumpa3
LOW?T _pumpa4
LOW?T _pumpa5
LOW?T _pumpa6
LOW?T _pumpa7
LOW?T _pumpa8
LOW?T _pumpa10
LOW?T _pumpa11
LOW?T _pumpa12
LOW?T _pumpa13
LOW?T _pumpa14
LOW?T _pumpa15
LOW?T _pumpa16
LOW?T _pumpa17
LOW?T _pumpa18
LOW?T _pumpa19
LOW?T _pumpa20
LABEL?L _program
CMPNE?TCL _taster, 000h, L00001
PAUSE?C 0C8h
ADD?BCB _pritisak, 001h, _pritisak
CMPNE?BCL _pritisak, 003h, L00003
MOVE?CB 001h, _pritisak
LABEL?L L00003
CMPNE?BCL _pritisak, 002h, L00005
ADD?BCB _blok, 001h, _blok
LABEL?L L00005
LABEL?L L00001
CMPNE?BCL _blok, 001h, L00009
HIGH?T _pumpa1
HIGH?T _pumpa2
HIGH?T _pumpa3
HIGH?T _pumpa4
GOTO?L L00008
LABEL?L L00009
CMPNE?BCL _blok, 002h, L00010
LOW?T _pumpa1
LOW?T _pumpa2
LOW?T _pumpa3
LOW?T _pumpa4
HIGH?T _pumpa1
HIGH?T _pumpa2
HIGH?T _pumpa3
HIGH?T _pumpa5
GOTO?L L00008
LABEL?L L00010
CMPNE?BCL _blok, 003h, L00011
LOW?T _pumpa1
LOW?T _pumpa2
LOW?T _pumpa3
LOW?T _pumpa5
HIGH?T _pumpa1
HIGH?T _pumpa2
HIGH?T _pumpa3
HIGH?T _pumpa6
GOTO?L L00008
LABEL?L L00011
CMPNE?BCL _blok, 004h, L00012
LOW?T _pumpa1
LOW?T _pumpa2
LOW?T _pumpa3
LOW?T _pumpa6
HIGH?T _pumpa1
HIGH?T _pumpa2
HIGH?T _pumpa3
HIGH?T _pumpa7
GOTO?L L00008
LABEL?L L00012
CMPNE?BCL _blok, 005h, L00013
LOW?T _pumpa1
LOW?T _pumpa2
LOW?T _pumpa3
LOW?T _pumpa7
GOTO?L L00008
LABEL?L L00013
CMPNE?BCL _blok, 006h, L00014
HIGH?T _pumpa1
LABEL?L L00014
LABEL?L L00008
PAUSE?C 0C8h
GOTO?L _program
END?
END