Clock-PIC

---------

 

Heres a release of an early development version of Clock-PIC, a video

clock.

 

The concept is Eric Smith's, but all the code and algorithms are

original to me. (Because Eric's version works on the PIC16C5x 16MHz

series - and I only had a 4MHz 16C84 hanging around).

 

This clock runs on a 4MHz PIC16C84. It outputs 625 line CCIR PAL (with

some insignificant alterations - the timings are rounded to the

nearest microsecond, and half length picture lines are replaced with

equalising pulses).

 

There are some parts yet to be coded - but as I'm leaving the Internet

very shortly, I thought it might be interesting to release it anyway.

(No clock setting code is present, and the date never advances - only

the time).

 

But the video generation does work - and thats the main thing :-)

 

 

Video D/A circuit to go with it:

 

аааааааа |аа ___ 390R

ааааа RA0|---___--------

аааааааа |аа ___ 1Kаааа |

ааааа RA1|---___--------+

аааааааа |ааааааааааааа +---------- CVBS out

ааааааааааааааааааааааа |

аааааааааааааааааааааа | | 82R

аааааааааааааааааааааа | |

ааааааааааааааааааааааа |

аааааааааааааааааааааа ---

 

This circuit produces (roughly) the following voltages.

 

RA1 RA0 out

-------------------------

+5V +5V 1.0Vа white level

+5Vа 0V 0.3Vа black level

а0Vа 0V 0.0Vа sync level

 

The PIC runs off a 5V supply.

 

The clock uses an XT option 4MHz crystal. Use a crystal, not a ceramic

resonator, as the clock accuracy depends on it.

 

Anyway - I think that covers pretty much everything. Don't make any

money out of this without giving me a fair share. This file may only

be distributed on the Internet. No charge may be made for distributing

it.

 

Snail Mail:аааааа Peter Knight

ааааааааааааааааа 35 Mill Lane

ааааааааааааааааа East Halton

ааааааааааааааааа Grimsby

ааааааааааааааааа Humberside

ааааааааааааааааа United Kingdom

ааааааааааааааааа DN40 3QA

 

UK Phone:аааааааа 01469 540827

World phone:ааааа +44 1469 540827

 

Email:ааааааааааа I wish! :-(а If I get a new account, see you on the PIC list!

; CLOCHPIC - Video routines

;

; 7 segment display routines (for compact character tables)

 

 

ааааааааааа TITLEа "Video"

 

ааааааааааа LISTааа P=16C84

ааааааааааа NOLIST

 

; d

#Defineааааааааааа Wааааааа 0

#Defineааааааааааа Fааааааааа 1

 

; PIC16C84 defines

ааааааааааа cblockа 0x00

ааааааааааааааааааааааа Ind0,RTCC,PCL,Status,FSR,PortA,PortB

ааааааааааа endc

ааааааааааа cblockа 0x08

ааааааааааааааааааааааа EEData,EEAdr,PCLatH,IntCon

ааааааааааа endc

 

; Status bits

ааааааааааа cblockа 0x00

ааааааааааааааааааааааа C,DC,Z,PD,TO,RP0,RP1,IRP

ааааааааааа endc

 

; IntCon bits

ааааааааааа cblockа 0x00

ааааааааааааааааааааааа RBIF,INTF,RTIF,RBIE,INTE,RTIE,EEIE,GIE

ааааааааааа endc

 

; Page 1 registers

Option EQUааа 01H

TrisAаа EQUааа 05H

TrisBааа EQUааа 06H

EECon1аааааааааа EQUааа 08H

EECon2аааааааааа EQUааа 09H

 

RAMbaseааааааа EQUааа 0CH

 

 

; Application specific hardware - PAL level A/D sync, black and white

 

#define Whiteаа PortA,0

#define Syncааа PortA,1

 

; Sync macros

 

; DNOP - Double NOP. Delay of 2 cycles, takes only one instruction

DNOP MACRO

ааааааааааа LOCALаааааааааа Label

Labelаа GOTO Label+1

ааааааааааа ENDM

 

; Delay3W - Delay 3 * W cycles, three instructions

Delay3Wаааааааа MACRO

ааааааааааа LOCALаааааааааа Label

ааааааааааа MOVWFааааааа Delayаааааааааааааа ; 1  \

Labelаа DECFSZаааааааа Delayаааааааааааааа ; n+1 } 3n

ааааааааааа GOTO Labelаааааааааааааа ;2n-2/

ааааааааааа ENDM

 

;Status conditional macros

SKIPCCаааааааа MACRO

ааааааааааа BTFSCааааааааааа Status,C

ааааааааааа ENDM

SKIPCSааааааааа MACRO

ааааааааааа BTFSSааааааааааа Status,C

ааааааааааа ENDM

SKIPZ MACRO

