Results 1 to 6 of 6
Thread: IT
Hybrid View
-
11th July 2009 09:10 #1Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
IT
2 , , .,
.
- . .
- . . ,
- . - . 22.05.2006÷22.05.2009
11.05.2005 07.06.2005
14.07.2005 01.10.2005 Ĕ
01.06.2007 01.08.2007 .
Longman II, .
- , , .
:
: DOS, WINDOWS, MS-Office, Internet, AutoCAD, Proteus, MatLab, Photoshop, Power BASIC.
: - , , CRT LCD , , , , , , , , (PIC/ATMEL/Motorola), .
, B.
- -.
/ . PIC16F877A, EPROM 27512 BASIC/Java, , LCD, , LED . - . COM . , .

, .
ICQ, e-mail, Skype .
- :
1) Dell Latitude C510/610
http://hardwarebg.com/forum/showthre...EC%E5%F2%FA%F0
" "
"hardwareBG.com > > "
2) LCD LCD
http://hardwarebg.com/forum/showthre...E9#post1966932
" Dell Latitude C610"
hardwareBG.com > >
http://hardwarebg.com/forum/showthre...E9#post1950616
" Dell Latitude C610/C510"
"hardwareBG.com > > "
3)
http://hardwarebg.com/forum/showthre...CD#post1949535
" Dell C610 - " BaiGrozdan
hardwareBG.com > >
4)
http://hardwarebg.com/forum/showthre...ED%E2%E0%ED%E5
" Nokia6230"
"hardwareBG.com > > "
, .
, -.Last edited by PET3; 6th August 2009 at 10:37.
, ,
.
-
6th November 2009 12:48 #2Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
-
4th February 2010 09:42 #3Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
, .
CM601 MC6800 Motorola.
. , LCD 300x200. " " . ,
10MHz, , . 4MHz, . 10MHz . . , . 
, . 2 1 .Code:EEPROM : INDEX_CHANEL RG1 1 INDEX_CHANEL ACP MAX DANGER : BYTE_ZERO , CHANEL(0-:-7) READ_EEPROM PROM ALGORITM1: movf INDEX_CHANEL,0 ; =>w xorlw D0 ; w 0 => w call BYTE_ZERO ; btfss RG1,1 ; 1 1 1 goto CHANEL0 ; 0 movf INDEX_CHANEL,0 xorlw D1 call BYTE_ZERO btfss RG1,1 goto CHANEL1 movf INDEX_CHANEL,0 xorlw D2 call BYTE_ZERO btfss RG1,1 goto CHANEL2 movf INDEX_CHANEL,0 xorlw D3 call BYTE_ZERO btfss RG1,1 goto CHANEL3 movf INDEX_CHANEL,0 xorlw D4 call BYTE_ZERO btfss RG1,1 goto CHANEL4 movf INDEX_CHANEL,0 xorlw D5 call BYTE_ZERO btfss RG1,1 goto CHANEL5 movf INDEX_CHANEL,0 xorlw D6 call BYTE_ZERO btfss RG1,1 goto CHANEL6 movf INDEX_CHANEL,0 xorlw D7 call BYTE_ZERO btfss RG1,1 goto CHANEL7 BYTE_ZERO: bcf RG1,1 ; 1 1 btfsc w,1 ; 1 w 0 bsf RG1,1 ; 1 1 btfsc w,2 bsf RG1,1 btfsc w,3 bsf RG1,1 btfsc w,4 bsf RG1,1 btfsc w,5 bsf RG1,1 btfsc w,6 bsf RG1,1 btfsc w,7 bsf RG1,1 btfsc w,8 bsf RG1,1 return CHANEL0: movlw 0x81 ; movwf ADCON ; movf ADCBUFF ; movwf ACP ; movlw H00 ; PROM w call READ_EEPROM ; PROM movf EEDATA,MAX1 ; movlw H01 call READ_EEPROM movf EEDATA,DANGER1 movlw H02 call READ_EEPROM movf EEDATA,DANGER2 movlw H03 call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL1: movlw 0x89 movwf ADCON movf ADCBUFF movwf ACP movlw H04 call READ_EEPROM movf EEDATA,MAX1 movlw H05 call READ_EEPROM movf EEDATA,DANGER1 movlw H06 call READ_EEPROM movf EEDATA,DANGER2 movlw H07 call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL2: movlw 0x91 movwf ADCON movf ADCBUFF movwf ACP movlw H08 call READ_EEPROM movf EEDATA,MAX1 movlw H09 call READ_EEPROM movf EEDATA,DANGER1 movlw H0A call READ_EEPROM movf EEDATA,DANGER2 movlw H0B call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL3: movlw 0x99 movwf ADCON movf ADCBUFF movwf ACP movlw H0C call READ_EEPROM movf EEDATA,MAX1 movlw H0D call READ_EEPROM movf EEDATA,DANGER1 movlw H0E call READ_EEPROM movf EEDATA,DANGER2 movlw H0F call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL4: movlw 0xA1 movwf ADCON movf ADCBUFF movwf ACP movlw H10 call READ_EEPROM movf EEDATA,MAX1 movlw H11 call READ_EEPROM movf EEDATA,DANGER1 movlw H12 call READ_EEPROM movf EEDATA,DANGER2 movlw H13 call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL5: movlw 0xA9 movwf ADCON movf ADCBUFF movwf ACP movlw H14 call READ_EEPROM movf EEDATA,MAX1 movlw H15 call READ_EEPROM movf EEDATA,DANGER1 movlw H16 call READ_EEPROM movf EEDATA,DANGER2 movlw H17 call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL6: movlw 0xB1 movwf ADCON movf ADCBUFF movwf ACP movlw H18 call READ_EEPROM movf EEDATA,MAX1 movlw H19 call READ_EEPROM movf EEDATA,DANGER1 movlw H1A call READ_EEPROM movf EEDATA,DANGER2 movlw H1B call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 CHANEL7: movlw 0xB9 movwf ADCON movf ADCBUFF movwf ACP movlw H1C call READ_EEPROM movf EEDATA,MAX1 movlw H1D call READ_EEPROM movf EEDATA,DANGER1 movlw H1E call READ_EEPROM movf EEDATA,DANGER2 movlw H1F call READ_EEPROM movf EEDATA,MAX2 goto ALGORITM2 : MAX DANGER ACP RG1 RG2 RG3 C Z STATUS : STATUS_W C Z STATUS w 2BIT_ZERO C Z DAMAGE DANG COMP1 w < MAX1 ( ) COMP2 MAX1 < w < DANGER1 ( ) COMP3 DANGER2 > w > MAX2 COMP4 w > MAX2 ALGORITM2: nop COMP1 : movf MAX1,0 ; MAX1 w subwf ACP,0 ; ACP w = w call STATUS_W ; STATUS xorlw B0000 0010 ; STATUS call 2BIT_ZERO ; btfss RG1,2 ; 1 () goto COMP2 ; movf MAX1,0 subwf ACP,0 call STATUS_W xorlw B0000 0000 call 2BIT_ZERO btfss RG1,2 goto DAMAGE1 movf MAX1,0 subwf ACP,0 call STATUS_W xorlw B0000 0011 call 2BIT_ZERO btfss RG1,2 goto DAMAGE1 COMP2 : movf DANGER1,0 subwf ACP,0 call STATUS_W xorlw B0000 0010 call 2BIT_ZERO btfss RG1,2 goto COMP3 movf DANGER1,0 subwf ACP,0 call STATUS_W xorlw B0000 0000 call 2BIT_ZERO btfss RG1,2 goto DANG1 movf DANGER1,0 subwf ACP,0 call STATUS_W xorlw B0000 0011 call 2BIT_ZERO btfss RG1,2 goto DANG1 COMP3 : movf DANGER2,0 subwf ACP,0 call STATUS_W xorlw B0000 0010 call 2BIT_ZERO btfss RG1,2 goto DANG2 movf DANGER2,0 subwf ACP,0 call STATUS_W xorlw B0000 0011 call 2BIT_ZERO btfss RG1,2 goto DANG2 movf DANGER2,0 subwf ACP,0 call STATUS_W xorlw B0000 0000 call 2BIT_ZERO btfss RG1,2 goto COMP4 COMP4 : movf MAX2,0 subwf ACP,0 call STATUS_W xorlw B0000 0010 call 2BIT_ZERO btfss RG1,2 goto DAMAGE2 movf MAX2,0 subwf ACP,0 call STATUS_W xorlw B0000 0011 call 2BIT_ZERO btfss RG1,2 goto DAMAGE2 movf MAX2,0 subwf ACP,0 call STATUS_W xorlw B0000 0000 call 2BIT_ZERO btfss RG1,2 clrf RG2 goto ALGORITM3 STATUS_W: clrf RG3 ; btfsc STATUS,C ; C = 0 STATUS bsf RG3,1 ; 1 RG3 1 btfsc STATUS,Z ; Z = 0 STATUS bsf RG3,2 ; 2 RG3 1 movf RG3,0 ; w RG3 return 2BIT_ZERO: bcf RG1,2 ; 2 1 btfsc w,1 ; 1 w 0 bsf RG1,2 ; 2 1 btfsc w,2 bsf RG1,2 return DAMAGE1: clrf RG2 ; bsf RG2,1 ;0 bsf RG2,2 ;1 1 2 bcf RG2,3 ;0 bsf RG2,4 ;1 goto ALGORITM3 ; DANG1: clrf RG2 bsf RG2,1 bsf RG2,2 bsf RG2,3 bcf RG2,4 goto ALGORITM3 DANG2: clrf RG2 bsf RG2,1 bcf RG2,2 bsf RG2,3 bcf RG2,4 goto ALGORITM3 DAMAGE2: clrf RG2 bsf RG2,1 bcf RG2,2 bcf RG2,3 bsf RG2,4 goto ALGORITM3 : RG5 RG6 ST#_CH# - : BYTE_ZERO STEP#_CHANEL# - CENTRUM1 ALGORITM3: movf RG5,0 ; xorlw D0 ; 0 call BYTE_ZERO ; btfss RG1,1 ; 1 () goto STEP1_CHANEL0 movf RG5,0 xorlw D1 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL1 movf RG5,0 xorlw D2 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL2 movf RG5,0 xorlw D3 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL3 movf RG5,0 xorlw D4 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL4 movf RG5,0 xorlw D5 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL5 movf RG5,0 xorlw D6 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL6 movf RG5,0 xorlw D7 call BYTE_ZERO btfss RG1,1 goto STEP1_CHANEL7 movf RG5,0 xorlw D8 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL0 movf RG5,0 xorlw D9 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL1 movf RG5,0 xorlw D10 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL2 movf RG5,0 xorlw D11 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL3 movf RG5,0 xorlw D12 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL4 movf RG5,0 xorlw D13 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL5 movf RG5,0 xorlw D14 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL6 movf RG5,0 xorlw D15 call BYTE_ZERO btfss RG1,1 goto STEP2_CHANEL7 movf RG5,0 xorlw D16 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL0 movf RG5,0 xorlw D17 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL1 movf RG5,0 xorlw D18 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL2 movf RG5,0 xorlw D19 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL3 movf RG5,0 xorlw D20 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL4 movf RG5,0 xorlw D21 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL5 movf RG5,0 xorlw D22 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL6 movf RG5,0 xorlw D23 call BYTE_ZERO btfss RG1,1 goto STEP3_CHANEL7 movf RG5,0 xorlw D24 call BYTE_ZERO btfss RG1,1 incf RG5,1 clrf RG5 goto ALGORITM7 ; (LED) STEP[1 or 2]_ CHANEL[#]: movf ACP,0 ; w xorwf RG6,0 ; ; call BYTE_ZERO ; btfss RG1,1 ; 1 () goto CENTRUM1 ; () movf ACP,0 movf ST1_CH0 ; movf RG6 ; ; goto ALGORITM7 ; (LED) STEP3_ CHANEL[#]: movf ACP,0 ; w xorwf RG6,0 ; ; call BYTE_ZERO ; btfss RG1,1 ; 1 () goto CENTRUM1 ; () movf ACP,0 movf ST1_CH0 ; movf RG6 ; ; bsf RG1,3 ; NEXT goto ALGORITM7 ; (LED) : RG1 RG7 RG(8,9,10) RG(11,12,13) RG14 X_RG Y_RG RG15 RG16 X_RG,Y_RG (DEC_ADD) FLAG_RG DEC_ADD RESULT_RG DEC_ADD : BIT# - READ_EEPROM EEPROM DEC_NUM DEC_ADD STATUS_W C Z STATUS w 2BIT_ZERO C Z DEC DEC_ADD CHANGE_XY X_RG Y_RG SUB_ONE 1 SUB_AB SUB_Z , ALGORITM4: btfsc RG7,1 ; 0 call BIT1 ; DEC_NUM btfsc RG7,2 call BIT2 btfsc RG7,3 call BIT2 btfsc RG7,4 call BIT2 btfsc RG7,5 call BIT2 btfsc RG7,6 call BIT2 btfsc RG7,7 call BIT2 btfsc RG7,8 call BIT2 BIT1: movf H20 ; EEPROM w call READ_EEPROM ; EEPROM movf EEDATA,RG8 ; call DEC_NUM ; return BIT2: movf H21 call READ_EEPROM movf EEDATA,RG8 call DEC_NUM return BIT3: movf H22 call READ_EEPROM movf EEDATA,RG8 call DEC_NUM return BIT4: movf H23 call READ_EEPROM movf EEDATA,RG8 call DEC_NUM return BIT5: movf H24 call READ_EEPROM movf EEDATA,RG8 movf H25 call READ_EEPROM movf EEDATA,RG9 call DEC_NUM return BIT6: movf H26 call READ_EEPROM movf EEDATA,RG8 movf H27 call READ_EEPROM movf EEDATA,RG9 call DEC_NUM return BIT7: movf H28 call READ_EEPROM movf EEDATA,RG8 movf H29 call READ_EEPROM movf EEDATA,RG9 call DEC_NUM return BIT8: movf H2A call READ_EEPROM movf EEDATA,RG8 movf H2B call READ_EEPROM movf EEDATA,RG9 movf H2C call READ_EEPROM movf EEDATA,RG10 call DEC_NUM return DEC_NUM: clrf FLAG_RG ; clrf RESULT_RG ; clrf X_RG ; clrf Y_RG ; Y movf RG8,0 ; 1 movwf X_RG ; movf FLAG_RG,0 ; movwf Y_RG ; Y call DEC_ADD ; movf RG11,0 ; 1 movwf X_RG ; movf RESULT_RG,0 ; movwf Y_RG ; Y call DEC_ADD ; movf RESULT_RG,0 ; movwf RG11 ; movf RG9,0 movwf X_RG movf FLAG_RG,0 movwf Y_RG call DEC_ADD movf RG12,0 movwf X_RG movf RESULT_RG,0 movwf Y_RG call DEC_ADD movf RESULT_RG,0 movwf RG12 movf RG10,0 movwf X_RG movf FLAG_RG,0 movwf Y_RG call DEC_ADD movf RG13,0 movwf X_RG movf RESULT_RG,0 movwf Y_RG call DEC_ADD movf RESULT_RG,0 movwf RG13 return DEC_ADD: movf Y_RG,0 ; w Y subwf X_RG,0 ; X Y = X call STATUS_W ; STATUS xorlw B0000 0010 ; STATUS call 2BIT_ZERO ; btfsc RG1,2 ; 0 () goto DEC ; movf Y_RG,0 subwf X_RG,0 call STATUS_W xorlw B0000 0000 call 2BIT_ZERO bffsc RG1,2 goto CHANGE_XY movf Y_RG,0 subwf X_RG,0 call STATUS_W xorlw B0000 0011 call 2BIT_ZERO bffsc RG1,2 goto CHANGE_XY CHANGE_XY: movf X_RG ; X movwf RG14 ; X Y movf Y_RG,0 ; X movwf X_RG ; Y movf RG14,0 ; a movwf Y_RG ; X DEC: movf X_RG ; X_RG w addwf Y_RG,0 ; + Y = Y sublw D9 ; 9 w call STATUS_W ; STATUS xorlw B0000 0000 ; STATUS [9 < w] call 2BIT_ZERO ; btfss RG1,2 ; 1 () goto SUB_ONE ; 1 movf X_RG addwf Y_RG,0 sublw D9 call STATUS_W xorlw B0000 0011 ;[9 = w] call 2BIT_ZERO btfss RG1,2 goto SUB_AB movf X_RG addwf Y_RG,0 sublw D9 call STATUS_W xorlw B0000 0010 ;[9 > w] call 2BIT_ZERO btfss RG1,2 goto SUB_Z SUB_ONE: movf X_RG,0 ; X movwf RG15 ; RG15 decf X_RG,1 ; 1 goto DEC SUB_AB: movf X_RG,0 ; w subwf RG15,0 ; A X = B movwf RG16 ; w decf RG16,1 ; 1 B B bsf FLAG_RG,1 ; movf RG16,0 ; movwf RESULT_RG ; movf RG15,0 ; movwf X_RG ;X_RG return SUB_Z: bcf FLAG_RG,1 ; movf X_RG,0 ; w addwf Y_RG,0 ; + Y = X movwf RESULT_RG ; movf RG15,0 ; movwf X_RG ;X_RG return : RG1 3 100 4 10 RG(17,18,19) - RG20 RG21 : BY_10 10 PART_# - ALGORITM5: clrf RG1,3 ; 3 clrf RG1,4 ; 4 clrf RG20 clrf RG21 movf RG19,0 ; w PART_1: call BY_10 ; 10 btfsc RG1,3 ; 0 goto PART_2 ; bsf RG1,3 ; 3 goto PART_1 ; PART_2 btfsc RG1,4 ; 0 goto PART_3 ; bsf RG1,4 ; 4 movwf RG20 ; 1 movf RG18,0 ; w goto PART_1 ; PART_3: movwf RG20 movf RG21,0 addwf RG20,1 ; RG21 + RG20 = RG20 movf RG20,0 addwf RG17,0 ; RG17 + RG20 = w movwf RG20 ; return : RG22 RG(23,24,25) B-BD , BD-B RG27 RG28 NEXT BD-B : NUM_CHEK LCD ENTER_CHEK, DELETE_CHEK, ESCAPE_CHEK INDEX_# - NUL_NUM# - - DEC_INDEX 1 NUL_BUFFER - NUL_INDEX ALGORITM6: movf RG22,0 xorlw D0 call BYTE_ZERO btfss RG1,1 goto INDEX_NUL NUM_CHEK: movf RG22,0 xorlw D1 call BYTE_ZERO btfss RG1,1 goto INDEX_NUM1 movf RG22,0 xorlw D2 call BYTE_ZERO btfss RG1,1 goto INDEX_NUM2 movf RG22,0 xorlw D3 call BYTE_ZERO btfss RG1,1 goto INDEX_NUM3 ENTER_CHEK: movf RG27,0 xorlw D11 call BYTE_ZERO btfss RG1,1 goto INDEX_ENTER DELETE_CHEK: movf RG27,0 xorlw D12 call BYTE_ZERO btfss RG1,1 goto INDEX_DELETE ESCAPE_CHEK: movf RG27,0 xorlw D13 call BYTE_ZERO btfss RG1,1 goto INDEX_NUM3 return INDEX_NUL: clrf RG22 movlw D6 movwf RG28 incf RG22,1 goto NUM_CHEK INDEX_NUM1: movf RG22,0 movwf RG23 goto ENTER_CHEK INDEX_NUM2: movf RG22,0 movwf RG24 goto ENTER_CHEK INDEX_NUM3: movf RG22,0 movwf RG25 goto ENTER_CHEK INDEX_ENTER: incf RG28,1 incf RG22,1 movf RG22,0 xorlw D4 call BYTE_ZERO btfss RG1,1 goto END_CHEK movlw D64 movwf NEXT goto NUL_INDEX INDEX_DELETE: movf RG22,0 xorlw D1 call BYTE_ZERO btfss RG1,1 goto NUL_NUM1 movf RG22,0 xorlw D2 call BYTE_ZERO btfss RG1,1 goto NUL_NUM2 movf RG22,0 xorlw D3 call BYTE_ZERO btfss RG1,1 goto NUL_NUM3 NUL_NUM1: clrf RG23 goto DEC_INDEX NUL_NUM2: clrf RG24 goto DEC_INDEX NUL_NUM3: clrf RG25 DEC_INDEX decf RG22,1 movf RG22,0 xorlw D0 call BYTE_ZERO btfss RG1,1 goto NUL_BUFFER goto END_CHEK NUL_BUFFER: clrf RG23 clrf RG24 clrf RG25 NUL_INDEX: clrf RG22 END_CHEK: return BY_10: movwf RG20 ; w RG20 rlf RG20,1 ; RG20 1 movwf RG21 ; w RG21 rlf RG21,1 ; RG21 3 rlf RG21,1 rlf RG21,1 movf RG20,0 ; w addwf RG21,0 ; RG20 + RG21 = w clrf RG20 ; clrf RG21 return : INDEX_CHANEL RG1,5 RG2 RG(29,30,31,32,33,34,35,36) RG37 RG38 : DANG8 FREQ DEVICE ND_FREQ DAM_CHANGE DAM_CHAN# - DAN_CHANGE ALGORITM7: movf RG2,0 xorlw B0000 1101 ; 1 call BYTE_ZERO btfss RG1,1 goto DAM_CHANGE movf RG2,0 xorlw B0000 1001 ; 2 call BYTE_ZERO btfss RG1,1 goto DAM_CHANGE DANG8: movf RG2,0 xorlw B0000 1110 ; 1 call BYTE_ZERO btfss RG1,1 goto DAN_CHANGE movf RG2,0 xorlw B0000 1010 ; 2 call BYTE_ZERO btfss RG1,1 goto DAN_CHANGE movlw D1 ;CS movwf RG37 FREQ: btfss RG1,5 goto END_FREQ incf RG38,1 movf RG38,1 xorlw D128 ; call BYTE_ZERO btfss RG1,1 goto DEVICE goto END_FREQ DEVICE: clrf RG38 movlw D3 ;CS movwf RG37 END_FREQ: goto ALGORITM8 DAM_ CHANGE: movf INDEX_CHANEL,0 xorlw D0 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN0 movf INDEX_CHANEL,0 xorlw D1 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN1 movf INDEX_CHANEL,0 xorlw D2 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN2 movf INDEX_CHANEL,0 xorlw D3 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN3 movf INDEX_CHANEL,0 xorlw D4 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN4 movf INDEX_CHANEL,0 xorlw D5 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN5 movf INDEX_CHANEL,0 xorlw D6 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN6 movf INDEX_CHANEL,0 xorlw D7 call BYTE_ZERO btfss RG1,1 goto DAM_CHAN7 DAM_CHAN0: movf RG29,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG29,0 addwf RG2,0 movwf RG29 goto FREQ DAM_CHAN1: movf RG30,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG30,0 addwf RG2,0 movwf RG30 goto FREQ DAM_CHAN2: movf RG31,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG31,0 addwf RG2,0 movwf RG31 goto FREQ DAM_CHAN3: movf RG32,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG32,0 addwf RG2,0 movwf RG32 goto FREQ DAM_CHAN4: movf RG33,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG33,0 addwf RG2,0 movwf RG33 goto FREQ DAM_CHAN5: movf RG34,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG34,0 addwf RG2,0 movwf RG34 goto FREQ DAM_CHAN6: movf RG35,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG35,0 addwf RG2,0 movwf RG35 goto FREQ DAM_CHAN7: movf RG36,0 btfsc RG2,5 goto DANG8 movlw B0001 0000 addwf RG36,0 addwf RG2,0 movwf RG36 goto FREQ DAN_ CHANGE: movlw D2 ;CS movwf RG37 goto FREQ : RG1,1 RG27 RG(29,30,31,32,33,34,35,36) : BYTE_ZERO NUL_FLAG# - CENTRUM1 ALGORITM8: movf RG27,0 xorlw D;12 call BYTE_ZERO btfsc RG1,1 goto CENTRUM1 movf RG29,0 ;RG29 -:- RG36 xorlw D7 call BYTE_ZERO btfss RG1,1 goto NUL_FLAG1 ;NUL_FLAG1 -:- NUL_FLAG64 ;8 0 7 NUL_FLAG1: bcf RG29,4 ; RG29 -:- RG36 goto CENTRUM1 ; () / EEPROM READ_ EEPROM: movwf EEADR ; w bsf STATUS,RP0 ; 1 bsf EECON1,RD ; bcf STATUS,RP0 ; 0 return WRITE_ EEPROM: movwf EEADR ; w movwf EEDATA ; bsf STATUS,RP0 ; 1 bsf EECON1,WREN ; bcf STATUS,RP0 ; 0 return BSF STATUS, PR0 ; 1 BSF PIE1, ADIE ; BCF STATUS, PR0 ; 0 BCF PIR1, ADIF ; BSF INTCON, GIE ;
:
hardwareBG.com > > , -> BASIC - BASIC developers meeting
http://hardwarebg.com/forum/showthre...ighlight=BASIC
hardwareBG.com > > , -> BASIC
http://hardwarebg.com/forum/showthre...ighlight=BASIC
hardwareBG.com > > , -> " Pentium- "
http://hardwarebg.com/forum/showthre...ighlight=BASICLast edited by PET3; 7th February 2010 at 10:50.
, ,
.
-
26th February 2010 13:00 #4Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
.
.
:
1)
http://hardwarebg.com/forum/showthread.php?t=173609
"hardwareBG.com > > > "., ,
.
-
9th July 2010 17:41 #5Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
2)
http://hardwarebg.com/forum/showthre...63#post2416863
"hardwareBG.com > > > "., ,
.
-
27th April 2011 19:26 #6Registered User
Join Date: Aug:2007
Location:
Posts: 1,335
3)
http://www.hardwarebg.com/forum/show...21#post2733821
"hardwareBG.com > > > Wi-Fi + "
. , .
24.05.2011
4) . - ?
http://hardwarebg.com/forum/showthre...8A%D0%B4%D0%B5
" > > > . - ?"
. . .Last edited by PET3; 24th May 2011 at 21:01.
, ,
.




Reply With Quote
):




LOG
6th May 2023, 12:03 in