/*	System Update for NOS 2.0 (526167)		Compiler Settings:	Application Name: "System Update 2.0 (526167)"	Application Symbol: "System Update 2.0 (526167)"	Auto Close: Off		Package Name: "System Update 2.0 (526167)"	Delete Old Package on Download: On	Copy Protected: Off	Auto Remove Package: On	Use Compression: Off	Faster Compression: Off	Copyright: "Apple Computer, Inc."	Version: 1		Platform: Newton 2.1	Language: English	Compile For Debugging: Off	Ignore Native Keyword: Off	Check Global Function Calls: On	NTK 1.0 Build Rules: Off	Use stepChildren Slot: On	Suppress Byte Code: Off	Compile For Profiling: Off	Profile Native Functions: Off	Newton OS 2.0 Only: On	Faster Functions: On	Tighter Object Packing: On		Output: Auto Part*/DefineGlobalConstant('kBinCode5000,MakeBinaryFromHex("FFFFFAAE",'code));DefineGlobalConstant('kBinCCode2C4,MakeBinaryFromHex("FFFFFAAE",'code));SetPartFrameSlot('DoNotInstall,func()begin	local x3,x4,x5;		x3 := kAppName;	x4 := "This System Update cannot be installed into this Newon product. (";	x5 := Gestalt(0x01000003);	if x5.manufacturer<>0x01000000 then	begin		GetRoot():Notify(3,x3,x4&&"10579)");		return TRUE	end;	if x5.machineType <> 0x00726377 then	begin		GetRoot():Notify(3,x3,x4&&"61276)");		return TRUE;	end;	if x5.ROMVersion<>0x00020001 then	begin		GetRoot():Notify(3,x3,x4&&"61548)");		return TRUE;	end;	if x5.ROMStage <> 0x8000 then	begin		GetRoot():Notify(3,x3,x4&&"8364)");		return TRUE;	end;	return NIL;end);SetPartFrameSlot('PatchData,{	code: kBinCode5000,	symFile: NIL,});SetPartFrameSlot('PatchLoader,{	class: 'BinCFunction,	code: kBinCCode2C4,	numArgs: 4,	offset: 0x40,});InstallScript := func(partFrame,y)begin	if partFrame:PatchLoader(partFrame.patchData.code,0x1040D, 0x5000, 0) = NIL then		GetRoot():Notify(3,kAppName,			"An error has occured duting loading; probably out of memory.\nThe System Update was not installed.");	return NILend;