ааааааааааа BTFSSааааааааааа Status,Z

ааааааааааа ENDM

SKIPNZааааааааа MACRO

ааааааааааа BTFSCааааааааааа Status,Z

ааааааааааа ENDM

 

ааааааааааа LIST

 

ааааааааааа CBLOCKаааааа RAMbase

ааааааааааааааааааааааа Delay,Count

ааааааааааааааааааааааа HSeg1,HSeg2

ааааааааааааааааааааааа SegG,SegF,SegE,SegD,SegC,SegB,SegA

ааааааааааааааааааааааа Seg1,Seg2,Seg3,Seg4,Seg5,Seg6,Seg7,Seg8

ааааааааааааааааааааааа HrU,HrT,MiU,MiT,SeU,SeT,SubSec

ааааааааааааааааааааааа DyU,DyT,MoU,MoT,YrU,YrT

ааааааааааа ENDC

 

ааааааааааа ORGааа 0

ааааааааааа GOTO Main

 

ааааааааааа ORGааа 4

ааааааааааа RETURN

 

; Number segment lookup

; This has a delay of 6 including the CALL

 

NumTblаааааааааа ADDWFаааааааа PCL

ааааааааааа RETLWаааааааааа B'1111110'

ааааааааааа RETLWаааааааааа B'0110000'

ааааааааааа RETLWаааааааааа B'1101101'

ааааааааааа RETLWаааааааааа B'1111001'

ааааааааааа RETLWаааааааааа B'0110011'

ааааааааааа RETLWаааааааааа B'1011011'

ааааааааааа RETLWаааааааааа B'1011111'

ааааааааааа RETLWаааааааааа B'1110000'

ааааааааааа RETLWаааааааааа B'1111111'

ааааааааааа RETLWаааааааааа B'1111011'

 

 

Main

ааааааааааа MOVLWааааааа B'11100'

ааааааааааа TRISааа PortA

ааааааааааа MOVLWааааааа B'11111111'

ааааааааааа TRISааа PortB

 

ааааааааааа BCFааа White

ааааааааааа BSFаааа Syncааа ;Output black level

 

ааааааааааа MOVLWааааааа 0

ааааааааааа MOVWFааааааа PCLatH

 

ааааааааааа MOVLWааааааа 0ааааааааа ;Initialise clock to

ааааааааааа MOVWFааааааа SeU

ааааааааааа MOVWFааааааа SeTааааа ; 01/01/95

ааааааааааа MOVWFааааааа MiUаааа ; 00-00 00.00

ааааааааааа MOVWFааааааа MiT

ааааааааааа MOVWFааааааа HrU

ааааааааааа MOVWFааааааа HrT

ааааааааааа MOVWFааааааа DyT

ааааааааааа MOVWFааааааа MoT

ааааааааааа MOVWFааааааа SubSec

ааааааааааа MOVLWааааааа 1

ааааааааааа MOVWFааааааа DyU

ааааааааааа MOVWFааааааа MoU

ааааааааааа MOVLWааааааа 9

ааааааааааа MOVWFааааааа YrT

ааааааааааа MOVLWааааааа 5

ааааааааааа MOVWFааааааа YrU

 

; Frame starts here.

;

; Frame must be exactly 312.5 lines long, each line 64 cycles.

; That ensures frame rate of exactly 50Hz to crystal accuracy.

 

;5 Long Equalisation pulses

 

Frameаааааааааааааааааааааааааааааааааааа ;Main Loop

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;30us Sync

ааааааааааа DNOPааааааааааааааааааааааа ; 3

ааааааааааа MOVLWааааааа 4ааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа Countааааааааааааа ; 5

Loop1а MOVLWааааааа 8ааааааааааааааааааааа ; 6а 6

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;30 30

ааааааааааа BSFаааа Syncааааааааааааааа ;31 31а ;2us Black

ааааааааааа NOPаааааааааааааааааааааааааа ;32 32

ааааааааааа BCFааа Syncааааааааааааааа ; 1а 1ааа ;30us Sync

ааааааааааа NOPаааааааааааааааааааааааааа ; 2а 2

ааааааааааа DECFSZаааааааа Countааааааааааааа ; -а -

ааааааааааа GOTO Loop1аааааааааааа ; 5

ааааааааааа MOVLWааааааа 8ааааааааааааааааааааа ;ааа 5

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;аа 29

ааааааааааа NOPаааааааааааааааааааааааааа ;аа 30

ааааааааааа BSFаааа Syncааааааааааааааа ;аа 31ааа ;2us Black

ааааааааааа NOPаааааааааааааааааааааааааа ;аа 32

 

; Now 5 short equalisation pulses, 4 on interlace

 

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;2us Sync

ааааааааааа NOPаааааааааааааааааааааааааа ; 2

