ntvdm -r:. -c tpc %1.pas  /$S- /GD