[SOLVED] please help me to find out the routine of 74LS165 is in cascading

[humair]

i want to used 74ls165 is in cascading but the problem is that when i write the code the data is not move seriallly through forward sooo plzzzzzzzzzzzzzzzzz kindly give me advise and help me tooo find out and solve this problem. how can i send data serially through 74ls165 ic's.

 

[barry]

Re: plzzzzz help me to find out the routine of 74LS165 is in cascading

Have you looked at the data sheet? Do you have the control signals in the proper state? Have you looked at them with an oscilloscope? Have you tried a different (working) chip? Posting a schematic might help.

 

[bigdogguru]

Re: plzzzzz help me to find out the routine of 74LS165 is in cascading

Posting your code using CODE or SYNTAX tags would also be helpful.

BigDog

 

[humair]

Re: plzzzzz help me to find out the routine of 74LS165 is in cascading

---

Code ASM - [expand]
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
===============================================================
;===============================================================
;===============================================================
;=                  BITS ASSIGNMENTS                           =
;===============================================================
RS              REG             P1.0    ; OK
EN              REG             P1.1    ; OK
 
 
 
ROM_SDA         REG             P1.2            ; 5EEPROM serial data input/output
ROM_SCL         REG             P1.3            ; 6EEPROM serial clock output
MT7             REG             P1.4
MT6             REG             P1.5
MT5             REG             P1.6
LCD             REG             P0
 
RTC5            REG             P3.3
RTC6            REG             P3.4
RTC7            REG             P3.5
GSM_SW          REG             P3.6
BUZ             REG             P3.7
 
 
DATA_165        REG             P2.0    ; INPUT
CLK_165         REG             P2.1
STB_165         REG             P2.2
DATA_1651       REG             P2.7
 
ENB             REG             P2.3
DATA_4094       REG             P2.4
CLK_4094        REG             P2.5
STB_4094        REG             P2.6
 
 
 
 
 
DSP_F           REG             01H
INP_F1          REG             02H
 
RLY_F           REG             03H
 
 
 
 
BIN_REG         EQU             30H
SEC             EQU             31H
BCD1            EQU             32H
BCD2            EQU             33H
BCD3            EQU             34H
RLY_FLG1        EQU             35H
RLY_FLG2        EQU             36H
RLY_FLG3        EQU             37H
RLY_FLG4        EQU             38H
RLY_FLG5        EQU             39H
 
IN_FLG1_220             EQU             3AH
IN_FLG2_220             EQU             3BH
IN_FLG3_220             EQU             3CH
IN_FLG4_220             EQU             3DH
IN_FLG5_220             EQU             3EH
DUM             EQU             3FH
DUM_4094        EQU             40H
 
DLYREG1         EQU             41H
DLYREG2         EQU             42H
DLYREG3         EQU             43H
PUSHER1         EQU             44H
PUSHER2         EQU             45H
 
IN_FLG1         EQU             46H
IN_FLG2         EQU             47H
IN_FLG3         EQU             48H
IN_FLG4         EQU             49H
IN_FLG5         EQU             4AH
DREG            EQU             4BH
 
 
 
 
 
 
 
 
 
 
;===============================================================
;===============================================================
;       
;       PS2 KEY BOARD PIN CONFIG
;
;===============================================================
;===============================================================
DATA_KEY                REG             P1.7
CLK_KEY                 REG             P3.2
;===============================================================
;===============================================================
 
 
 
;===============================================================
;=                  RESET VECTOR ADDRESS                       =  
;===============================================================
        ORG             00H
        JMP             INI
;===============================================================
;=                  INT0 VECTOR ADDRESS                        =  
;===============================================================
;       ORG             03H
;       JMP             INT0ISR
;===============================================================
;=                  TIMER0 VECTOR ADDRESS                      =  
;===============================================================
        ORG             0BH
        JMP             T0ISR
;===============================================================
;=                  INT1 VECTOR ADDRESS                        =  
;===============================================================
;       ORG             13H
;       JMP             INT1ISR
;===============================================================
;=                  INITILIZATION SUBROUTINE                   =
;===============================================================
        ORG             30H
        JMP             MAIN
;===============================================================
INI:
        MOV             R0,#7FH         ; CLEAR G.P. RAM
        CLR             A
        MOV             @R0,A
        DJNZ            R0,$-1
        CLR             GSM_SW
        CLR             ENB
 
;===============================================================
;===============================================================
        MOV             LCD,#0
        CALL            LDLY
        CALL            LDLY
        CLR             RS
        SETB            EN
;===============================================================
        MOV             LCD,#01H  ;CLEAR
        CALL            CLOCK
;===============================================================
        MOV             LCD,#02H
        CALL            CLOCK
;===============================================================
        MOV             LCD,#00111100B ;DATA-8,LINE-2,CHR-5X8
        CALL            CLOCK             ;3CH
;===============================================================
        MOV             LCD,#00001100B ;DISP-ON,BLINK-OFF,CUR-OFF
        CALL            CLOCK             ;0CH