ааааааааааа BSFаааа Syncааааааааааааааа ; 3ааааааа ;30us Black

ааааааааааа MOVLWааааааа 4ааааааааааааааааааааа ; 4

ааааааааааа BTFSCааааааааааа SubSec,0аааааааа ;аааааааааа ; 3 on interlace (SubSec odd)

ааааааааааа MOVLWааааааа 3ааааааааааааааааааааа ; 6

ааааааааааа MOVWFааааааа Countааааааааааааа ; 7

Loop2а MOVLWааааааа 8ааааааааааааааааааааа ; 8а 8а 8а 8

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;32 32 32 32

ааааааааааа BCFааа Syncааааааааааааааа ; 1а 1а 1а 1ааааааа ;2us Sync

ааааааааааа NOPаааааааааааааааааааааааааа ; 2а 2а 2а 2

ааааааааааа BSFаааа Syncааааааааааааааа ; 3а 3а 3а 3ааааааа ;30us Black

ааааааааааа NOPаааааааааааааааааааааааааа ; 4а 4а 4а 4

ааааааааааа DECFSZаааааааа Countааааааааааааа ; -а -а -а -

ааааааааааа GOTO Loop2аааааааааааа ; 7а 7а 7

ааааааааааа NOPаааааааааааааааааааааааааа ;ааааааааа 7

ааааааааааа MOVLWааааааа 8ааааааааааааааааааааа ;ааааааааа 8

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;аааааааа 32

 

; Done that (phew!)

 

; Time now for 304 visible lines

 

; Now some more black lines

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;5us Sync

ааааааааааа MOVLWааааааа D'30'аааааааааааааа ; 2

ааааааааааа CALLа BlkLnsаааааааааааа ;64

 

;Message 'SoFt-ball'

ааааааааааа BCFааа Syncааааааааааааааа ; 1

ааааааааааа CALLа Delay4аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа MOVLWааааааа B'1001110'ааааа ; 7

ааааааааааа MOVWFааааааа Seg1ааааааааааааааа ; 8

ааааааааааа MOVLWааааааа B'0001110'ааааа ; 9

ааааааааааа MOVWFааааааа Seg2ааааааааааааааа ;10

ааааааааааа MOVLWааааааа B'1111110'ааааа ;11

ааааааааааа MOVWFааааааа Seg3ааааааааааааааа ;12

ааааааааааа MOVLWааааааа B'1001110'ааааа ;13

ааааааааааа MOVWFааааааа Seg4ааааааааааааааа ;14

ааааааааааа MOVLWааааааа B'0110111'ааааа ;15

ааааааааааа MOVWFааааааа Seg5ааааааааааааааа ;16

ааааааааааа MOVLWааааааа B'1100111'ааааа ;17

ааааааааааа MOVWFааааааа Seg6ааааааааааааааа ;18

ааааааааааа MOVLWааааааа B'0110000'ааааа ;19

ааааааааааа MOVWFааааааа Seg7ааааааааааааааа ;20

ааааааааааа MOVLWааааааа B'1001110'ааааа ;21

ааааааааааа MOVWFааааааа Seg8ааааааааааааааа ;22

ааааааааааа MOVLWааааааа D'13'аааааааааааааа ;23

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;62

ааааааааааа DNOPааааааааааааааааааааааа ;64

 

;Display segments (this takes 60 lines)

ааааааааааа BCFааа Syncааааааааааааааа ; 1

ааааааааааа CALLа DisSegаааааааааааа ;64

 

; 16 black lines

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;5us Sync

ааааааааааа MOVLWааааааа D'16'аааааааааааааа ; 2

ааааааааааа CALLа BlkLnsаааааааааааа ;64

 

; Translate date to segments

ааааааааааа BCFааа Syncааааааааааааааа ; 1

ааааааааааа CALLа Delay4аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа MOVFааааааааааа DyT,Wааааааааааааааааааааааа ; 7

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;13

ааааааааааа MOVWFааааааа Seg1ааааааааааааааа ;14

ааааааааааа MOVFааааааааааа DyU,Wаааааааааааааааааааааа ;15

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;21

ааааааааааа MOVWFааааааа Seg2ааааааааааааааа ;22

ааааааааааа MOVLWааааааа B'0100101'ааааа ;23

ааааааааааа MOVWFааааааа Seg3ааааааааааааааа ;24

ааааааааааа MOVFааааааааааа MoT,Wаааааааааааааааааааааа ;25

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;31

ааааааааааа MOVWFааааааа Seg4ааааааааааааааа ;32

ааааааааааа MOVFааааааааааа MoU,Wааааааааааааааааааааа ;33

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;39

ааааааааааа MOVWFааааааа Seg5ааааааааааааааа ;40

ааааааааааа MOVLWааааааа B'0100101'ааааа ;41

