home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 16 / CD_ASCQ_16_0994.iso / maj / 2242 / ecran.asm < prev    next >
Assembly Source File  |  1994-01-20  |  701b  |  39 lines
  1.         GOSBVL  SAVE_REG
  2.  
  3.         ; Chargement Adresse écran
  4.         ; Ligne 0 dans D0
  5.  
  6.         D0=     $7050E
  7.         A=DAT0  A
  8.         D0=A    
  9.  
  10.         ; Ligne 1  dans D1
  11.         LCHEX   #00022
  12.         A=A+C   A
  13.         D1=A
  14.  
  15.         ; Compteur dans C.A
  16.         LCHEX   #63
  17.  
  18. L0:     A=DAT1  W
  19.         DAT0=A  W
  20.         D0=D0+  16
  21.         D1=D1+  16
  22.         C=C-1   B
  23.         ?C<>0   B
  24.         GOYES   L0
  25.  
  26.         ; A la fin D0 pointe sur la derniere ligne
  27.         LAHEX   #0000000000000000
  28.         DAT0=A  W
  29.  
  30.         D0=D0+  16
  31.         DAT0=A  W
  32.         D0=D0+  16
  33.         DAT0=A  B
  34.  
  35.         GOSBVL  LOAD_REG
  36.         A=DAT0  A
  37.         D0=D0+  5
  38.         PC=(A)
  39.