ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng)/ProfitPress-MegaCDROM2.B6I/MAGAZINE/MISC/PCTV1N1.ZIP/REBOOT.SRC

Text File | 1989-07-15 | 299 b | 10 lines

PROCEDURE Reboot(Warm : Boolean);

BEGIN
  { Warm = True triggers warm boot with no memory test: }
  IF Warm THEN MEMW[$0040:$0072] := $1234
  { Warm = False triggers cold boot with full memory test: }
    ELSE MEMW[$0040:$0072] := 0;
  INLINE($EA/$00/$00/$FF/$FF);    { JMP FFFF:0 }
END;