ааааааааааа MOVWFааааааа Seg6ааааааааааааааа ;42

ааааааааааа MOVFааааааааааа YrT,Wаааааааааааа ;43

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;49

ааааааааааа MOVWFааааааа Seg7ааааааааааааааа ;50

ааааааааааа MOVFааааааааааа YrU,Wааааааааааааааааааааааа ;51

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;57

ааааааааааа MOVWFааааааа Seg8ааааааааааааааа ;58

ааааааааааа CALLа Delay6аааааааааааа ;64

 

;Display segments (this takes 60 lines)

ааааааааааа BCFааа Syncааааааааааааааа ; 1

ааааааааааа CALLа DisSegаааааааааааа ;64

 

; 16 black lines

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;5us Sync

ааааааааааа MOVLWааааааа D'16'аааааааааааааа ; 2

ааааааааааа CALLа BlkLnsаааааааааааа ;64

 

; Translate time to segments

ааааааааааа BCFааа Syncааааааааааааааа ;1

ааааааааааа CALLа Delay4аааааааааааа ;5

ааааааааааа BSFаааа Syncааааааааааааааа ;6

ааааааааааа MOVFааааааааааа HrT,Wаааааааааааа ;7

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;13

ааааааааааа MOVWFааааааа Seg1ааааааааааааааа ;14

ааааааааааа MOVFааааааааааа HrU,Wааааааааааааааааааааааа ;15

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;21

ааааааааааа MOVWFааааааа Seg2ааааааааааааааа ;22

ааааааааааа MOVLWааааааа B'0000001'ааааа ;23

ааааааааааа MOVWFааааааа Seg3ааааааааааааааа ;24

ааааааааааа MOVFааааааааааа MiT,Wааааааааааа ;25

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;31

ааааааааааа MOVWFааааааа Seg4ааааааааааааааа ;32

ааааааааааа MOVFааааааааааа MiU,Wааааааааааааааааааааааа ;33

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;39

ааааааааааа MOVWFааааааа Seg5ааааааааааааааа ;40

ааааааааааа MOVLWааааааа B'0000000'ааааа ;41

ааааааааааа MOVWFааааааа Seg6ааааааааааааааа ;42

ааааааааааа MOVFааааааааааа SeT,Wаааааааааааа ;43

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;49

ааааааааааа MOVWFааааааа Seg7ааааааааааааааа ;50

ааааааааааа MOVFааааааааааа SeU,Wааааааааааааааааааааааа ;51

ааааааааааа CALLа NumTblаааааааааааааааааааааа ;57

ааааааааааа MOVWFааааааа Seg8ааааааааааааааа ;58

ааааааааааа CALLа Delay6аааааааааааа ;64

 

;Display segments (this takes 60 lines)

ааааааааааа BCFааа Sync

ааааааааааа CALLа DisSeg

 

;Increment time

ааааааааааа BCFааа Syncааааааааааааааа ;1

ааааааааааа INCFаа SubSecааааааааааааааааааааааа ;2аааааааа Increment 1/50th sec

ааааааааааа MOVLWааааааа -D'50'ааааааааааааа ;3

ааааааааааа ADDWFаааааааа SubSec,Wаааааа ;4аааааааа Carry now set if second has expired

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;5

ааааааааааа BSFаааа Syncааааааааааааааа ;6

ааааааааааа SKIPCCаааааааааааааааааааа ;аааааааааа Zero SubSec if =50

ааааааааааа MOVWFааааааа SubSecааааааааааааааааааааааа ;8

ааааааааааа SKIPCC

ааааааааааа INCFаа SeUаааааааааааааааа ;10аааааа And increment Second Units

ааааааааааа MOVLWааааааа -D'10'ааааааааааааа ;11

ааааааааааа ADDWFаааааааа SeU,Wааааааааааааааааааааааа ;12аааааа Carry if needed Second Units->Tens

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;13

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;14

ааааааааааа MOVWFааааааа SeUаааааааааааааааа ;15

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;16

ааааааааааа INCFаа SeTаааааааааааааааа ;17

ааааааааааа MOVLWааааааа -D'6'ааааааааааааааа ;18

ааааааааааа ADDWFаааааааа SeT,Wаааааааааааа ;19

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;20

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;21

ааааааааааа MOVWFааааааа SeTаааааааааааааааа ;22

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;23

ааааааааааа INCFаа MiUаааааааааааааааа ;24

ааааааааааа MOVLWааааааа -D'10'ааааааааааааа ;25

ааааааааааа ADDWFаааааааа MiU,Wааааааааааааааааааааааа ;26

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;27

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;28

ааааааааааа MOVWFааааааа MiUаааааааааааааааа ;29

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;30

ааааааааааа INCFаа MiTаааааааааааааааа ;31

ааааааааааа MOVLWааааааа -D'6'ааааааааааааааа ;32

