home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1989 / 08 / grdlagen / hcf.ass < prev    next >
Encoding:
Text File  |  1989-05-31  |  1.3 KB  |  72 lines
  1. ;********************************************************;
  2. ;*                   HCF.ASS                            *;
  3. ;*         Programm HCF - DEBUGger-Code                 *;
  4. ;*    (C) 1989 by Matthias Nadenau & TOOLBOX            *;
  5. ;********************************************************;
  6.  
  7. a
  8. ; Registersicherung
  9.     push ds
  10.     push es
  11.     push bx
  12.     push cx
  13.     push dx
  14. ; Segmentadresse von HC-INT erfragen
  15.     mov ah, 35
  16.     mov al, 5
  17.     int 21
  18. ; Erkennungszeichen von HC-INT testen
  19.     es:
  20.     cmp word ptr [100], bde9
  21.     jne 160 ; falls Fehler
  22.     es:
  23.     cmp word ptr [102], 5000
  24.     jne 160 ; falls Fehler
  25.     es:
  26.     cmp word ptr [104], 8c1e
  27.     jne 160 ; falls Fehler
  28. ; Speicherbereich freigeben
  29.     mov ah, 49
  30.     int 21
  31. ; alten Interrupt restaurieren
  32.     push ds
  33.     es:
  34.     mov dx, [1b6]
  35.     es:
  36.     mov ds, [1b4]
  37.     mov al, 5
  38.     mov ah, 25
  39.     int 21
  40.     pop ds
  41. ; zum Programmende springen
  42.     jmp 180
  43.  
  44. a 160
  45. ; Ausgabe der Fehlermeldung
  46.     mov ah, 9
  47.     mov dx, 200
  48.     int 21
  49.     jmp 180
  50.  
  51. a 180
  52. ; allgemeiner Programmabschluß
  53.     pop dx
  54.     pop cx
  55.     pop bx
  56.     pop es
  57.     pop ds
  58.     int 20
  59.  
  60. e 200
  61. 48 43 2d 49 6e 74 65 72 72 75 70 74 20 6b 61 6e
  62. e 210
  63. 6e 20 6e 69 63 68 74 20 67 65 6c 94 73 63 68 74
  64. e 220
  65. 20 77 65 72 64 65 6e 21 24 24 24 24 24 24 24 24
  66.  
  67. r cx
  68. 250
  69. n hcf.com
  70. w
  71. q
  72.