;===========================================================
        CALL            LINE1   ;             "BISMILLAH-AR-REHMAN "
        CALL            LINE2   ;             "   NAR - RAHEEM     "
        CALL            LINE3   ;             "  IQRA  UNIVERSITY  "
        CALL            LINE4   ;             " GSM BASED SECURITY "
        MOV             DLYREG3,#05
        CALL            LDLY1
;===========================================================
        CALL            LINE5   ;               "  Iqra  University  "
        CALL            LINE6   ;               " Gsm Based Security "
        CALL            BLK3    ;               " 000,000,000,000,000"
        CALL            BLK4    ;               " 000,000,000,000,000"
 
        MOV             TMOD,#01
        MOV             TH0,#>(-50000)
        MOV             TL0,#<(-50000)
        CLR             TR0
        CLR             TF0
        MOV             TCON,#05
        MOV             IE,#10000010B
        MOV             SEC,#120
        MOV             RLY_FLG1,#01
        MOV             RLY_FLG2,#00
        MOV             RLY_FLG3,#00
        MOV             RLY_FLG4,#00
        MOV             RLY_FLG5,#00
        SETB            TR0
        MOV             R0,#00
        MOV             DUM_4094,#08
        
;===========================================================
;===========================================================
MAIN:
        CALL            M_DISPLAY
        CALL            RLY_SR                  ;OK
        CALL            INP_SR1
        JMP             MAIN
;===========================================================
;===========================================================
 
 
 
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
M_DISPLAY:
        JNB             DSP_F,M_DISPLAY_DONE
        RET
;===========================================================
;===========================================================
M_DISPLAY_DONE:
        SETB            DSP_F
        MOV             BIN_REG,IN_FLG1
        CALL            BIN_BCD
        MOV             LCD,#095H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#096H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#097H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG2
        CALL            BIN_BCD
        MOV             LCD,#099H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#09AH
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#09BH
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG3
        CALL            BIN_BCD
        MOV             LCD,#09DH
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#09EH
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#09FH
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG4
        CALL            BIN_BCD
        MOV             LCD,#0A1H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0A2H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0A3H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG5
        CALL            BIN_BCD
        MOV             LCD,#0A5H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0A6H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0A7H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG1_220
        CALL            BIN_BCD
        MOV             LCD,#0D5H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0D6H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0D7H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG2_220
        CALL            BIN_BCD
        MOV             LCD,#0D9H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0DAH
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0DBH
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG3_220
        CALL            BIN_BCD
        MOV             LCD,#0DDH
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0DEH
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0DFH
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG4_220
        CALL            BIN_BCD
        MOV             LCD,#0E1H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0E2H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0E3H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
;===========================================================
;===========================================================
        MOV             BIN_REG,IN_FLG5_220
        CALL            BIN_BCD
        MOV             LCD,#0E5H
        CALL            CLOCK
        MOV             A,BCD3
        CALL            DSPT
        MOV             LCD,#0E6H
        CALL            CLOCK
        MOV             A,BCD2
        CALL            DSPT
        MOV             LCD,#0E7H
        CALL            CLOCK
        MOV             A,BCD1
        CALL            DSPT
        RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
BIN_BCD:
        MOV             A,BIN_REG
        MOV             B,#10
        DIV             AB
        MOV             BCD1,B
        MOV             B,#10
        DIV             AB
        MOV             BCD2,B
        MOV             BCD3,A
        RET
;===========================================================
;===========================================================
 
 
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
INP_SR1:
        JNB             INP_F1,INP_SR1_DONE
        RET
;===========================================================
;===========================================================
INP_SR1_DONE:
        SETB            INP_F1
        SETB            ENB
        MOV             IN_FLG1,#00
        MOV             IN_FLG2,#00
        MOV             IN_FLG3,#00
        MOV             IN_FLG4,#00
        MOV             IN_FLG5,#00
        MOV             IN_FLG1_220,#00
        MOV             IN_FLG2_220,#00
        MOV             IN_FLG3_220,#00
        MOV             IN_FLG4_220,#00
        MOV             IN_FLG5_220,#00
        MOV             A,#00
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        MOV             DUM,#08
        CLR             STB_165
        CALL            NOPE10
        MOV             R0,#00
;===========================================================
;===========================================================
S_LOP2:
        SETB            CLK_165
        CALL            NOPE10
        MOV             C,DATA_165
        MOV             A,PUSHER1
        RRC             A
        MOV             PUSHER1,A
        MOV             A,PUSHER2
        MOV             C,DATA_1651
        RRC             A
        MOV             PUSHER2,A
        CALL            NOPE10
        CLR             CLK_165
        CALL            NOPE10
        DJNZ            DUM,S_LOP2
        MOV             DUM,#08
        CJNE            R0,#00,INPS1
        MOV             IN_FLG1,PUSHER1
        MOV             IN_FLG1_220,PUSHER2
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        MOV             R0,#01
        SJMP            S_LOP2
