求助 12864 显示问题

鲁西蝈蝈

手上有几片12864，最近拿出来想做个小制作，但是弄了几天都不正常显示，头都大了，恳请用过的朋友帮忙看一下我的程序，现在的问题是怎么修改程序，都是全屏都是黑点，也就是全亮，关显示也不管事，检测是否“忙”正常，就是无法写入指令，谢谢了，下面是我的简单测试程序

' y& D/ ~/ Q: d/ J
RW  EQU  P3.0 ;3  
RS  EQU  P3.1 ;4
E  EQU  P3.2 ;5
& {! |+ P1 b, X! k5 U. M* q, MRST  EQU  P3.3  ;6
CS1  EQU  P3.4 ;15
CS2  EQU  P3.5 ;16
LED1 EQU  P3.7
; N( B8 }# W; G( l( j) r- J- [) e1 LCOM  EQU  20H
7 z$ W% d4 e  B; u- `% g4 ^DAT  EQU  21H
: c6 S( U: G1 {' i9 o' L3 V3 h% [; m
: g- C2 r: M( y* Y4 d/ k0 pORG  0000H
AJMP START
9 H2 C8 V) M8 wORG  0030H
START:
MOV  SP,#60H
MOV  A,#0FFH
MOV  P1,A
MOV  P3,A
$ A7 A0 d: S& V8 C; R: A' n: }7 cCLR  CS1  ;片选高电平有效
* ]' d( a2 R2 t* z4 z% TCLR  CS2  ;片选高电平有效
CLR  RST
LCALL DELAY100MS
SETB RST
LCALL INT_LCD   ;LCD初始化
MAIN:
4 h" G9 j. }" R! k! T6 ], ^$ `" \( \JMP  $
, |" E  J0 t; G/ XW_INSL:
SETB CS1
CLR  CS2
LCALL W_INS
3 b" h  U) K  @2 h3 A$ `CLR  CS1
CLR  CS2
RET
) A/ T: \+ R, W0 ^W_DATAL:
SETB CS1
CLR  CS2
4 Y* f; ?, O8 j% w) X5 h0 M4 \- dLCALL W_DATA
/ u& i0 q$ G9 w/ T" X% o' N% lCLR  CS1
CLR  CS2
* p* e# z7 x2 b2 T4 \* TW_INSR:
SETB CS2
, d, g7 T5 P* K! L, D6 f9 dCLR  CS1
LCALL W_INS
$ J# h+ _& e' gCLR  CS1
CLR  CS2
( h! n9 f. f0 }% dRET
# U& e' ^6 y- _# I2 CW_DATAR:
2 d' O" t' l" |- T7 ZSETB CS2
CLR  CS1
LCALL W_DATA
CLR  CS1
CLR  CS2
7 y; v) `5 h$ |% ^W_INS:
# q, s/ \+ ^; j# B: W- ^3 UCLR  E
SETB RW
CLR  RS
MOV  P1,#0FFH
2 H( r& I/ \& {, w7 O# j' Z4 qSETB E
MOV  A,P1
, v& U# ^; j- sNOP
JB  ACC.7,W_INS
CLR  E
CLR  RW
0 k( P: y5 Y- _. [+ U' z* [MOV  P1,COM
9 j& D3 V" a" qSETB E
nop
CLR  E
RET
/ f5 e) ?; n  x- ?4 }5 tW_DATA:
, d: W( w8 ]7 ^% m8 WSETB RW
8 N9 x9 H8 ^: A- |6 P. p$ xCLR  RS
MOV  P1,#0FFH
) }( m3 c6 G! a; cSETB E
+ U2 A8 O, ~" S& |$ GMOV  A,P1
CLR  E
* n. ~" b# n8 [1 }3 i- lJB  ACC.7,W_DATA
nop
1 X+ T1 p0 g) n  O2 K2 {) v! UCLR  RW
SETB RS
MOV  P1,DAT
SETB E
nop
& \& y0 X5 u' CCLR  E
RET

" D* p0 D  W7 ^0 ~  ]- e
INT_LCD:
! E4 g% _) r: p! cMOV  COM,#0C0H ;设置第一行
LCALL W_INSL
) O& p5 R: F  @! x6 b+ ?LCALL W_INSR
MOV  COM,#3EH ;关闭显示
* s8 U; n8 S) ?4 ^0 D" n+ eLCALL W_INSL
0 P3 a  t4 n9 O* ~; |; fLCALL W_INSR
5 Q* H+ X. E' t8 I/ nMOV  R1,#0B8H
CLRA:
/ t3 p( f6 L# ?MOV  COM,R1  ;第一页
0 C" `/ H- x8 Z. F( ]( Q& B( E  ^LCALL W_INSL
LCALL W_INSR
MOV  COM,#40H ;第一列
" z9 j9 R3 R. d8 X/ m2 wLCALL W_INSL
; H/ H  m7 Y, oLCALL W_INSR
0 _% L" l) P4 P4 G  \9 X' ?( @MOV R0, #64
CLRB:
MOV  DAT,#0
LCALL W_DATAL
3 X+ B* U& s% J5 l* ^LCALL W_DATAR
. a/ O/ L" L2 J' o5 F6 aDJNZ R0,CLRB
) j+ U6 L# l& i& ^7 g/ a  AINC  R1
CJNE R1,#0C0H,CLRA ;是否写完8页
MOV  COM,#3EH ;打开显示
LCALL W_INSL
LCALL W_INSR
8 ?: H+ _- ]( l9 T9 m( BRET

/ _! X* `, k2 ~1 E$ H2 l$ qDENG:
0 w0 P" D/ g" p% VCLR  LED1
LCALL DELAY100MS
1 R1 c# n" |0 X6 y, k& ?$ WSETB LED1
! j( H- n& \9 ]' J5 dLCALL DELAY100MS
% G+ H" R  X/ G7 N# g/ LRET
" K) K9 _4 U- S/ F: ]
DELAY2MS:   ;误差 0us
, M' c5 G" b$ I$ UMOV  R7,#01H
4 ^3 g$ u: F  J1 I; o( sDL2MS1:
MOV  R6,#8EH
DL2MS0:
+ z* U, s+ I# c2 z1 O6 jMOV  R5,#02H
DJNZ R5,$
( T: b6 D* b: ]  \$ JDJNZ R6,DL2MS0
. H0 h* ?, S3 L* @/ \$ mDJNZ R7,DL2MS1
RET

8 }% [; ?: _+ hDELAY100MS:   ;误差 0us
- J' h6 `: z7 W0 U# c$ \MOV  R6,#0ADH
DL100MS0:
7 u" R/ X- [) uMOV  R5,#8FH
DJNZ R5,$
1 d* N5 a3 h8 E, q% L7 g0 R0 c+ ADJNZ R6,DL100MS0
, w7 S& ~  V3 n# l, O/ a3 yRET
8 h; I/ v5 w2 R& |- ~6 q* R0 tDELAY1S:   ;误差 0us
& r6 w: o+ y8 g9 CMOV  R7,#17H
6 `- }4 n" c9 d8 R1 I) ]  ]+ vDL1M1:
' K- N5 Z: m  T" y) uMOV  R6,#98H
DL1M0:
MOV  R5,#46H
+ e; ^9 a6 o6 s& H" E7 z8 yDJNZ R5,$
) U- q! e  r' b' p! Q7 n% Q, h0 XDJNZ R6,DL1M0
! Y+ y+ ^! S! F; y, lDJNZ R7,DL1M1
RET

END

摇滚一族

查看一下对比度的调节电阻，不一定是程序的事

鲁西蝈蝈

接口没有对比度调节，只有vcc输入，板子上有自带的负压芯片

kazuyuki

确定是ks0108的控制芯片吗？

文句子

下回求助马甲换“促织”？

鲁西蝈蝈

kazuyuki 发表于 2014-6-11 23:14
确定是ks0108的控制芯片吗？

芯片上面些着hd61202，但是就是调试不成功，头大了

kazuyuki

有些屏的引脚排列不是标准的，cs1，cs2的顺序和电平也有可能是反的。这个需要测试后才能知道。我就碰到这种坑爹的屏

小公鸡

帮不上忙，帮顶