MC145003

• MC145004

MOTOROLA

12

1

2

;=======CONSTANTS=================================================

3

0000

T

extram

equ

$A000

;$A000 for 8K RAM

4

0000

T

stack

equ

$00FF

;last RAM byte

5

0000

T

intofs

equ

$1000

;Internal Registers

6

0000

T

data

equ

$08

7

0000

T

clock

equ

$10

8

0000

T

enable

equ

$20

9

0000

T

portd

equ

8

10

11

12

;=======PROGRAM BEGIN=============================================

13

A000

T

org

extram

;Program into RAM

14

A000

N

8E00FF

cold

lds

#stack

;set stack pointer

15

A003

M

8638

ldaa

#$38

;set of MOSI,SS,SCK

16

A005

T

B71009

staa

$1009

;DDRD

17

A008

M

C611

ldab

#17

18

A00A

N

CEA05E

ldx

#send

19

A00D

T

BDA010

jsr

spi

20

A010

T

end

cold

21

22

A010

U

18CE1000

spi

ldy

#intofs

23

A014

J

181D0820

bclr

portd,y #enable

;EN = 0

24

A018

T

BDA031

jsr

start

;start condition

25

A01B

X

A600

again

ldaa

0 , x

;SPI Mode Use

26

A01D

T

B7102A

staa

$102A

;SPDR

27

A020

L

181F2980FB

brclr

$29,y,#$80,*

28

A025

H

08

inx

;next DATA

29

A026

H

5A

decb

30

A027

R

26F2

bne

again

31

A029

J

181C0820

bset

portd,y #enable

32

A02D

T

BDA04C

jsr

stop

;stop condition

33

A030

H

39

rts

34

35

A031

M

8633

start

ldaa

#$33

;Normal Mode

36

A033

T

B71028

staa

$1028

;SPCR

37

A036

J

181C0808

bset

portd,y #data

;DATA = 1

38

A03A

J

181C0810

bset

portd,y #clock

;CLK = 1

39

A03E

J

181D0808

bclr

portd,y #data

;DATA = 0

40

A042

J

181D0810

bclr

portd,y #clock

;CLK = 0

41

A046

M

8673

ldaa

#$73

;SPI Mode

42

A048

T

B71028

staa

$1028

;SPCR

43

A04B

H

39

rts

44

A04C

M

8633

stop

ldaa

#$33

;Normal Mode

45

A04E

T

B71028

staa

$1028

;SPCR

46

A051

J

181D0808

bclr

portd,y #data

;DATA = 0

47

A055

J

181C0810

bset

portd,y #clock

;CLK = 1

48

A059

J

181C0808

bset

portd,y #data

;DATA = 0

49

A05D

H

39

rts

50

51

A05E

T

7E

send

fcb

$007E

;LCD Driver Address

52

A05F

T

F0

fcb

$00f0

;Data to sent

53

A060

T

F0

fcb

$00f0

54

A061

T

F0

fcb

$00f0

55

A062

T

F0

fcb

$00f0

56

A063

T

F0

fcb

$00f0

57

A064

T

F0

fcb

$00f0

58

A065

T

F0

fcb

$00f0

59

A066

T

F0

fcb

$00f0

60

A067

T

F0

fcb

$00f0

61

A068

T

F0

fcb

$00f0

62

A069

T

F0

fcb

$00f0

63

A06A

T

F0

fcb

$00f0

64

A06B

T

F0

fcb

$00f0

65

A06C

T

F0

fcb

$00f0

66

A06D

T

F0

fcb

$00f0

67

A06E

T

F0

fcb

$00f0

68

A06F

H

39

rts

69

70

;=======PROGRAM END===============================================

Example 2. Manual Method