;===========================================================
;===========================================================
INPS1:
        CJNE            R0,#01,INPS2
        MOV             IN_FLG2,PUSHER1
        MOV             IN_FLG2_220,PUSHER2
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        MOV             R0,#02
        SJMP            S_LOP2
;===========================================================
;===========================================================
INPS2:
        CJNE            R0,#02,INPS3
        MOV             IN_FLG3,PUSHER1
        MOV             IN_FLG3_220,PUSHER2
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        MOV             R0,#03
        SJMP            S_LOP2
;===========================================================
;===========================================================
INPS3:
        CJNE            R0,#03,INPS4
        MOV             IN_FLG4,PUSHER1
        MOV             IN_FLG4_220,PUSHER2
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        MOV             R0,#04
        SJMP            S_LOP2
;===========================================================
;===========================================================
INPS4:
        MOV             IN_FLG5,PUSHER1
        MOV             IN_FLG5_220,PUSHER2
        MOV             PUSHER1,#00
        MOV             PUSHER2,#00
        CLR             DSP_F
        RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
 
 
;===========================================================
;===========================================================
RLY_SR:
        JNB             RLY_F,RLY_SR_DONE
        RET
RLY_SR_DONE:
        SETB            RLY_F
        CJNE            R0,#00,RLY_sR1
        CLR             STB_4094
        CLR             ENB
        MOV             A,RLY_FLG5
        CALL            SND_4094
        MOV             A,RLY_FLG4
        CALL            SND_4094
        MOV             A,RLY_FLG3
        CALL            SND_4094
        MOV             A,RLY_FLG2
        CALL            SND_4094
        MOV             A,RLY_FLG1
        CALL            SND_4094
        MOV             A,RLY_FLG1
        RL              A
        MOV             RLY_FLG1,A
        DJNZ            DUM_4094,XX_RLY_SR
        MOV             R0,#01
        MOV             DUM_4094,#08
        MOV             RLY_FLG2,#01
        MOV             RLY_FLG1,#00
XX_RLY_SR:
        SETB            STB_4094
        SETB            ENB
        RET
;===========================================================
;===========================================================
RLY_sR1:
        CJNE            R0,#01,RLY_SR2
        CLR             STB_4094
        CLR             ENB
        MOV             A,RLY_FLG5
        CALL            SND_4094
        MOV             A,RLY_FLG4
        CALL            SND_4094
        MOV             A,RLY_FLG3
        CALL            SND_4094
        MOV             A,RLY_FLG2
        CALL            SND_4094
        MOV             A,RLY_FLG1
        CALL            SND_4094
        MOV             A,RLY_FLG2
        RL              A
        MOV             RLY_FLG2,A
        DJNZ            DUM_4094,XX_RLY_SR1
        MOV             R0,#02
        MOV             DUM_4094,#08
        MOV             RLY_FLG3,#01
        MOV             RLY_FLG2,#00
XX_RLY_SR1:
        SETB            STB_4094
        SETB            ENB
        RET
;===========================================================
;===========================================================
RLY_SR2:
        CJNE            R0,#02,RLY_SR3
        CLR             STB_4094
        CLR             ENB
        MOV             A,RLY_FLG5
        CALL            SND_4094
        MOV             A,RLY_FLG4
        CALL            SND_4094
        MOV             A,RLY_FLG3
        CALL            SND_4094
        MOV             A,RLY_FLG2
        CALL            SND_4094
        MOV             A,RLY_FLG1
        CALL            SND_4094
        MOV             A,RLY_FLG3
        RL              A
        MOV             RLY_FLG3,A
        DJNZ            DUM_4094,XX_RLY_SR2
        MOV             R0,#03
        MOV             DUM_4094,#08
        MOV             RLY_FLG4,#01
        MOV             RLY_FLG3,#00
XX_RLY_SR2:
        SETB            STB_4094
        SETB            ENB
        RET
;===========================================================
;===========================================================
RLY_SR3:
        CJNE            R0,#03,RLY_SR4
        CLR             STB_4094
        CLR             ENB
        MOV             A,RLY_FLG5
        CALL            SND_4094
        MOV             A,RLY_FLG4
        CALL            SND_4094
        MOV             A,RLY_FLG3
        CALL            SND_4094
        MOV             A,RLY_FLG2
        CALL            SND_4094
        MOV             A,RLY_FLG1
        CALL            SND_4094
        MOV             A,RLY_FLG4
        RL              A
        MOV             RLY_FLG4,A
        DJNZ            DUM_4094,XX_RLY_SR3
        MOV             R0,#04
        MOV             DUM_4094,#08
        MOV             RLY_FLG5,#01
        MOV             RLY_FLG4,#00
XX_RLY_SR3:
        SETB            STB_4094
        SETB            ENB
        RET
