home *** CD-ROM | disk | FTP | other *** search
/ 8051 Assembly Language Programming / easm51.iso / ECLAIR.LST < prev    next >
Encoding:
File List  |  1997-01-11  |  36.2 KB  |  1,011 lines
  1. passe 1 ok
  2.  
  3. Assembleur MCS-51  Version 2.20, Copyright (c) 1988, 91 JLSoftware
  4. Programme : L:\ECLAIR.ASM                            Sat Jan 11 21:12:40 1997
  5.  
  6.         
  7.         ;       Modele de micro-contrôleur: 80C31
  8.             Model 31
  9.         ;
  10.         ;---------------------------------------------------------------------------
  11.         ; Définition des constantes
  12.         ;
  13. 00F3 =        V24SPD          EQU     243
  14. 00D8 =        t10msH          EQU     0D8h
  15. 00F0 =        t10msL          EQU     0F0h
  16. 00A0 =        EEPROM        EQU    10100000b
  17. 0025 =        TypeSW_EEPROM    EQU    25h        ; prevois 37 (25h) sorties
  18. 0050 =        AlarmSW_EEPROM    EQU    50h
  19.         
  20.         ;       Adresse de commande des sorties:
  21.         ;
  22.         ; Triac1          EQU     000
  23.         ; Triac2          EQU     001
  24.         ; Triac3          EQU     002
  25.         ; Triac4          EQU     003
  26.         ; Triac5          EQU     004
  27.         ; Triac6          EQU     005
  28.         ; Triac7          EQU     006
  29.         ; Triac8          EQU     007
  30.         ; Triac9          EQU     008
  31.         ; Triac10         EQU     009
  32.         ; Triac11         EQU     010
  33.         ; Triac12         EQU     011
  34.         ; Triac13         EQU     012
  35.          
  36.         ; Grad1           EQU     013
  37.         ; Grad2           EQU     014
  38.         ; Grad3           EQU     015
  39.         
  40.         ; Relais1         EQU     016
  41.         ; Relais2         EQU     017
  42.         ; Relais3         EQU     018
  43.         ; Relais4         EQU     019
  44.         ;
  45.         ;       Les entrées se font sur le port P1
  46.         ;       Les bits de 0 à 6 servent pour le codage des B.P.
  47.         ;       Le P1.7 est l'entrée d'alarme (Entrée +12V quand alarme non active)
  48.         ;
  49.         ;---------------------------------------------------------------------------
  50.         ;       Définition des diverses zones de stockage en RAM interne
  51.         ;       Mémoire pour état des sorties (en RAM interne)
  52.         ;
  53.                 ORG     0020h           ; debut zone adressable par bit (0-7F)
  54. 0020                  DS      1               ; Réserve bytes de stockage
  55. 0000 =        Flag1           EQU     000h            ; Adresse 1er bit
  56. 0001 =        Flag2           EQU     001h            ; Adresse 2eme bit
  57. 0002 =        Flag3        EQU    002h        ; Adresse 3eme Bit
  58. 0021          TMP             DS      1               ; Variable TMP
  59. 0022          Last_Code       DS      1               ; Dernier code lu
  60. 0023          DPL_232         DS      1
  61. 0024          DPH_232         DS      1
  62. 0003 =        EOT             EQU     003h            ; End Of Transmit  (! Bit = 20.3h !)
  63. 0004 =        Flag4        EQU    004h        ; Traitement ALARM ?
  64.         
  65. 0025          MemoOut         DS      35              ; Memoire etat sortie
  66. 0048          TypeSW        DS    35        ; Type de SWITCH (Interrupteur / BP)
  67.                             ;         (    00       / FF )
  68.                                       
  69.         ;
  70.         ;---------------------------------------------------------------------------
  71.         ; Programme
  72.         ;
  73.             ORG     0000
  74. 0000 020100        LJMP    Debut
  75.         
  76.             ORG     000Bh
  77. 000B 02022E        LJMP    IntrT0
  78.         
  79.             ORG     0023h
  80. 0023 0201A5        LJMP    IntrSerie
  81. 0026 4144414D20
  82. 002B 452E203139
  83. 0030 3936        DM    "ADAM E. 1996"
  84. 0032 020100        LJMP    0100h
  85.             
  86.             ORG     0100h
  87.         
  88. 0100 C200    Debut   CLR     Flag1
  89. 0102 C201        CLR     Flag2
  90. 0104 C204        CLR    Flag4            ; Pas en traitement d'alarm
  91. 0106 752200        MOV     Last_Code,#0
  92. 0109 120123        LCALL   InitIntr
  93. 010C 120144        LCALL   InitTimer0
  94. 010F 12012A        LCALL   InitRS232               ; initialisation du port RS232
  95. 0112 900504        MOV     DPTR,#Welcome           ; } envoi du message de connection.
  96. 0115 120182        LCALL   SendTxt                 ; }
  97. 0118 12042E        LCALL    InitTypeSW        ; Initialise le type de sortie
  98. 011B 1203FF        LCALL    InitSorties        ; Initialise les sorties
  99. 011E 120190        LCALL   ResetSorties            ; Place les sorties à 0 (1 pour relais)
  100. 0121 2121        AJMP    $
  101.         
  102.             
  103.         ;        
  104.         ;---------------------------------------------------------------------------
  105.         ; Initialise des interruptions  
  106.         ; All (80h) ; Série (10h) ; Timer 0 (02h)
  107. 0123 75B802    InitIntr        MOV     IP,#02H      
  108. 0126 75A892            MOV     IE,#92H
  109. 0129 22                RET
  110.         ;
  111.         ;---------------------------------------------------------------------------
  112.         ; Initialise le port série à 4800 bauds, 8 bits, pas de parité et 1 stop bit
  113.         ;
  114. 012A 75D000    InitRS232       MOV     PSW,#0          ; reset register banks
  115. 012D 758780            MOV     PCON,#080H      ; SMOD=1
  116. 0130 758922            MOV     TMOD,#22H       ; modes are timer
  117. 0133 758DF3            MOV     TH1,#V24SPD     ; preload value
  118. 0136 758BF3            MOV     TL1,#V24SPD
  119. 0139 758921            MOV     TMOD,#21H
  120. 013C D28E            SETB    TCON.6          ; start counter
  121. 013E 759850            MOV     SCON,#050H      ; mode 1 , Enable receiver=10H
  122. 0141 D203            SETB    EOT             ; Positionne Flag End Of Transmit
  123. 0143 22                RET
  124.         
  125.         ;----------------------------------------------------------------------------
  126.         ; Initialisation du Timer 0 (Tempo de 10 ms)
  127.         ;
  128. 0144 758CD8    InitTimer0      MOV     TH0,#t10msH
  129. 0147 758AF0            MOV     TL0,#t10msL
  130. 014A D28C            SETB    TR0
  131. 014C 22                RET
  132.             
  133.         ;---------------------------------------------------------------------------
  134.         ; Envoi la valeur de l'accu (00->99) par le port série
  135.         ;
  136. 014D C0E0    Send_Val        PUSH    ACC             ; Empile l'accu
  137. 014F 75F00A            MOV     B,#10           ; } Divise par 10
  138. 0152 84                DIV     AB              ; }
  139. 0153 2430            ADD     A,#'0'
  140. 0155 F599            MOV     SBUF,A
  141. 0157 3099FD            JNB     TI,$
  142. 015A C299            CLR     TI
  143. 015C E5F0            MOV     A,B
  144. 015E 2430            ADD     A,#'0'
  145. 0160 F599            MOV     SBUF,A
  146. 0162 3099FD            JNB     TI,$
  147. 0165 C299            CLR     TI
  148. 0167 12016D            LCALL   Send_CRLF
  149. 016A D0E0            POP     ACC
  150. 016C 22                RET
  151.         ;                
  152.         ;---------------------------------------------------------------------------
  153.         ; envoi d'un CR et d'un LF par le port série
  154.         ;
  155. 016D C082    Send_CRLF       PUSH    DPL             ; Sauve le DPL tâche principale
  156. 016F C083            PUSH    DPH             ; IDEM
  157. 0171 3003FD            JNB     EOT,$           ; Attend End of Transmit
  158. 0174 C203            CLR     EOT
  159. 0176 900670            MOV     DPTR,#Txt_CRLF  ; Pointe chaîne CRLF
  160. 0179 858223            MOV     DPL_232,DPL     ; } Sauve le DPTR pour le port série
  161. 017C 858324            MOV     DPH_232,DPH     ; }
  162. 017F D299            SETB    TI              ; Lance l'écriture série
  163. 0181 22                RET
  164.         ;
  165.         ;---------------------------------------------------------------------------
  166.         ; Envoi d'un texte présent en ROM (DPTR pointe sur la chaîne)
  167.         ;
  168. 0182 3003FD    SendTxt         JNB     EOT,$           ; Attend End Of Transmit
  169. 0185 C203            CLR     EOT
  170. 0187 858223            MOV     DPL_232,DPL
  171. 018A 858324            MOV     DPH_232,DPH
  172. 018D D299            SETB    TI              ; Lance l'écriture par RS232
  173. 018F 22                RET
  174.         ;
  175.         ;---------------------------------------------------------------------------
  176.         ; Coupe toutes les sorties
  177.         ;
  178. 0190 7400    ResetSorties    MOV     A,#0
  179. 0192 7823            MOV     R0,#35            ; 16 sorties
  180. 0194 900000            MOV     DPTR,#0
  181. 0197 F0        RstOut1         MOVX    @DPTR,A              
  182. 0198 A3                INC     DPTR
  183. 0199 D8FC            DJNZ    R0,RstOut1
  184.         
  185. 019B 7823            MOV     R0,#35                  ; Init 16 sorties
  186. 019D 7925            MOV     R1,#MemoOut             ; R1 pointe sur MemoOut                      
  187. 019F 7700    RstOut3         MOV     @R1,#0                  ; Ecrit des 0
  188. 01A1 09                INC     R1                      ; Passe sortie suivante
  189. 01A2 D8FB            DJNZ    R0,RstOut3              ; Décremente R0
  190.                 
  191. 01A4 22                RET
  192.         
  193.         ;---------------------------------------------------------------------------
  194.         ; Gestion de l'interruption série
  195.         ;
  196. 01A5 209803    IntrSerie       JB      RI,IntrReceive  ; si RI = 1 on continue
  197. 01A8 0201F5            LJMP    IntrSend        ; Sinon Gestion Envoi par Série
  198.         
  199. 01AB =        IntrReceive     EQU $                   ; Coupe l'interruption serie
  200. 01AB C298            CLR     RI              ; Efface le RI
  201. 01AD C0E0            PUSH    ACC             ; Sauve l'accu
  202. 01AF E599            MOV     A,SBUF          ; Lecture du caractère recu
  203.                 
  204. 01B1 B43F08            CJNE    A,#'?',SerieCase1
  205. 01B4 9005A2            MOV     DPTR,#TextHelp  ;} 
  206. 01B7 12021C            LCALL   SendTxt2         ;} Envoi du texte d'aide
  207. 01BA 21EA            AJMP    FinIntr         ; Fin d'interruption
  208.         
  209. 01BC B46102    SerieCase1      CJNE    A,#'a',SerieCase2
  210.         ;        LCALL   LectChanel
  211.         ;        LCALL   ON_Sortie
  212. 01BF 21EA            AJMP    FinIntr
  213.         
  214. 01C1 B46502    SerieCase2      CJNE    A,#'e',SerieCase3
  215.         ;        LCALL   LectChanel
  216.         ;        LCALL   OFF_Sortie
  217. 01C4 21EA            AJMP    FinIntr
  218.         
  219. 01C6 B47408    SerieCase3      CJNE    A,#'t',SerieCase4
  220. 01C9 1202E1            LCALL   LectChanel
  221. 01CC 12030E            LCALL   TOG_Sortie
  222. 01CF 21EA            AJMP    FinIntr
  223.         
  224. 01D1 B47308    SerieCase4    CJNE    A,#'s',SerieCase5
  225. 01D4 1202E1            LCALL    LectChanel
  226. 01D7 1203AD            LCALL    ChangeTypeSW
  227. 01DA 21EA            AJMP    FinIntr
  228.                 
  229. 01DC B46408    SerieCase5    CJNE    A,#'d',SerieCase6
  230. 01DF 1202E1            LCALL    LectChanel
  231. 01E2 120369            LCALL    DefSortieAlarm
  232. 01E5 21EA            AJMP    FinIntr
  233.         
  234. 01E7 B47600    SerieCase6    CJNE    A,#'v',FinIntr
  235.         ;        LCALL    AffTypeSW
  236.         
  237. 01EA 900653    FinIntr         MOV     DPTR,#Prompt
  238. 01ED 12021C            LCALL   SendTxt2
  239. 01F0 D0E0            POP     ACC
  240. 01F2 D2A9            SETB    ET0                    ; Active les interruptions
  241. 01F4 32                RETI
  242.         ;
  243.         ;---------------------------------------------------------------------------                
  244.         ; Routine d'envoi d'un texte présent en ROM (Appellé par Intr)
  245.         ;
  246. 01F5 C0E0    IntrSend        PUSH    ACC             ; Empile l'Accu
  247. 01F7 C082            PUSH    DPL             ; Empile le DPL
  248. 01F9 C083            PUSH    DPH             ; Bien tu as deviné !
  249. 01FB C299            CLR     TI              ; Efface le bit TI
  250. 01FD 852382            MOV     DPL,DPL_232     ; Restaure le pointeur pour RS232
  251. 0200 852483            MOV     DPH,DPH_232     ; IDEM
  252. 0203 7400            MOV     A,#0            
  253. 0205 93                MOVC    A,@A+DPTR       ; Lecture du caractère à afficher
  254. 0206 600B            JZ      FinSndTxt       ; Si 0 Termine
  255. 0208 F599            MOV     SBUF,A
  256. 020A A3                INC     DPTR
  257. 020B 858223            MOV     DPL_232,DPL     ; Sauve le pointeur pour RS232
  258. 020E 858324            MOV     DPH_232,DPH     ; IDEM
  259. 0211 4115            AJMP    NextSnd
  260. 0213 D203    FinSndTxt       SETB    EOT             ; SET End Of Transmit
  261.             
  262. 0215 D083    NextSnd         POP     DPH             ; Restaure le DPH tâche principale
  263. 0217 D082            POP     DPL             ; IDEM
  264. 0219 D0E0            POP     ACC             ; Restaure l'acccu tâche principale
  265. 021B 32                RETI                    ; Termine gestion intr Send RS232
  266.         
  267.         ;---------------------------------------------------------------------------                
  268.         ; Routine d'envoi d'un texte présent en ROM 
  269.         ;
  270. 021C 7400    SendTxt2        MOV     A,#0            
  271. 021E 93                MOVC    A,@A+DPTR       ; Lecture du caractère à afficher
  272. 021F 600A            JZ      FinSnd2         ; Si 0 Termine
  273. 0221 F599            MOV     SBUF,A
  274. 0223 3099FD            JNB     TI,$
  275. 0226 C299            CLR     TI              ; Efface le bit TI
  276. 0228 A3                INC     DPTR
  277. 0229 411C            AJMP    SendTxt2
  278. 022B D203    FinSnd2         SETB    EOT             ; SET End Of Transmit
  279. 022D 22                RET                     ; Termine Routine Send RS232 sans
  280.                             ; les interruptions
  281.         ;
  282.         ;
  283.         ;---------------------------------------------------------------------------
  284.         ; Gestion de l'interruption Timer 0
  285.         ;
  286. 022E C28C    IntrT0          CLR     TR0             ; Stop Timer 0
  287. 0230 B200            CPL     Flag1           ; Complemente le Flag 10 ms ecoule
  288. 0232 758AF0            MOV     TL0,#t10msL
  289. 0235 758CD8            MOV     TH0,#t10msH
  290. 0238 D28C            SETB    TR0
  291. 023A B2B5            CPL    P3.5        ; sortie de Flag1 sur T1 (Pin 15)
  292. 023C C0E0            PUSH    ACC
  293. 023E C082            PUSH    DPL
  294. 0240 C083            PUSH    DPH        
  295. 0242 E590            MOV    A,P1
  296. 0244 B4FF12            CJNE    A,#255,Intr_1
  297. 0247 C201            CLR    Flag2
  298. 0249 300405            JNB    Flag4,Intr_0
  299. 024C 1203FF            LCALL    InitSorties
  300. 024F C204            CLR    Flag4        ; Efface traitement d'alarm
  301. 0251 7522FF    Intr_0        MOV    Last_Code,#255
  302. 0254 120345            LCALL    Stop_Grad
  303. 0257 4173            AJMP    Fin_IntrT0
  304.                 
  305. 0259 200104    Intr_1        JB    Flag2,Intr_2    
  306. 025C D201            SETB    Flag2
  307. 025E 4173            AJMP    Fin_IntrT0
  308.                         
  309. 0260 30970D    Intr_2        JNB    P1.7,Intr_Alarm
  310. 0263 300405            JNB    Flag4,Intr_3
  311. 0266 1203FF            LCALL    InitSorties
  312. 0269 C204            CLR    Flag4            ; Traitement ALARM = NON
  313. 026B 12027A    Intr_3        LCALL    Gestion_BP
  314. 026E 4173            AJMP    Fin_IntrT0
  315.                         
  316. 0270 1202A6    Intr_Alarm    LCALL    Alarm
  317.         
  318. 0273 D083    Fin_IntrT0    POP    DPH
  319. 0275 D082            POP    DPL
  320. 0277 D0E0            POP    ACC
  321. 0279 32                RETI
  322.         ;
  323.         ;---------------------------------------------------------------------------
  324.         ; Gestion des boutons poussoirs
  325.         ;
  326. 027A E590    Gestion_BP    MOV    A,P1
  327. 027C 547F            ANL    A,#07Fh            ; masque pour supprimer P1.7
  328. 027E F521            MOV    TMP,A
  329. 0280 B52202            CJNE    A,Last_Code,Gestion_1
  330.                 
  331. 0283 41A5            AJMP    Fin_Gestion
  332.         
  333. 0285 7400    Gestion_1    MOV    A,#0
  334. 0287 9006CC            MOV    DPTR,#Tab_Code
  335.         
  336. 028A C0E0    Gestion_2    PUSH    ACC
  337. 028C 93                MOVC    A,@A+DPTR
  338. 028D B5210B            CJNE    A,TMP,Gestion_4
  339.                 
  340. 0290 D0E0            POP    ACC
  341. 0292 04                INC    A
  342. 0293 12030E            LCALL    TOG_Sortie
  343. 0296 852122            MOV    Last_Code,TMP
  344. 0299 41A5            AJMP    Fin_Gestion
  345.                 
  346. 029B D0E0    Gestion_4    POP    ACC
  347. 029D B42202            CJNE    A,#34,Gestion_5        ; Test BP35 ?
  348. 02A0 41A5            AJMP    Fin_Gestion
  349.         
  350. 02A2 04        Gestion_5    INC    A
  351. 02A3 418A            AJMP    Gestion_2
  352.         
  353. 02A5 22        Fin_Gestion    RET
  354.         
  355.         ;
  356.         ;--------------------------------------------------------------------------
  357.         ; Alarm
  358.         ;
  359. 02A6 =        Alarm        EQU    $
  360. 02A6 300401            JNB    Flag4,Alarm_ON
  361. 02A9 22                RET                ; Si Flag4=1 on termine
  362. 02AA D204    Alarm_ON    SETB    Flag4            
  363. 02AC 120488            LCALL    StartI2C
  364. 02AF 74A0            MOV    A,#EEPROM
  365. 02B1 1204E5            LCALL    SendByteI2C
  366. 02B4 7450            MOV    A,#AlarmSW_EEPROM
  367. 02B6 7D23            MOV    R5,#35            ; Lit les 35 sorties        
  368. 02B8 900000            MOV    DPTR,#0
  369. 02BB 1204E5            LCALL    SendByteI2C        ; Envoi adresse 1ere sortie
  370. 02BE 120488            LCALL    StartI2C        ; Start I2C
  371. 02C1 74A1            MOV    A,#EEPROM+1
  372. 02C3 1204E5            LCALL    SendByteI2C        ; Envoi adresse EEPROM (RD)
  373.                 
  374. 02C6 1204F1    Alarm_Bcl    LCALL    RecByteI2C        ; Lecture de la sorrtie 
  375. 02C9 120500            LCALL    AckI2C            ; Acquitte la lecture
  376. 02CC F0                MOVX    @DPTR,A            ; Ecriture sur la sortie
  377. 02CD A3                INC    DPTR
  378. 02CE DDF6            DJNZ    R5,Alarm_Bcl
  379.                 
  380. 02D0 1204F1            LCALL    RecByteI2C
  381. 02D3 1204CE            LCALL    StopI2C
  382.                     
  383.         ;Alarm_Wait    MOV    A,P1
  384.         ;        JNB    ACC.7,Alarm_Wait
  385.         ;        LCALL    InitSorties
  386.                                         
  387. 02D6 22                RET
  388.         
  389.         ;
  390.         ; --------------------------------------------------------------------------
  391.         ; Routine de tempo d'anti-rebond (basé sur timer 0 et Flag 1)
  392.         ;
  393. 02D7 3000FD    Wait            JNB     Flag1,$         ; Attend au minimum 10 mS
  394. 02DA 2000FD            JB      Flag1,$         ; Et au Maximum 30 mS
  395. 02DD 3000FD            JNB     Flag1,$
  396. 02E0 22                RET
  397.         ;
  398.         ;---------------------------------------------------------------------------
  399.         ; Routine de lecture du n° de canal (en sortie A = n° canal)
  400.         ;
  401. 02E1 =        LectChanel      EQU     $
  402. 02E1 90065D            MOV     DPTR,#TextChanel
  403. 02E4 12021C            LCALL   SendTxt2
  404. 02E7 7B00            MOV     R3,#0
  405. 02E9 3098FD    LECTCH0         JNB     RI,$
  406. 02EC C298            CLR     RI
  407. 02EE E599            MOV     A,SBUF
  408. 02F0 B40D02            CJNE    A,#13,LECTCh1
  409. 02F3 EB                MOV     A,R3
  410. 02F4 22                RET
  411.         
  412. 02F5 F599    LECTCh1         MOV     SBUF,A
  413. 02F7 3099FD            JNB     TI,$
  414. 02FA C299            CLR     TI
  415. 02FC 9430            SUBB    A,#'0'
  416. 02FE 40E9            JC      LECTCH0
  417. 0300 FC                MOV     R4,A
  418. 0301 940A            SUBB    A,#10
  419. 0303 50E4            JNC     LECTCH0
  420. 0305 EB                MOV     A,R3
  421. 0306 75F00A            MOV     B,#10
  422. 0309 A4                MUL     AB
  423. 030A 2C                ADD     A,R4
  424. 030B FB                MOV     R3,A
  425. 030C 41E9            AJMP    LECTCH0
  426.         
  427.         ;---------------------------------------------------------------------------
  428.         ; Routine Toggel Sortie Change l'état de la sortie n° A
  429.         ;
  430. 030E =        TOG_Sortie      EQU     $
  431. 030E 14                DEC     A                       ; Convertion N° sortie -> Adr
  432. 030F F9                MOV    R1,A
  433.                 
  434. 0310 2448            ADD    A,#TypeSW
  435. 0312 F8                MOV    R0,A
  436. 0313 E6                MOV    A,@R0
  437.                 
  438. 0314 B4FF0B            CJNE    A,#0FFh,Tog_1
  439. 0317 8982            MOV    DPL,R1
  440. 0319 758300            MOV    DPH,#00
  441. 031C 74FF            MOV    A,#0FFh
  442. 031E F0                MOVX    @DPTR,A
  443. 031F 020344            LJMP    Fin_Tog        
  444.         
  445. 0322 120345    Tog_1        LCALL    Stop_Grad
  446. 0325 120488            LCALL    StartI2C        ; Start I2C
  447. 0328 74A0            MOV    A,#EEPROM
  448. 032A 1204E5            LCALL    SendByteI2C        ; Adresse EEPROM
  449. 032D E9                MOV    A,R1
  450. 032E 1204E5            LCALL    SendByteI2C        ; Envoi Adresse (N° Sortie)
  451. 0331 E9                MOV    A,R1
  452. 0332 2425            ADD     A,#MemoOut              ; Calcul Ptr sur Memo sortie
  453. 0334 F8                MOV     R0,A                    ; Place Ptr dans R0
  454. 0335 E6                MOV     A,@R0                   ; Lit l'état actuel
  455. 0336 F4                CPL     A                       ; Complemente l'état
  456. 0337 F6                MOV     @R0,A                   ; Sauvegarde nouvel état
  457. 0338 758300            MOV     DPH,#00                 ; 
  458. 033B 8982            MOV     DPL,R1                  ; Prépare Ptr pour écriture 
  459. 033D F0                MOVX    @DPTR,A                 ; Ecrit nouvelle état
  460. 033E 1204E5            LCALL    SendByteI2C        ; Ecrit état sortie / I2C
  461. 0341 1204CE            LCALL    StopI2C            ; Stop I2C
  462. 0344 22        Fin_Tog        RET
  463.         
  464.         ;---------------------------------------------------------------------------
  465.         
  466. 0345 C0E0    Stop_Grad    PUSH    ACC
  467. 0347 C082            PUSH    DPL
  468. 0349 C083            PUSH    DPH
  469. 034B 7848            MOV    R0,#TypeSW
  470. 034D E6        Stop_Grad1    MOV    A,@R0
  471. 034E B4FF0B            CJNE    A,#0FFh,Stop_Grad2
  472. 0351 E8                MOV    A,R0
  473. 0352 9448            SUBB    A,#TypeSW
  474. 0354 F582            MOV    DPL,A
  475. 0356 758300            MOV    DPH,#00
  476. 0359 7400            MOV    A,#00
  477. 035B F0                MOVX    @DPTR,A
  478. 035C 08        Stop_Grad2    INC    R0
  479. 035D B85CED            CJNE    R0,#TypeSW+20,Stop_Grad1
  480. 0360 D083            POP    DPH
  481. 0362 D082            POP    DPL
  482. 0364 D0E0            POP    ACC
  483. 0366 22                RET
  484.                 
  485.                 
  486.         
  487. 0367 22        ON_Sortie    RET
  488.         
  489. 0368 22        OFF_Sortie      RET
  490.         
  491. 0369 14        DefSortieAlarm    DEC    A
  492. 036A F9                MOV    R1,A
  493. 036B 9006A1            MOV    DPTR,#Txt_DefAlarm
  494. 036E 12021C            LCALL    SendTxt2
  495.         
  496. 0371 3098FD    DefAlarm1    JNB    RI,$            ; Attent touche
  497. 0374 C298            CLR    RI
  498. 0376 E599            MOV    A,SBUF            ; Lecture touche
  499. 0378 B46118            CJNE    A,#'a',DefAlarm2
  500. 037B 120488            LCALL    StartI2C        ; Start I2C
  501. 037E 74A0            MOV    A,#EEPROM
  502. 0380 1204E5            LCALL    SendByteI2C        ; Adresse EEPROM
  503. 0383 E9                MOV    A,R1
  504. 0384 2450            ADD    A,#AlarmSW_EEPROM    ; Adresse en EEPROM de TypeSW
  505. 0386 1204E5            LCALL    SendByteI2C        ; Envoi Adresse (N° Sortie)
  506. 0389 74FF            MOV    A,#0FFh
  507. 038B 1204E5            LCALL    SendByteI2C        ; Ecriture du type (00 = Int)
  508. 038E 1204CE            LCALL    StopI2C
  509. 0391 61AC            AJMP    Fin_DefAlarm
  510.         
  511. 0393 B46EDB    DefAlarm2    CJNE    A,#'n',DefAlarm1                        
  512. 0396 120488            LCALL    StartI2C        ; Start I2C
  513. 0399 74A0            MOV    A,#EEPROM
  514. 039B 1204E5            LCALL    SendByteI2C        ; Adresse EEPROM
  515. 039E E9                MOV    A,R1
  516. 039F 2450            ADD    A,#AlarmSW_EEPROM    ; Adresse en EEPROM de TypeSW
  517. 03A1 1204E5            LCALL    SendByteI2C        ; Envoi Adresse (N° Sortie)
  518. 03A4 7400            MOV    A,#00
  519. 03A6 1204E5            LCALL    SendByteI2C        ; Ecriture du type (00 = Int)
  520. 03A9 1204CE            LCALL    StopI2C
  521.         
  522. 03AC 22        Fin_DefAlarm    RET
  523.         ;    
  524.         ;---------------------------------------------------------------------------
  525.         ; Change le type de sortie (Interrupteur 00   ou  Poussoir FFh )
  526.         ;
  527. 03AD 14        ChangeTypeSW    DEC    A            ; Convertion Canal -> adresse
  528. 03AE F9                MOV    R1,A
  529. 03AF 900673            MOV    DPTR,#Txt_TypeSW
  530. 03B2 12021C            LCALL    SendTxt2
  531.         
  532. 03B5 3098FD    ChType1        JNB    RI,$            ; Attent touche
  533. 03B8 C298            CLR    RI
  534. 03BA E599            MOV    A,SBUF            ; Lecture touche
  535. 03BC B4691F            CJNE    A,#'i',ChType2
  536. 03BF 7448            MOV    A,#TypeSW
  537. 03C1 29                ADD    A,R1
  538. 03C2 F8                MOV    R0,A
  539. 03C3 7400            MOV    A,#00
  540. 03C5 F6                MOV    @R0,A
  541. 03C6 120488            LCALL    StartI2C        ; Start I2C
  542. 03C9 74A0            MOV    A,#EEPROM
  543. 03CB 1204E5            LCALL    SendByteI2C        ; Adresse EEPROM
  544. 03CE E9                MOV    A,R1
  545. 03CF 2425            ADD    A,#TypeSW_EEPROM    ; Adresse en EEPROM de TypeSW
  546. 03D1 1204E5            LCALL    SendByteI2C        ; Envoi Adresse (N° Sortie)
  547. 03D4 7400            MOV    A,#00
  548. 03D6 1204E5            LCALL    SendByteI2C        ; Ecriture du type (00 = Int)
  549. 03D9 1204CE            LCALL    StopI2C
  550. 03DC 61FE            AJMP    Fin_ChType
  551.         
  552. 03DE B470D4    ChType2        CJNE    A,#'p',ChType1                        
  553. 03E1 7448            MOV    A,#TypeSW
  554. 03E3 29                ADD    A,R1
  555. 03E4 F8                MOV    R0,A
  556. 03E5 74FF            MOV    A,#0FFh
  557. 03E7 F6                MOV    @R0,A
  558. 03E8 120488            LCALL    StartI2C        ; Start I2C
  559. 03EB 74A0            MOV    A,#EEPROM
  560. 03ED 1204E5            LCALL    SendByteI2C        ; Adresse EEPROM
  561. 03F0 E9                MOV    A,R1
  562. 03F1 2425            ADD    A,#TypeSW_EEPROM    ; Adresse en EEPROM de TypeSW
  563. 03F3 1204E5            LCALL    SendByteI2C        ; Envoi Adresse (N° Sortie)
  564. 03F6 74FF            MOV    A,#0FFh
  565. 03F8 1204E5            LCALL    SendByteI2C        ; Ecriture du type (00 = Int)
  566. 03FB 1204CE            LCALL    StopI2C
  567.         
  568. 03FE 22        Fin_ChType    RET
  569.         ;
  570.         ;---------------------------------------------------------------------------
  571.         ; Initialise les sorties en fonction de l'EEPROM (I2C)
  572.         ;
  573. 03FF 120488    InitSorties    LCALL    StartI2C        ; Start bus I2C
  574. 0402 74A0            MOV    A,#EEPROM        ; Adresse de l'EEPROM
  575. 0404 1204E5            LCALL    SendByteI2C        ; Envoi
  576. 0407 7400            MOV    A,#00
  577. 0409 7D14            MOV    R5,#20            ; Lit les 20 sorties        
  578. 040B 900000            MOV    DPTR,#0
  579. 040E 7825            MOV    R0,#MemoOut
  580. 0410 1204E5            LCALL    SendByteI2C        ; Envoi adresse 1ere sortie
  581. 0413 120488            LCALL    StartI2C        ; Start I2C
  582. 0416 74A1            MOV    A,#EEPROM+1
  583. 0418 1204E5            LCALL    SendByteI2C        ; Envoi adresse EEPROM (RD)
  584.                 
  585. 041B 1204F1    Init_Bcl    LCALL    RecByteI2C        ; Lecture de la sorrtie 
  586. 041E 120500            LCALL    AckI2C            ; Acquitte la lecture
  587. 0421 F6                MOV    @R0,A            ; Sauve l'état de la sortie
  588. 0422 F0                MOVX    @DPTR,A            ; Ecriture sur la sortie
  589. 0423 08                INC    R0
  590. 0424 A3                INC    DPTR
  591. 0425 DDF4            DJNZ    R5,Init_Bcl
  592.                 
  593. 0427 1204F1            LCALL    RecByteI2C
  594. 042A 1204CE            LCALL    StopI2C
  595. 042D 22                RET
  596.         ;
  597.         ;---------------------------------------------------------------------------
  598.         ; initialise le type de sortie
  599.         ;
  600. 042E 120488    InitTypeSW    LCALL    StartI2C        ; Start bus I2C
  601. 0431 74A0            MOV    A,#EEPROM        ; Adresse de l'EEPROM
  602. 0433 1204E5            LCALL    SendByteI2C        ; Envoi
  603. 0436 7425            MOV    A,#TypeSW_EEPROM
  604. 0438 7D14            MOV    R5,#20            ; Lit les 20 sorties        
  605. 043A 900000            MOV    DPTR,#0
  606. 043D 7848            MOV    R0,#TypeSW
  607. 043F 1204E5            LCALL    SendByteI2C        ; Envoi adresse 1ere sortie
  608. 0442 120488            LCALL    StartI2C        ; Start I2C
  609. 0445 74A1            MOV    A,#EEPROM+1
  610. 0447 1204E5            LCALL    SendByteI2C        ; Envoi adresse EEPROM (RD)
  611.                 
  612. 044A 1204F1    Init_Type    LCALL    RecByteI2C        ; Lecture de la sorrtie 
  613. 044D 120500            LCALL    AckI2C            ; Acquitte la lecture
  614. 0450 F6                MOV    @R0,A            ; Sauve l'état de la sortie
  615. 0451 F0                MOVX    @DPTR,A            ; Ecriture sur la sortie
  616. 0452 08                INC    R0
  617. 0453 A3                INC    DPTR
  618. 0454 DDF4            DJNZ    R5,Init_Type
  619.                 
  620. 0456 1204F1            LCALL    RecByteI2C
  621. 0459 1204CE            LCALL    StopI2C
  622. 045C 22                RET
  623.         
  624.         ;---------------------------------------------------------------------------
  625.         ; Lecture des type de SW et envoi par série
  626.         
  627. 045D 7914    AffTypeSW    MOV    R1,#20
  628. 045F 7848            MOV    R0,#TypeSW
  629. 0461 C299            CLR    TI
  630. 0463 E6        AffTyp1        MOV    A,@R0
  631. 0464 B40005            CJNE    A,#00,AffTyp2
  632. 0467 759949            MOV    SBUF,#'I'
  633. 046A 816F            AJMP    AffTyp3
  634. 046C 759950    AffTyp2        MOV    SBUF,#'P'
  635. 046F 3099FD    AffTyp3        JNB    TI,$
  636. 0472 C299            CLR    TI
  637. 0474 75990A            MOV    SBUF,#10
  638. 0477 3099FD            JNB    TI,$
  639. 047A C299            CLR    TI
  640. 047C 75990D            MOV    SBUF,#13
  641. 047F 3099FD            JNB    TI,$
  642. 0482 C299            CLR    TI
  643. 0484 08                INC    R0
  644. 0485 D9DC            DJNZ    R1,AffTyp1
  645. 0487 22                RET
  646.                 
  647.                 
  648.                 
  649.         ;---------------------------------------------------------------------------        
  650.         #include "L:I2C.LIB"
  651.         ;╔══════════════════════════════════════════════════════════════════════════╗
  652.         ;║             Routine de gestion du bus I2C de Philips                     ║
  653.         ;║         Dévelloppement et réalisation : ADAM Etienne  (c) 1994           ║
  654.         ;╚══════════════════════════════════════════════════════════════════════════╝
  655.         ; ┌──────────────┬───────────┬───────────┬──────────────────────────────────┐
  656.         ; │      Nom     │   Entree  │  Sortie   │           Remarques              │
  657.         ; ├──────────────┼───────────┼───────────┼──────────────────────────────────┤
  658.         ; │ StartI2C     │    Néan   │  Néan     │ Place une condition de départ sur│
  659.         ; │              │           │           │ le bus I2C. Les broches utilisées│
  660.         ; │              │           │           │ sont définies par SCL et SDA     │
  661.         ; ├──────────────┼───────────┼───────────┼──────────────────────────────────┤
  662.         ; │ StopI2C      │    Néan   │  Néan     │ Condition de fin sur le bus I2C  │
  663.         ; ├──────────────┼───────────┼───────────┼──────────────────────────────────┤
  664.         ; │ SendByteI2C  │ A = byte  │  Néan     │ Envoye le contenu de l'accu par  │
  665.         ; │              │           │           │ le bus I2C.                      │
  666.         ; │              │           │           │ Si le device n'acquitte pas,     │ 
  667.         ; │              │           │           │ le bit Carry est positionné. C=1 │
  668.         ; │              │           │           │ ! Le régistre R7 est modifié !   │
  669.         ; ├──────────────┼───────────┼───────────┼──────────────────────────────────┤
  670.         ; │ RecByteI2C   │   Néan    │  A = byte │ Lit un byte par le bus I2C et    │ 
  671.         ; │              │           │           │ renvoye la valeur dans l'accu    │ 
  672.         ; │              │           │           │ ! Le régistre R7 est modifié !   │
  673.         ; ├──────────────┼───────────┼───────────┼──────────────────────────────────┤
  674.         ; │ AckI2C       │   Néan    │  Néan     │ Envoye un bit d'acquittement     │
  675.         ; └──────────────┴───────────┴───────────┴──────────────────────────────────┘
  676.         ;  
  677.         ; EEPROM  EQU     10100000B     ; ADRESSE DE BASE D'UNE X2404             
  678.         
  679. 00B3 =        SDA     EQU     0B3H            ;  (pin 13)
  680. 00B2 =        SCL     EQU     0B2H            ;  (pin 12)
  681.         
  682. 0488 D2B2    StartI2C        SETB    SCL
  683. 048A D2B3            SETB    SDA
  684. 048C 00                NOP
  685. 048D 00                NOP
  686. 048E 00                NOP
  687. 048F 00                NOP
  688. 0490 00                NOP
  689. 0491 00                NOP
  690. 0492 C2B3            CLR     SDA
  691. 0494 00                NOP
  692. 0495 00                NOP
  693. 0496 00                NOP
  694. 0497 00                NOP
  695. 0498 00                NOP
  696. 0499 C2B2            CLR     SCL
  697. 049B 20B2FD            JB      SCL,$
  698. 049E 00                NOP
  699. 049F 22                RET
  700.               
  701. 04A0 92B3    SendBitI2C      MOV     SDA,C
  702. 04A2 00                NOP
  703. 04A3 00                NOP
  704. 04A4 D2B2            SETB    SCL
  705. 04A6 30B2FD    SendWS          JNB     SCL,SendWS      ; ATTEND FIN DE WAIT STATE DEVICE
  706. 04A9 00                NOP
  707. 04AA 00                NOP
  708. 04AB 00                NOP
  709. 04AC 00                NOP
  710. 04AD 00                NOP
  711. 04AE 00                NOP
  712. 04AF 00                NOP
  713. 04B0 00                NOP
  714. 04B1 C2B2            CLR     SCL
  715. 04B3 00                NOP
  716. 04B4 D2B3            SETB    SDA
  717. 04B6 00                NOP
  718. 04B7 22                RET
  719.                 
  720. 04B8 7400    ReceiveBitI2C   MOV     A,#0
  721. 04BA D2B2            SETB    SCL
  722. 04BC 30B2FD    RecWS           JNB     SCL,RecWS       ; ATTEND FIN WAIT STATE DEVICE                
  723. 04BF 00                NOP
  724. 04C0 A2B3            MOV     C,SDA
  725. 04C2 33                RLC     A               ; lit 2 fois la ligne SDA
  726. 04C3 A2B3            MOV     C,SDA
  727. 04C5 33                RLC     A
  728. 04C6 C3                CLR     C               ; met le Carry = 0 si bit = 0
  729. 04C7 C2B2            CLR     SCL
  730. 04C9 00                NOP
  731. 04CA 6001            JZ      FinReceiveBit
  732. 04CC D3                SETB    C               ; met le carry = 1 si bit = 1
  733. 04CD 22        FinReceiveBit   RET
  734.         
  735. 04CE C2B3    StopI2C         CLR     SDA
  736. 04D0 00                NOP
  737. 04D1 00                NOP
  738. 04D2 00                NOP
  739. 04D3 D2B2            SETB    SCL
  740. 04D5 30B2FD    StopWS          JNB     SCL,StopWS      ; ATTEND FIN WAIT STATE DEVICE
  741. 04D8 00                NOP
  742. 04D9 00                NOP
  743. 04DA 00                NOP
  744. 04DB 00                NOP
  745. 04DC 00                NOP
  746. 04DD D2B3            SETB    SDA
  747. 04DF 00                NOP
  748. 04E0 00                NOP
  749. 04E1 00                NOP
  750. 04E2 00                NOP
  751. 04E3 00                NOP
  752. 04E4 22                RET
  753.         
  754. 04E5 7F08    SendByteI2C     MOV     R7,#8
  755. 04E7 33        SbI2C           RLC     A
  756. 04E8 1204A0            LCALL   SendBitI2C
  757. 04EB DFFA            DJNZ    R7,SbI2C
  758. 04ED 1204B8            LCALL   ReceiveBitI2C
  759. 04F0 22                RET
  760.         
  761. 04F1 7F08    RecByteI2C      MOV     R7,#8
  762. 04F3 7400            MOV     A,#0
  763. 04F5 C0E0    RbyteI2C        PUSH    ACC
  764. 04F7 1204B8            LCALL   ReceiveBitI2C
  765. 04FA D0E0            POP     ACC
  766. 04FC 33                RLC     A
  767. 04FD DFF6            DJNZ    R7,RbyteI2C
  768. 04FF 22                RET
  769.         
  770. 0500 C3        AckI2C          CLR     C
  771. 0501 91A0            ACALL   SendBitI2C
  772. 0503 22                RET
  773.         
  774.         
  775.         ;---------------------------------------------------------------------------
  776.         ; Messages   Messages   Messages   Messages   Messages   Messages  Messages
  777.         ;---------------------------------------------------------------------------
  778.         ;
  779. 0504 436F6E6E65
  780. 0509 6374696F6E
  781. 050E 2061203438
  782. 0513 3030206261
  783. 0518 7564732C20
  784. 051D 3820626974
  785. 0522 732C207061
  786. 0527 7320646520
  787. 052C 7061726974
  788. 0531 652C203120
  789. 0536 73746F70    Welcome         DM      "Connection a 4800 bauds, 8 bits, pas de parite, 1 stop"
  790. 053A 0A0D0A0D            DB      10,13,10,13
  791. 053E 43656E7472
  792. 0543 616C652064
  793. 0548 2765636C61
  794. 054D 6972616765
  795. 0552 2041452D31
  796. 0557 33352E2020
  797. 055C 436F707977
  798. 0561 7269746520
  799. 0566 4144414D20
  800. 056B 452E203139
  801. 0570 3936            DM      "Centrale d'eclairage AE-135.  Copywrite ADAM E. 1996"
  802. 0572 0A0D0A0D            DB      10,13,10,13
  803. 0576 456E206174
  804. 057B 74656E6465
  805. 0580 2064652063
  806. 0585 6F6D6D616E
  807. 058A 64652E2028
  808. 058F 3F203D2061
  809. 0594 69646529            DM      "En attende de commande. (? = aide)"
  810. 0598 0A0D            DB      10,13
  811. 059A 41452D3133
  812. 059F 353E            DM      "AE-135>"
  813. 05A1 00                DB      0
  814.         
  815. 05A2 4169646520
  816. 05A7 6465732063
  817. 05AC 6F6D6D616E
  818. 05B1 6465206465
  819. 05B6 206C612063
  820. 05BB 656E747261
  821. 05C0 6C65206427
  822. 05C5 65636C6169
  823. 05CA 72616765    TextHelp        DM      "Aide des commande de la centrale d'eclairage"
  824. 05CE 0A0D0A0D            DB      10,13,10,13
  825.         ;        DM      "a   =   Allume une sortie"
  826.         ;        DB      10,13
  827.         ;        DM      "e   =   Etteint une sortie"   
  828.         ;        DB      10,13
  829. 05D2 732020203D
  830. 05D7 2020205479
  831. 05DC 7065206465
  832. 05E1 20736F7274
  833. 05E6 6965202849
  834. 05EB 6E74657272
  835. 05F0 7570746575
  836. 05F5 72202F2042
  837. 05FA 6F75746F6E
  838. 05FF 20706F7573
  839. 0604 736F697229            DM    "s   =   Type de sortie (Interrupteur / Bouton poussoir)"
  840. 0609 0A0D            DB    10,13
  841. 060B 642020203D
  842. 0610 2020205072
  843. 0615 6F6772616D
  844. 061A 6D6174696F
  845. 061F 6E20706F75
  846. 0624 7220616C61
  847. 0629 726D65            DM    "d   =   Programmation pour alarme"
  848. 062C 0A0D            DB    10,13
  849. 062E 742020203D
  850. 0633 2020204368
  851. 0638 616E676520
  852. 063D 6C27657461
  853. 0642 7420642775
  854. 0647 6E6520736F
  855. 064C 72746965            DM      "t   =   Change l'etat d'une sortie"
  856. 0650 0A0D00            DB      10,13,0
  857.         
  858. 0653 0A0D    Prompt          DB      10,13
  859. 0655 41452D3133
  860. 065A 353E            DM      "AE-135>"
  861. 065C 00                DB      0
  862.         
  863. 065D 0A0D    TextChanel      DB      10,13
  864. 065F 43616E616C
  865. 0664 206E2E3A20
  866. 0669 28312D3335
  867. 066E 29                DM      "Canal n.: (1-35)"
  868. 066F 00                DB      0
  869.         
  870. 0670 0A0D00    Txt_CRLF        DB      10,13,0
  871.         
  872. 0673 0A0D    Txt_TypeSW    DB    10,13
  873. 0675 69203D2049
  874. 067A 6E74657272
  875. 067F 7570746575
  876. 0684 7220202020
  877. 0689 202070203D
  878. 068E 20626F7574
  879. 0693 6F6E20506F
  880. 0698 7573736F69
  881. 069D 72                DM    "i = Interrupteur      p = bouton Poussoir"
  882. 069E 0A0D00            DB    10,13,0
  883.         
  884. 06A1 0A0D    Txt_DefAlarm    DB    10,13
  885. 06A3 61203D204F
  886. 06A8 4E20736920
  887. 06AD 616C61726D
  888. 06B2 2020202020
  889. 06B7 20206E203D
  890. 06BC 204F464620
  891. 06C1 736920616C
  892. 06C6 61726D            DM    "a = ON si alarm       n = OFF si alarm"
  893. 06C9 0A0D00            DB    10,13,0            
  894.         
  895. 06CC =        Tab_Code        EQU     $
  896. 06CC 78        BP1     DB      01111000b
  897. 06CD 74        BP2     DB      01110100b
  898. 06CE 72        BP3     DB      01110010b
  899. 06CF 71        BP4     DB      01110001b
  900. 06D0 3C        BP5     DB      00111100b
  901. 06D1 6C        BP6     DB      01101100b
  902. 06D2 6A        BP7     DB      01101010b
  903. 06D3 66        BP8     DB      01100110b
  904. 06D4 65        BP9     DB      01100101b
  905. 06D5 63        BP10    DB      01100011b
  906. 06D6 5C        BP11    DB      01011100b
  907. 06D7 5A        BP12    DB      01011010b
  908. 06D8 59        BP13    DB      01011001b
  909. 06D9 56        BP14    DB      01010110b
  910. 06DA 55        BP15    DB      01010101b
  911. 06DB 53        BP16    DB      01010011b
  912. 06DC 4E        BP17    DB      01001110b
  913. 06DD 4D        BP18    DB      01001101b
  914. 06DE 4B        BP19    DB      01001011b
  915. 06DF 47        BP20    DB      01000111b
  916. 06E0 3C        BP21    DB    00111100b
  917. 06E1 3A        BP22    DB    00111010b
  918. 06E2 39        BP23    DB    00111001b
  919. 06E3 36        BP24    DB    00110110b
  920. 06E4 35        BP25    DB    00110101b
  921. 06E5 33        BP26    DB    00110011b
  922. 06E6 2E        BP27    DB    00101110b
  923. 06E7 2D        BP28    DB    00101101b
  924. 06E8 2B        BP29    DB    00101011b
  925. 06E9 27        BP30    DB    00100111b
  926. 06EA 1E        BP31    DB    00011110b
  927. 06EB 1D        BP32    DB    00011101b
  928. 06EC 1B        BP33    DB    00011011b
  929. 06ED 17        BP34    DB    00010111b
  930. 06EE 1F        BP35    DB    00011111b
  931.         
  932. 06EF             END
  933.  
  934. passe 2 ok
  935.  
  936.  /////////////////   TABLE  DES  SYMBOLES  UTILISATEUR    \\\\\\\\\\\\\\\\\\\
  937.  
  938. AckI2C                            0500 AffTyp1                           0463
  939. AffTyp2                           046C AffTyp3                           046F
  940. AffTypeSW                         045D Alarm                             02A6
  941. AlarmSW_EEPROM                    0050 Alarm_Bcl                         02C6
  942. Alarm_ON                          02AA BP1                               06CC
  943. BP10                              06D5 BP11                              06D6
  944. BP12                              06D7 BP13                              06D8
  945. BP14                              06D9 BP15                              06DA
  946. BP16                              06DB BP17                              06DC
  947. BP18                              06DD BP19                              06DE
  948. BP2                               06CD BP20                              06DF
  949. BP21                              06E0 BP22                              06E1
  950. BP23                              06E2 BP24                              06E3
  951. BP25                              06E4 BP26                              06E5
  952. BP27                              06E6 BP28                              06E7
  953. BP29                              06E8 BP3                               06CE
  954. BP30                              06E9 BP31                              06EA
  955. BP32                              06EB BP33                              06EC
  956. BP34                              06ED BP35                              06EE
  957. BP4                               06CF BP5                               06D0
  958. BP6                               06D1 BP7                               06D2
  959. BP8                               06D3 BP9                               06D4
  960. ChType1                           03B5 ChType2                           03DE
  961. ChangeTypeSW                      03AD DPH_232                           0024
  962. DPL_232                           0023 Debut                             0100
  963. DefAlarm1                         0371 DefAlarm2                         0393
  964. DefSortieAlarm                    0369 EEPROM                            00A0
  965. EOT                               0003 FinIntr                           01EA
  966. FinReceiveBit                     04CD FinSnd2                           022B
  967. FinSndTxt                         0213 Fin_ChType                        03FE
  968. Fin_DefAlarm                      03AC Fin_Gestion                       02A5
  969. Fin_IntrT0                        0273 Fin_Tog                           0344
  970. Flag1                             0000 Flag2                             0001
  971. Flag3                             0002 Flag4                             0004
  972. Gestion_1                         0285 Gestion_2                         028A
  973. Gestion_4                         029B Gestion_5                         02A2
  974. Gestion_BP                        027A InitIntr                          0123
  975. InitRS232                         012A InitSorties                       03FF
  976. InitTimer0                        0144 InitTypeSW                        042E
  977. Init_Bcl                          041B Init_Type                         044A
  978. IntrReceive                       01AB IntrSend                          01F5
  979. IntrSerie                         01A5 IntrT0                            022E
  980. Intr_0                            0251 Intr_1                            0259
  981. Intr_2                            0260 Intr_3                            026B
  982. Intr_Alarm                        0270 LECTCH0                           02E9
  983. LECTCh1                           02F5 Last_Code                         0022
  984. LectChanel                        02E1 MemoOut                           0025
  985. NextSnd                           0215 OFF_Sortie                        0368
  986. ON_Sortie                         0367 Prompt                            0653
  987. RbyteI2C                          04F5 RecByteI2C                        04F1
  988. RecWS                             04BC ReceiveBitI2C                     04B8
  989. ResetSorties                      0190 RstOut1                           0197
  990. RstOut3                           019F SCL                               00B2
  991. SDA                               00B3 SbI2C                             04E7
  992. SendBitI2C                        04A0 SendByteI2C                       04E5
  993. SendTxt                           0182 SendTxt2                          021C
  994. SendWS                            04A6 Send_CRLF                         016D
  995. Send_Val                          014D SerieCase1                        01BC
  996. SerieCase2                        01C1 SerieCase3                        01C6
  997. SerieCase4                        01D1 SerieCase5                        01DC
  998. SerieCase6                        01E7 StartI2C                          0488
  999. StopI2C                           04CE StopWS                            04D5
  1000. Stop_Grad                         0345 Stop_Grad1                        034D
  1001. Stop_Grad2                        035C TMP                               0021
  1002. TOG_Sortie                        030E Tab_Code                          06CC
  1003. TextChanel                        065D TextHelp                          05A2
  1004. Tog_1                             0322 Txt_CRLF                          0670
  1005. Txt_DefAlarm                      06A1 Txt_TypeSW                        0673
  1006. TypeSW                            0048 TypeSW_EEPROM                     0025
  1007. V24SPD                            00F3 Wait                              02D7
  1008. Welcome                           0504 t10msH                            00D8
  1009. t10msL                            00F0
  1010.  
  1011.