home *** CD-ROM | disk | FTP | other *** search
/ Lion Share / lionsharecd.iso / utils_mz / v11n05.zip / REBOOT.BAS < prev    next >
BASIC Source File  |  1991-03-29  |  468b  |  15 lines
  1. DECLARE SUB ReBoot (Warm%)
  2.  
  3. CALL ReBoot(1)      'be sure to save this program before running it!
  4.  
  5. SUB ReBoot (Warm%) STATIC
  6.   IF Warm% THEN                 'if they want a warm boot
  7.     DEF SEG = 0                 'assign the value 1234 Hex
  8.     POKE &H473, &H12            'to address 0000:0473 Hex
  9.     POKE &H472, &H34
  10.   END IF
  11.   DEF SEG = &HFFFF              'either way call the BIOS
  12.   CALL Absolute(0)              'routine at FFFF:0000 Hex
  13. END SUB
  14.  
  15.