;===========================================================
;===========================================================
RLY_SR4:
        MOV             A,RLY_FLG5
        CALL            SND_4094
        MOV             A,RLY_FLG4
        CALL            SND_4094
        MOV             A,RLY_FLG3
        CALL            SND_4094
        MOV             A,RLY_FLG2
        CALL            SND_4094
        MOV             A,RLY_FLG1
        CALL            SND_4094
        MOV             A,RLY_FLG5
        RL              A
        MOV             RLY_FLG5,A
        DJNZ            DUM_4094,XX_RLY_SR4
        MOV             R0,#00
        MOV             DUM_4094,#08
        MOV             RLY_FLG1,#01
        MOV             RLY_FLG5,#00
XX_RLY_SR4:
        SETB            STB_4094
        SETB            ENB
        RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
SND_4094:
        MOV             DUM,#08
S_LOP1:
        RLC             A
        MOV             DATA_4094,C
        CALL            CLOCK_4094
        DJNZ            DUM,S_LOP1
        RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
CLOCK_4094:
        CALL            NOPE10
        SETB            CLK_4094
        CALL            NOPE10
        CLR             CLK_4094
        CALL            NOPE10
        RET
;===========================================================
;===========================================================
NOPE10:
        NOP
        NOP
        NOP
        NOP
        NOP
        NOP
        RET
;===============================================================
;===============================================================
;===============================================================
T0ISR:
        CLR             TR0
        CLR             TF0
        MOV             TH0,#>(-50000)
        MOV             TL0,#<(-50000)
        DJNZ            SEC,EXT_T0ISR
        MOV             SEC,#120
        CLR             INP_F1
        CLR             RLY_F
;===============================================================
;===============================================================
EXT_T0ISR:
        SETB            TR0
        RETI
;===============================================================
;===============================================================
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
;=====================================================================
;=====================================================================
;=====================================================================
;=====================================================================
;=                    DISPLAY SUBROUTINE                             =
;=====================================================================
;=====================================================================
 
DISPLAY:
;       CALL            CLOCK
        CALL            SDLY
        SETB            RS           ;DATA MODE PRINTING MODE
        MOV             DREG,#0H
RETURN:
        MOV             A,DREG
        MOVC            A,@A+DPTR
        MOV             LCD,A
        CALL            CLOCK
        INC             DREG
        MOV             A,DREG
        CJNE            A,#20,RETURN
        CLR             RS
        RET
;=====================================================================
;=                     DISPLAY SUBROUTINE                            =
;=====================================================================
DSPT:
        ORL             A,#30H
;DSPT:
        MOV             LCD,A
;       CALL            LCD_SENDER
        CALL            SDLY
        SETB            RS
        CALL            SDLY
        CLR             EN
        CALL            SDLY
        SETB            EN
        CALL            SDLY
        CLR             RS
        RET
;================================================================
;=              LCD INITILALIZATION DELAY               =
;================================================================
;INIDLY:
;       DJNZ            DLYREG1,$
;       DJNZ            DLYREG1,$
;       DJNZ            DLYREG2,INIDLY
;       RET
;================================================================
;=                 150 uSec (SMALL DELAY)                       =
;================================================================
SDLY:
        DJNZ            DLYREG1,$
        RET
;================================================================
 
;================================================================
;=                 150 uSec (SMALL DELAY)                       =
;================================================================
LDLY1:
        CALL            LDLY
        DJNZ            DLYREG3,LDLY1
        MOV             DLYREG3,#05
        RET
;================================================================
;=                        DELAY                 =                       
;================================================================
LDLY:
        DJNZ            DLYREG1,$
        DJNZ            DLYREG1,$
        DJNZ            DLYREG2,LDLY
        RET
;================================================================
;=                   DELAY & EN,DISABLE                         =
;================================================================
CLOCK:
        CALL            SDLY
        CLR             EN
        CALL            SDLY
        SETB            EN
        RET
;================================================================
;====================================================================== 
;====================================================================== 
;================================================================
;================================================================
;================================================================
;=            LINES ADDRESSES           =
;================================================================
LINE1:
        MOV     LCD,#80H  ;CURSER SET AT 1st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG1
        CALL    DISPLAY
        RET
;================================================================
LINE2:
        MOV     LCD,#0C0H  ;CURSER SET AT 2st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG2
        CALL    DISPLAY
        RET
;================================================================
LINE3:
        MOV     LCD,#94H  ;CURSER SET AT 1st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG3
        CALL    DISPLAY
        RET
;================================================================
LINE4:
        MOV     LCD,#0D4H  ;CURSER SET AT 2st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG4
        CALL    DISPLAY
        RET
;================================================================
LINE5:
        MOV     LCD,#80H  ;CURSER SET AT 1st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG5
        CALL    DISPLAY
        RET
;================================================================
LINE6:
        MOV     LCD,#0C0H  ;CURSER SET AT 2st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSG6
        CALL    DISPLAY
        RET
BLK3:
        MOV     LCD,#094H  ;CURSER SET AT 2st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSGB
        CALL    DISPLAY
        RET
BLK4:
        MOV     LCD,#0D4H  ;CURSER SET AT 2st LINE 1st CHARACTER
        CALL    CLOCK
        MOV     DPTR,#MSGB
        CALL    DISPLAY
        RET
 