ааааааааааа ADDWFаааааааа MiT,Wааааааааааа ;33

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;34

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;35

ааааааааааа MOVWFааааааа MiTаааааааааааааааа ;36

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;37

ааааааааааа INCFаа HrUаааааааааааааааа ;38

ааааааааааа MOVLWааааааа -D'10'ааааааааааааа ;39

ааааааааааа ADDWFаааааааа HrU,Wааааааааааааааааааааааа ;40

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;41

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;42

ааааааааааа MOVWFааааааа HrUаааааааааааааааа ;43

ааааааааааа SKIPCCаааааааааааааааааааааааааааааааа ;44

ааааааааааа INCFаа HrTаааааааааааааааа ;45

ааааааааааа MOVFааааааааааа HrU,Wааааааааааааааааааааааа ;46 ; Now check for Hours=24, and zero if so

ааааааааааа BTFSCааааааааааа HrT,0

ааааааааааа ADDLWаааааааа D'10'аааааааааааааа ;48

ааааааааааа BTFSCааааааааааа HrT,1

ааааааааааа ADDLWаааааааа D'20'аааааааааааааа ;50

ааааааааааа ADDLWаааааааа -D'24'ааааааааааааа ;51

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ;52

ааааааааааа SKIPCC

ааааааааааа MOVWFааааааа HrUаааааааааааааааа ;54

ааааааааааа SKIPCC

ааааааааааа MOVWFааааааа HrTаааааааааааааааа ;56

ааааааааааа SKIPCC

ааааааааааа INCFаа DyUааааааааааааааа ;58

ааааааааааа CALLа Delay6аааааааааааа ;64

 

 

; Some black lines

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;5us Sync

ааааааааааа MOVLWааааааа D'59'аааааааааааааа ; 2

ааааааааааа CALLа BlkLnsаааааааааааа ;64

 

 

; insert half line here on interlace

 

; Sync

 

 

; Now 5 short equalisation pulses

; prefixed by half video line on interlace

 

; Slight bodge of CCIR/PAL - the half line segment is actually a short eq pulse

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;2us Sync

ааааааааааа NOPаааааааааааааааааааааааааа ; 2

ааааааааааа BSFаааа Syncааааааааааааааа ; 3ааааааааааааааааааа ;30us Black

ааааааааааа MOVLWааааааа 4ааааааааааааааааааааа ; 4

ааааааааааа BTFSSааааааааааа SubSec,0аааааааа ; -

ааааааааааа MOVLWааааааа 5ааааааааааааааааааааа ; 6

ааааааааааа MOVWFааааааа Countааааааааааааа ; 7

Loop6а MOVLWааааааа 8ааааааааааааааааааааа ; 8а 8а 8а 8

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;32 32 32 32

ааааааааааа BCFааа Syncааааааааааааааа ; 1а 1а 1а 1ааааааа ;2us Sync

ааааааааааа NOPаааааааааааааааааааааааааа ; 2а 2а 2а 2

ааааааааааа BSFаааа Syncааааааааааааааа ; 3а 3а 3а 3ааааааа ;30us Black

ааааааааааа NOPаааааааааааааааааааааааааа ; 4а 4а 4а 4

ааааааааааа DECFSZаааааааа Countааааааааааааа ; -а -а -а -

ааааааааааа GOTO Loop6аааааааааааа ; 7а 7а 7

ааааааааааа MOVLWааааааа 7ааааааааааааааааааааа ;ааааааааа 7

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;аааааааа 28

ааааааааааа DNOPааааааааааааааааааааааа ;аааааааа 30

ааааааааааа GOTO Frameааааааааааааа ;аааааааа 32

 

; Delay routines

Delay7 NOP

Delay6 NOP

Delay5 NOP

Delay4 RETURN

 

; Some black lines

BlkLns ADDLWаааааааа -1

ааааааааааа BSFаааа Syncааааааааааааааа ; 1ааааааааааааааааааа ;59us black

ааааааааааа MOVWFааааааа Count

ааааааааааа DNOPааааааааааааааааааааааа ; 1

Loop5а MOVLWааааааа D'17'аааааааааааааа ; 1а 1а 1а 1

ааааааааааа MOVWFааааааа Delayаааааааааааааа ; 1а 1а 1а 1

LoopD9аааааааааа DECFSZаааааааа Delayаааааааааааааа ;18 18 18 18

ааааааааааа GOTO LoopD9ааааааааааааааааааааа ;32 32 32 32

ааааааааааа NOPаааааааааааааааааааааааааа ; 1а 1а 1а 1

ааааааааааа DNOPааааааааааааааааааааааа ; 2а 2а 2а 2

ааааааааааа BCFааа Syncааааааааааааааа ; 1а 1а 1а 1ааааааа ;5us Sync

