TEXT   229
DECLARE SUB ReBoot
Guest on 6th December 2024 12:23:33 AM


  1. REM From PC Mag, Vol11 Number 5
  2.  
  3. DECLARE SUB ReBoot (Warm%)
  4.  
  5. CALL ReBoot(1)      'be sure to save this program before running it!
  6.  
  7. SUB ReBoot (Warm%) STATIC
  8.   IF Warm% THEN                 'if they want a warm boot
  9.     DEF SEG = 0                 'assign the value 1234 Hex
  10.     POKE &H473, &H12            'to address 0000:0473 Hex
  11.     POKE &H472, &H34
  12.   END IF
  13.   DEF SEG = &HFFFF              'either way call the BIOS
  14.   CALL Absolute(0)              'routine at FFFF:0000 Hex
  15. END SUB
Raw Paste

Login or Register to edit or fork this paste. It's free.