;================================================================
;================================================================
;================================================================
;================================================================
;=                              =
;=                              =
;=                        LOOK UP TABLE                 =
;=                              =
;=                              =
;================================================================
MSG1:           DB              "BISMILLAH-AR-REHMAN "          ; OK
MSG2:           DB              "   NAR - RAHEEM     "          ; OK
MSG3:           DB              "  IQRA  UNIVERSITY  "
MSG4:           DB              " GSM BASED SECURITY "
MSG5:           DB              "  Iqra  University  "
MSG6:           DB              " Gsm Based Security "
 
MSGB:           DB              " 000,000,000,000,000"
 
 
 
;================================================================
 
                END

---

- - - Updated - - -

yes i do all the things and seee carefully datasheet as well but problem still going on

 

[humair]

Re: plzzzzz help me to find out the routine of 74LS165 is in cascading

===============================================================
;===============================================================
;===============================================================
;=                  BITS ASSIGNMENTS                           =
;===============================================================
RS		REG		P1.0	; OK
EN		REG		P1.1	; OK



ROM_SDA		REG		P1.2		; 5EEPROM serial data input/output
ROM_SCL		REG		P1.3		; 6EEPROM serial clock output
MT7		REG		P1.4
MT6		REG		P1.5
MT5		REG		P1.6
LCD		REG		P0

RTC5		REG		P3.3
RTC6		REG		P3.4
RTC7		REG		P3.5
GSM_SW		REG		P3.6
BUZ		REG		P3.7


DATA_165	REG		P2.0	; INPUT
CLK_165		REG		P2.1
STB_165		REG		P2.2
DATA_1651	REG		P2.7

ENB		REG		P2.3
DATA_4094	REG		P2.4
CLK_4094	REG		P2.5
STB_4094	REG		P2.6





DSP_F		REG		01H
INP_F1		REG		02H

RLY_F		REG		03H




BIN_REG		EQU		30H
SEC		EQU		31H
BCD1		EQU		32H
BCD2		EQU		33H
BCD3		EQU		34H
RLY_FLG1	EQU		35H
RLY_FLG2	EQU		36H
RLY_FLG3	EQU		37H
RLY_FLG4	EQU		38H
RLY_FLG5	EQU		39H

IN_FLG1_220		EQU		3AH
IN_FLG2_220		EQU		3BH
IN_FLG3_220		EQU		3CH
IN_FLG4_220		EQU		3DH
IN_FLG5_220		EQU		3EH
DUM		EQU		3FH
DUM_4094	EQU		40H

DLYREG1		EQU		41H
DLYREG2		EQU		42H
DLYREG3		EQU		43H
PUSHER1		EQU		44H
PUSHER2		EQU		45H

IN_FLG1		EQU		46H
IN_FLG2		EQU		47H
IN_FLG3		EQU		48H
IN_FLG4		EQU		49H
IN_FLG5		EQU		4AH
DREG		EQU		4BH










;===============================================================
;===============================================================
;	
;	PS2 KEY BOARD PIN CONFIG
;
;===============================================================
;===============================================================
DATA_KEY		REG		P1.7
CLK_KEY			REG		P3.2
;===============================================================
;===============================================================



;===============================================================
;=                  RESET VECTOR ADDRESS                       =  
;===============================================================
	ORG		00H
	JMP		INI
;===============================================================
;=                  INT0 VECTOR ADDRESS                        =  
;===============================================================
;	ORG		03H
;	JMP		INT0ISR
;===============================================================
;=                  TIMER0 VECTOR ADDRESS                      =  
;===============================================================
	ORG		0BH
	JMP		T0ISR
;===============================================================
;=                  INT1 VECTOR ADDRESS                        =  
;===============================================================
;	ORG		13H
;	JMP		INT1ISR
;===============================================================
;=                  INITILIZATION SUBROUTINE                   =
;===============================================================
	ORG		30H
	JMP		MAIN
;===============================================================
INI:
	MOV		R0,#7FH         ; CLEAR G.P. RAM
	CLR		A
	MOV		@R0,A
	DJNZ		R0,$-1
	CLR		GSM_SW
	CLR		ENB

;===============================================================
;===============================================================
	MOV		LCD,#0
	CALL		LDLY
	CALL		LDLY
	CLR		RS
	SETB		EN
;===============================================================
	MOV		LCD,#01H  ;CLEAR
	CALL		CLOCK
;===============================================================
	MOV		LCD,#02H
	CALL		CLOCK
;===============================================================
	MOV		LCD,#00111100B ;DATA-8,LINE-2,CHR-5X8
	CALL		CLOCK             ;3CH
;===============================================================
	MOV		LCD,#00001100B ;DISP-ON,BLINK-OFF,CUR-OFF
	CALL		CLOCK             ;0CH