ааааааааааа CALLа Delay4аааааааааааа ; 4а 4а 4а 4

ааааааааааа BSFаааа Syncааааааааааааааа ; 1а 1а 1а 1ааааааа ;59us Black

ааааааааааа DECFSZаааааааа Countааааааааааааа ; 1а 1а 1а 2

ааааааааааа GOTO Loop5аааааааааааа ; 2а 2а 2

ааааааааааа NOPаааааааааааааааааааааааааа ;ааааааааа 1

ааааааааааа MOVLWааааааа D'17'аааааааааааааа ;ааааааааа 1

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;аааааааа 51

ааааааааааа NOPаааааааааааааааааааааааааа ;ааааааааа 1

ааааааааааа RETURNааааааааааааааааааааааааааааааа ;ааааааааа 2

 

 

;Display segments

;

; Call immediately after BCF Sync, takes 60 line periods, returns control at

; time 64us

;

; On entry segment are in Seg1-8, order B'ABCDEFG'

;

DisSeg MOVLWааааааа SegGаааааааааааааа ; 4ааааааа ;Line 1 black

ааааааааааа MOVWFааааааа FSRаааааааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа MOVLWааааааа 0ааааааааааааааааааааа ; 7

ааааааааааа MOVWFааааааа SegAаааааааааааааа ; 8

ааааааааааа MOVWFааааааа SegBаааааааааааааа ; 9

ааааааааааа MOVWFааааааа SegCаааааааааааааа ;10

ааааааааааа MOVWFааааааа SegDаааааааааааааа ;11

ааааааааааа MOVWFааааааа SegEааааааааааааааа ;12

ааааааааааа MOVWFааааааа SegFааааааааааааааа ;13

ааааааааааа MOVWFааааааа SegGаааааааааааааа ;14

ааааааааааа MOVLWааааааа 6ааааааааааааааааааааа ;15

ааааааааааа Delay3Wаааааааааааааааааааааааааааааааа ;33

ааааааааааа DNOPааааааааааааааааааааааа ;35

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 2 black

ааааааааааа CALLа Delay4аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;35

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 3 black

ааааааааааа CALLа Delay4аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;35

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 4 black

ааааааааааа CALLа Delay4аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;35

ааааааааааа CALLа ConSegаааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 5а Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 6а Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 7а Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 8а Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 9а Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 10 Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 11 Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 12 Segment A

ааааааааааа CALLа RSegAаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 13 Segment BF

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 14 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 15 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 16 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 17 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 18 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 19 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 20 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 21 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 22 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 23 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 24 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 25 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 26 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 27 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 28 Segment B,F

ааааааааааа CALLа RSegFBааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 29 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 30 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 31 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 32 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 33 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 34 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 35 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 36 Segment G

ааааааааааа CALLа RSegGаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 37 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 38 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 39 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 40 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 41 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 42 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 43 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 44 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 45 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 46 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 47 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 48 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 49 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 50 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 51 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 52 Segment C,E

ааааааааааа CALLа RSegECааааааааааааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 53 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 54 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 55 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 56 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 57 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 58 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 59 Segment D

ааааааааааа CALLа RSegDаааааааааааа ;64

ааааааааааа BCFааа Syncааааааааааааааа ; 1ааааааа ;Line 60 Segment D

ааааааааааа GOTO RSegDаааааааааааа ;64

 

; Line drawing routines - call at time 1, returns at time 64

RSegA MOVFааааааааааа SegA,Wааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа HSeg1аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа Delay5аааааааааааа ;11

ааааааааааа GOTO SegLine1аааааааа ;64

 

RSegG MOVFааааааааааа SegG,Wааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа HSeg1аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа Delay5аааааааааааа ;11

ааааааааааа GOTO SegLine1аааааааа ;64

 

RSegD MOVFааааааааааа SegD,Wааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа HSeg1аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа CALLа Delay5аааааааааааа ;11

ааааааааааа GOTO SegLine1аааааааа ;64

 

RSegFBаааааааааа MOVFааааааааааа SegF,Wаааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа HSeg1аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа MOVFааааааааааа SegB,Wааааааааааааааааааааа ; 7

ааааааааааа MOVWFааааааа HSeg2аааааааааааа ; 8

ааааааааааа DNOPааааааааааааааааааааааа ;11

ааааааааааа NOP

ааааааааааа GOTO SegLine2аааааааа ;64

 

RSegECааааааааа MOVFааааааааааа SegE,Wаааааааааааааааааааааа ; 4

ааааааааааа MOVWFааааааа HSeg1аааааааааааа ; 5

ааааааааааа BSFаааа Syncааааааааааааааа ; 6

ааааааааааа MOVFааааааааааа SegC,Wааааааааааааааааааааа ; 7

ааааааааааа MOVWFааааааа HSeg2аааааааааааа ; 8

ааааааааааа DNOPааааааааааааааааааааааа ;11

ааааааааааа NOP

ааааааааааа GOTO SegLine2аааааааа ;64

 

 

;ConSeg - Convert Seg1-8 to SegA-G

;

;On entry FSR=SegA, Seg1-8=B'GFEDCBA' segments

; Call 7 times

;

; Takes 29 cycles including CALL

 

ConSegаааааааааа BTFSCааааааааааа Seg1,0аааааааааааа ;16аааааа ;Map Seg1-8 LSB to Ind0

ааааааааааа BSFаааа Ind0,0ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg2,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,1ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg3,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,2ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg4,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,3ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg5,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,4ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg6,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,5ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg7,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,6ааааааааааааа ;

ааааааааааа BTFSCааааааааааа Seg8,0аааааааааааа ;

ааааааааааа BSFаааа Ind0,7ааааааааааааа ;

ааааааааааа RRFаааа Seg1ааааааааааааааа ;8аааааааа ;Rotate right Seg1-8

ааааааааааа RRFаааа Seg2

ааааааааааа RRFаааа Seg3

ааааааааааа RRFаааа Seg4

ааааааааааа RRFаааа Seg5

ааааааааааа RRFаааа Seg6

ааааааааааа RRFаааа Seg7

ааааааааааа RRFаааа Seg8

ааааааааааа INCFаа FSRаааааааааааааааа ;1аааааааа ;Increment FSR to next segment map

ааааааааааа RETURNааааааааааааааааааааааааааааааа ;2

 

; SegLine1

;

; On entry, HSeg1 contains bitmap of bars in line

; Execute CALL SegLine 10us into line, next instruction starts at 62

SegLine1

ааааааааааа BTFSCааааааааааа HSeg1,0ааааааааааааааааааааа ;13

ааааааааааа BSFаааа Whiteаааааааааааааа ;14

ааааааааааа DNOPааааааааааааааааааааааа ;16

ааааааааааа NOPаааааааааааааааааааааааааа ;17

ааааааааааа BCFааа Whiteаааааааааааааа ;18

ааааааааааа BTFSCааааааааааа HSeg1,1ааааааааааааааааааааа ;19

ааааааааааа BSFаааа Whiteаааааааааааааа ;20

ааааааааааа DNOPааааааааааааааааааааааа ;22

ааааааааааа NOPаааааааааааааааааааааааааа ;23

ааааааааааа BCFааа Whiteаааааааааааааа ;24

ааааааааааа BTFSCааааааааааа HSeg1,2ааааааааааааааааааааа ;25

ааааааааааа BSFаааа Whiteаааааааааааааа ;26

ааааааааааа DNOPааааааааааааааааааааааа ;28

ааааааааааа NOPаааааааааааааааааааааааааа ;29

ааааааааааа BCFааа Whiteаааааааааааааа ;30

ааааааааааа BTFSCааааааааааа HSeg1,3ааааааааааааааааааааа ;31

ааааааааааа BSFаааа Whiteаааааааааааааа ;32

ааааааааааа DNOPааааааааааааааааааааааа ;34

ааааааааааа NOPаааааааааааааааааааааааааа ;35

ааааааааааа BCFааа Whiteаааааааааааааа ;36

ааааааааааа BTFSCааааааааааа HSeg1,4ааааааааааааааааааааа ;37

ааааааааааа BSFаааа Whiteаааааааааааааа ;38

ааааааааааа DNOPааааааааааааааааааааааа ;40

ааааааааааа NOPаааааааааааааааааааааааааа ;41

ааааааааааа BCFааа Whiteаааааааааааааа ;42

ааааааааааа BTFSCааааааааааа HSeg1,5ааааааааааааааааааааа ;43

ааааааааааа BSFаааа Whiteаааааааааааааа ;44

ааааааааааа DNOPааааааааааааааааааааааа ;46

ааааааааааа NOPаааааааааааааааааааааааааа ;47

ааааааааааа BCFааа Whiteаааааааааааааа ;48

ааааааааааа BTFSCааааааааааа HSeg1,6ааааааааааааааааааааа ;49

ааааааааааа BSFаааа Whiteаааааааааааааа ;50

ааааааааааа DNOPааааааааааааааааааааааа ;52

ааааааааааа NOPаааааааааааааааааааааааааа ;53

ааааааааааа BCFааа Whiteаааааааааааааа ;54

ааааааааааа BTFSCааааааааааа HSeg1,7ааааааааааааааааааааа ;55

ааааааааааа BSFаааа Whiteаааааааааааааа ;56

ааааааааааа DNOPааааааааааааааааааааааа ;58

ааааааааааа NOPаааааааааааааааааааааааааа ;59

ааааааааааа BCFааа Whiteаааааааааааааа ;60

ааааааааааа NOP