;===========================================================
	CALL		LINE1	;             "BISMILLAH-AR-REHMAN "
	CALL		LINE2	;             "   NAR - RAHEEM     "
	CALL		LINE3	;             "  IQRA  UNIVERSITY  "
	CALL		LINE4	;	      " GSM BASED SECURITY "
	MOV		DLYREG3,#05
	CALL		LDLY1
;===========================================================
	CALL		LINE5	;		"  Iqra  University  "
	CALL		LINE6	;		" Gsm Based Security "
	CALL		BLK3	;		" 000,000,000,000,000"
	CALL		BLK4	;		" 000,000,000,000,000"

	MOV		TMOD,#01
	MOV		TH0,#>(-50000)
	MOV		TL0,#<(-50000)
	CLR		TR0
	CLR		TF0
	MOV		TCON,#05
	MOV		IE,#10000010B
	MOV		SEC,#120
	MOV		RLY_FLG1,#01
	MOV		RLY_FLG2,#00
	MOV		RLY_FLG3,#00
	MOV		RLY_FLG4,#00
	MOV		RLY_FLG5,#00
	SETB		TR0
	MOV		R0,#00
	MOV		DUM_4094,#08
	
;===========================================================
;===========================================================
MAIN:
	CALL		M_DISPLAY
	CALL		RLY_SR			;OK
	CALL		INP_SR1
	JMP		MAIN
;===========================================================
;===========================================================



;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
M_DISPLAY:
	JNB		DSP_F,M_DISPLAY_DONE
	RET
;===========================================================
;===========================================================
M_DISPLAY_DONE:
	SETB		DSP_F
	MOV		BIN_REG,IN_FLG1
	CALL		BIN_BCD
	MOV		LCD,#095H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#096H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#097H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG2
	CALL		BIN_BCD
	MOV		LCD,#099H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#09AH
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#09BH
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG3
	CALL		BIN_BCD
	MOV		LCD,#09DH
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#09EH
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#09FH
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG4
	CALL		BIN_BCD
	MOV		LCD,#0A1H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0A2H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0A3H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG5
	CALL		BIN_BCD
	MOV		LCD,#0A5H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0A6H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0A7H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG1_220
	CALL		BIN_BCD
	MOV		LCD,#0D5H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0D6H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0D7H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG2_220
	CALL		BIN_BCD
	MOV		LCD,#0D9H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0DAH
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0DBH
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG3_220
	CALL		BIN_BCD
	MOV		LCD,#0DDH
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0DEH
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0DFH
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG4_220
	CALL		BIN_BCD
	MOV		LCD,#0E1H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0E2H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0E3H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
;===========================================================
;===========================================================
	MOV		BIN_REG,IN_FLG5_220
	CALL		BIN_BCD
	MOV		LCD,#0E5H
	CALL		CLOCK
	MOV		A,BCD3
	CALL		DSPT
	MOV		LCD,#0E6H
	CALL		CLOCK
	MOV		A,BCD2
	CALL		DSPT
	MOV		LCD,#0E7H
	CALL		CLOCK
	MOV		A,BCD1
	CALL		DSPT
	RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
BIN_BCD:
	MOV		A,BIN_REG
	MOV		B,#10
	DIV		AB
	MOV		BCD1,B
	MOV		B,#10
	DIV		AB
	MOV		BCD2,B
	MOV		BCD3,A
	RET
;===========================================================
;===========================================================


;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
INP_SR1:
	JNB		INP_F1,INP_SR1_DONE
	RET
;===========================================================
;===========================================================
INP_SR1_DONE:
	SETB		INP_F1
	SETB		ENB
	MOV		IN_FLG1,#00
	MOV		IN_FLG2,#00
	MOV		IN_FLG3,#00
	MOV		IN_FLG4,#00
	MOV		IN_FLG5,#00
	MOV		IN_FLG1_220,#00
	MOV		IN_FLG2_220,#00
	MOV		IN_FLG3_220,#00
	MOV		IN_FLG4_220,#00
	MOV		IN_FLG5_220,#00
	MOV		A,#00
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	MOV		DUM,#08
	CLR		STB_165
	CALL		NOPE10
	MOV		R0,#00
;===========================================================
;===========================================================
S_LOP2:
	SETB		CLK_165
	CALL		NOPE10
	MOV		C,DATA_165
	MOV		A,PUSHER1
	RRC		A
	MOV		PUSHER1,A
	MOV		A,PUSHER2
	MOV		C,DATA_1651
	RRC		A
	MOV		PUSHER2,A
	CALL		NOPE10
	CLR		CLK_165
	CALL		NOPE10
	DJNZ		DUM,S_LOP2
	MOV		DUM,#08
	CJNE		R0,#00,INPS1
	MOV		IN_FLG1,PUSHER1
	MOV		IN_FLG1_220,PUSHER2
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	MOV		R0,#01
	SJMP		S_LOP2
;===========================================================
;===========================================================
INPS1:
	CJNE		R0,#01,INPS2
	MOV		IN_FLG2,PUSHER1
	MOV		IN_FLG2_220,PUSHER2
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	MOV		R0,#02
	SJMP		S_LOP2