ааааааааааа RETURNааааааааааааааааааааааааааааааа ;62

 

SegLine2

ааааааааааа BTFSCааааааааааа HSeg1,0ааааааааааааааааааааа ;13

ааааааааааа BSFаааа Whiteаааааааааааааа ;14

ааааааааааа BCFааа Whiteаааааааааааааа ;15

ааааааааааа BTFSCааааааааааа HSeg2,0ааааааааааааааааааааа ;16

ааааааааааа BSFаааа Whiteаааааааааааааа ;17

ааааааааааа BCFааа Whiteаааааааааааааа ;18

ааааааааааа BTFSCааааааааааа HSeg1,1ааааааааааааааааааааа ;19

ааааааааааа BSFаааа Whiteаааааааааааааа ;20

ааааааааааа BCFааа Whiteаааааааааааааа ;21

ааааааааааа BTFSCааааааааааа HSeg2,1ааааааааааааааааааааа ;22

ааааааааааа BSFаааа Whiteаааааааааааааа ;23

ааааааааааа BCFааа Whiteаааааааааааааа ;24

ааааааааааа BTFSCааааааааааа HSeg1,2ааааааааааааааааааааа ;25

ааааааааааа BSFаааа Whiteаааааааааааааа ;26

ааааааааааа BCFааа Whiteаааааааааааааа ;27

ааааааааааа BTFSCааааааааааа HSeg2,2ааааааааааааааааааааа ;28

ааааааааааа BSFаааа Whiteаааааааааааааа ;29

ааааааааааа BCFааа Whiteаааааааааааааа ;30

ааааааааааа BTFSCааааааааааа HSeg1,3ааааааааааааааааааааа ;31

ааааааааааа BSFаааа Whiteаааааааааааааа ;32

ааааааааааа BCFааа Whiteаааааааааааааа ;33

ааааааааааа BTFSCааааааааааа HSeg2,3ааааааааааааааааааааа ;34

ааааааааааа BSFаааа Whiteаааааааааааааа ;35

ааааааааааа BCFааа Whiteаааааааааааааа ;36

ааааааааааа BTFSCааааааааааа HSeg1,4ааааааааааааааааааааа ;37

ааааааааааа BSFаааа Whiteаааааааааааааа ;38

ааааааааааа BCFааа Whiteаааааааааааааа ;39

ааааааааааа BTFSCааааааааааа HSeg2,4ааааааааааааааааааааа ;40

ааааааааааа BSFаааа Whiteаааааааааааааа ;41

ааааааааааа BCFааа Whiteаааааааааааааа ;42

ааааааааааа BTFSCааааааааааа HSeg1,5ааааааааааааааааааааа ;43

ааааааааааа BSFаааа Whiteаааааааааааааа ;44

ааааааааааа BCFааа Whiteаааааааааааааа ;45

ааааааааааа BTFSCааааааааааа HSeg2,5ааааааааааааааааааааа ;46

ааааааааааа BSFаааа Whiteаааааааааааааа ;47

ааааааааааа BCFааа Whiteаааааааааааааа ;48

ааааааааааа BTFSCааааааааааа HSeg1,6ааааааааааааааааааааа ;49

ааааааааааа BSFаааа Whiteаааааааааааааа ;50

ааааааааааа BCFааа Whiteаааааааааааааа ;51

ааааааааааа BTFSCааааааааааа HSeg2,6ааааааааааааааааааааа ;52

ааааааааааа BSFаааа Whiteаааааааааааааа ;53

ааааааааааа BCFааа Whiteаааааааааааааа ;54

ааааааааааа BTFSCааааааааааа HSeg1,7ааааааааааааааааааааа ;55

ааааааааааа BSFаааа Whiteаааааааааааааа ;56

ааааааааааа BCFааа Whiteаааааааааааааа ;57

ааааааааааа BTFSCааааааааааа HSeg2,7ааааааааааааааааааааа ;58

ааааааааааа BSFаааа Whiteаааааааааааааа ;59

ааааааааааа BCFааа Whiteаааааааааааааа ;60

ааааааааааа NOP

ааааааааааа RETURNааааааааааааааааааааааааааааааа ;62

 

 

ааааааааааа ORGааа 2007

ааааааааааа DWаааа B'11001'

 

ааааааааааа END

╧хЁхщЄш: /├ыртэр / CBuild/ JavaScript 1.2-5.6/ Delifi6/ I2C ъюэЄЁюыыхЁ√/ AVR ъюэЄЁюыыхЁ√/ ╧╦╚╤/ AHDL/ VHDL/
LPT EPP/ LPT ECP/ PCI/ COM port/ I2C/ RS-232/
╨хщЄшэу@Mail.ru Rambler's Top100 Rambler's Top100 Rambler's Top100    
Используются технологии uCoz