;===========================================================
;===========================================================
INPS2:
	CJNE		R0,#02,INPS3
	MOV		IN_FLG3,PUSHER1
	MOV		IN_FLG3_220,PUSHER2
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	MOV		R0,#03
	SJMP		S_LOP2
;===========================================================
;===========================================================
INPS3:
	CJNE		R0,#03,INPS4
	MOV		IN_FLG4,PUSHER1
	MOV		IN_FLG4_220,PUSHER2
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	MOV		R0,#04
	SJMP		S_LOP2
;===========================================================
;===========================================================
INPS4:
	MOV		IN_FLG5,PUSHER1
	MOV		IN_FLG5_220,PUSHER2
	MOV		PUSHER1,#00
	MOV		PUSHER2,#00
	CLR		DSP_F
	RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================


;===========================================================
;===========================================================
RLY_SR:
	JNB		RLY_F,RLY_SR_DONE
	RET
RLY_SR_DONE:
	SETB		RLY_F
	CJNE		R0,#00,RLY_sR1
	CLR		STB_4094
	CLR		ENB
	MOV		A,RLY_FLG5
	CALL		SND_4094
	MOV		A,RLY_FLG4
	CALL		SND_4094
	MOV		A,RLY_FLG3
	CALL		SND_4094
	MOV		A,RLY_FLG2
	CALL		SND_4094
	MOV		A,RLY_FLG1
	CALL		SND_4094
	MOV		A,RLY_FLG1
	RL		A
	MOV		RLY_FLG1,A
	DJNZ		DUM_4094,XX_RLY_SR
	MOV		R0,#01
	MOV		DUM_4094,#08
	MOV		RLY_FLG2,#01
	MOV		RLY_FLG1,#00
XX_RLY_SR:
	SETB		STB_4094
	SETB		ENB
	RET
;===========================================================
;===========================================================
RLY_sR1:
	CJNE		R0,#01,RLY_SR2
	CLR		STB_4094
	CLR		ENB
	MOV		A,RLY_FLG5
	CALL		SND_4094
	MOV		A,RLY_FLG4
	CALL		SND_4094
	MOV		A,RLY_FLG3
	CALL		SND_4094
	MOV		A,RLY_FLG2
	CALL		SND_4094
	MOV		A,RLY_FLG1
	CALL		SND_4094
	MOV		A,RLY_FLG2
	RL		A
	MOV		RLY_FLG2,A
	DJNZ		DUM_4094,XX_RLY_SR1
	MOV		R0,#02
	MOV		DUM_4094,#08
	MOV		RLY_FLG3,#01
	MOV		RLY_FLG2,#00
XX_RLY_SR1:
	SETB		STB_4094
	SETB		ENB
	RET
;===========================================================
;===========================================================
RLY_SR2:
	CJNE		R0,#02,RLY_SR3
	CLR		STB_4094
	CLR		ENB
	MOV		A,RLY_FLG5
	CALL		SND_4094
	MOV		A,RLY_FLG4
	CALL		SND_4094
	MOV		A,RLY_FLG3
	CALL		SND_4094
	MOV		A,RLY_FLG2
	CALL		SND_4094
	MOV		A,RLY_FLG1
	CALL		SND_4094
	MOV		A,RLY_FLG3
	RL		A
	MOV		RLY_FLG3,A
	DJNZ		DUM_4094,XX_RLY_SR2
	MOV		R0,#03
	MOV		DUM_4094,#08
	MOV		RLY_FLG4,#01
	MOV		RLY_FLG3,#00
XX_RLY_SR2:
	SETB		STB_4094
	SETB		ENB
	RET
;===========================================================
;===========================================================
RLY_SR3:
	CJNE		R0,#03,RLY_SR4
	CLR		STB_4094
	CLR		ENB
	MOV		A,RLY_FLG5
	CALL		SND_4094
	MOV		A,RLY_FLG4
	CALL		SND_4094
	MOV		A,RLY_FLG3
	CALL		SND_4094
	MOV		A,RLY_FLG2
	CALL		SND_4094
	MOV		A,RLY_FLG1
	CALL		SND_4094
	MOV		A,RLY_FLG4
	RL		A
	MOV		RLY_FLG4,A
	DJNZ		DUM_4094,XX_RLY_SR3
	MOV		R0,#04
	MOV		DUM_4094,#08
	MOV		RLY_FLG5,#01
	MOV		RLY_FLG4,#00
XX_RLY_SR3:
	SETB		STB_4094
	SETB		ENB
	RET
;===========================================================
;===========================================================
RLY_SR4:
	MOV		A,RLY_FLG5
	CALL		SND_4094
	MOV		A,RLY_FLG4
	CALL		SND_4094
	MOV		A,RLY_FLG3
	CALL		SND_4094
	MOV		A,RLY_FLG2
	CALL		SND_4094
	MOV		A,RLY_FLG1
	CALL		SND_4094
	MOV		A,RLY_FLG5
	RL		A
	MOV		RLY_FLG5,A
	DJNZ		DUM_4094,XX_RLY_SR4
	MOV		R0,#00
	MOV		DUM_4094,#08
	MOV		RLY_FLG1,#01
	MOV		RLY_FLG5,#00
XX_RLY_SR4:
	SETB		STB_4094
	SETB		ENB
	RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
;===========================================================
SND_4094:
	MOV		DUM,#08
S_LOP1:
	RLC		A
	MOV		DATA_4094,C
	CALL		CLOCK_4094
	DJNZ		DUM,S_LOP1
	RET
;===========================================================
;===========================================================
;===========================================================
;===========================================================
CLOCK_4094:
	CALL		NOPE10
	SETB		CLK_4094
	CALL		NOPE10
	CLR		CLK_4094
	CALL		NOPE10
	RET
;===========================================================
;===========================================================
NOPE10:
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	RET
;===============================================================
;===============================================================
;===============================================================
T0ISR:
	CLR		TR0
	CLR		TF0
	MOV		TH0,#>(-50000)
	MOV		TL0,#<(-50000)
	DJNZ		SEC,EXT_T0ISR
	MOV		SEC,#120
	CLR		INP_F1
	CLR		RLY_F
;===============================================================
;===============================================================
EXT_T0ISR:
	SETB		TR0
	RETI
;===============================================================
;===============================================================















;=====================================================================
;=====================================================================
;=====================================================================
;=====================================================================
;=                    DISPLAY SUBROUTINE                             =
;=====================================================================
;=====================================================================

DISPLAY:
;	CALL		CLOCK
	CALL		SDLY
	SETB		RS           ;DATA MODE PRINTING MODE
	MOV		DREG,#0H
RETURN:
	MOV		A,DREG
	MOVC		A,@A+DPTR
	MOV		LCD,A
	CALL		CLOCK
	INC		DREG
	MOV		A,DREG
	CJNE		A,#20,RETURN
	CLR		RS
	RET
;=====================================================================
;=                     DISPLAY SUBROUTINE                            =
;=====================================================================
DSPT:
	ORL		A,#30H
;DSPT:
	MOV		LCD,A
;	CALL		LCD_SENDER
	CALL		SDLY
	SETB		RS
	CALL		SDLY
	CLR		EN
	CALL		SDLY
	SETB		EN
	CALL		SDLY
	CLR		RS
	RET
;================================================================
;=        	LCD INITILALIZATION DELAY  		=
;================================================================
;INIDLY:
;	DJNZ		DLYREG1,$
;	DJNZ		DLYREG1,$
;	DJNZ		DLYREG2,INIDLY
;	RET
;================================================================
;=                 150 uSec (SMALL DELAY)                       =
;================================================================
SDLY:
	DJNZ		DLYREG1,$
	RET
;================================================================

;================================================================
;=                 150 uSec (SMALL DELAY)                       =
;================================================================
LDLY1:
	CALL		LDLY
	DJNZ		DLYREG3,LDLY1
	MOV		DLYREG3,#05
	RET
;================================================================
;=                        DELAY 		=                       
;================================================================
LDLY:
	DJNZ		DLYREG1,$
	DJNZ		DLYREG1,$
	DJNZ		DLYREG2,LDLY
	RET
;================================================================
;=                   DELAY & EN,DISABLE                         =
;================================================================
CLOCK:
	CALL		SDLY
	CLR		EN
	CALL		SDLY
	SETB		EN
	RET
;================================================================
;======================================================================	
;======================================================================	
;================================================================
;================================================================
;================================================================
;=	      LINES ADDRESSES		=
;================================================================
LINE1:
	MOV	LCD,#80H  ;CURSER SET AT 1st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG1
	CALL	DISPLAY
	RET
;================================================================
LINE2:
	MOV	LCD,#0C0H  ;CURSER SET AT 2st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG2
	CALL	DISPLAY
	RET
;================================================================
LINE3:
	MOV	LCD,#94H  ;CURSER SET AT 1st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG3
	CALL	DISPLAY
	RET
;================================================================
LINE4:
	MOV	LCD,#0D4H  ;CURSER SET AT 2st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG4
	CALL	DISPLAY
	RET
;================================================================
LINE5:
	MOV	LCD,#80H  ;CURSER SET AT 1st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG5
	CALL	DISPLAY
	RET
;================================================================
LINE6:
	MOV	LCD,#0C0H  ;CURSER SET AT 2st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSG6
	CALL	DISPLAY
	RET
BLK3:
	MOV	LCD,#094H  ;CURSER SET AT 2st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSGB
	CALL	DISPLAY
	RET
BLK4:
	MOV	LCD,#0D4H  ;CURSER SET AT 2st LINE 1st CHARACTER
	CALL	CLOCK
	MOV	DPTR,#MSGB
	CALL	DISPLAY
	RET

;================================================================
;================================================================
;================================================================
;================================================================
;=				=
;=				=
;=                        LOOK UP TABLE     		=
;=				=
;=				=

                END