Annotation of /archive/bootedit/BootEdit/!Main

REM > BootEdit.!Main

ON ERROR ON ERROR OFF: SYS"Hourglass_Smash": ERROR 0,"Error during initialisation: "+REPORT$+" ("+STR$ERL+")": END
SYS"Hourglass_On"
Task_Name$      = "BootEdit"
Task_ThrowBack% = TRUE

LIBRARY"JLibraries:Heap.2"
LIBRARY"JLibraries:Menu.6"
LIBRARY"JLibraries:Mess.2"
LIBRARY"JLibraries:Object.2"
LIBRARY"JLibraries:Sprite.2"
LIBRARY"JLibraries:String.1"
LIBRARY"JLibraries:Wimp.6"
LIBRARY"JLibraries:Wind.5"
LIBRARY"JLibraries:Debug.2"

PROCWimp_Init
LIBRARY"JLibraries:Libs.1": PROCLibs_Load(Task_Name$ + "Code:")
ON ERROR IF FNWimp_Error THEN END ELSE END
PROCInit
SYS"Hourglass_Off"

ON ERROR IF FNWimp_Error THEN Task_Quit% = TRUE

 WHILE NOT Task_Quit%
  PROCWimp_Poll
 ENDWHILE

ON ERROR ON ERROR OFF: ERROR 0,"Error whilst closing down: "+REPORT$+" ("+STR$ERL+")": END
PROCQuit
PROCWimp_Close
END
1	james	25	REM > BootEdit.!Main
2
3			ON ERROR ON ERROR OFF: SYS"Hourglass_Smash": ERROR 0,"Error during initialisation: "+REPORT$+" ("+STR$ERL+")": END
4			SYS"Hourglass_On"
5			Task_Name$ = "BootEdit"
6			Task_ThrowBack% = TRUE
7
8			LIBRARY"JLibraries:Heap.2"
9			LIBRARY"JLibraries:Menu.6"
10			LIBRARY"JLibraries:Mess.2"
11			LIBRARY"JLibraries:Object.2"
12			LIBRARY"JLibraries:Sprite.2"
13			LIBRARY"JLibraries:String.1"
14			LIBRARY"JLibraries:Wimp.6"
15			LIBRARY"JLibraries:Wind.5"
16			LIBRARY"JLibraries:Debug.2"
17
18			PROCWimp_Init
19			LIBRARY"JLibraries:Libs.1": PROCLibs_Load(Task_Name$ + "Code:")
20			ON ERROR IF FNWimp_Error THEN END ELSE END
21			PROCInit
22			SYS"Hourglass_Off"
23
24			ON ERROR IF FNWimp_Error THEN Task_Quit% = TRUE
25
26			WHILE NOT Task_Quit%
27			PROCWimp_Poll
28			ENDWHILE
29
30			ON ERROR ON ERROR OFF: ERROR 0,"Error whilst closing down: "+REPORT$+" ("+STR$ERL+")": END
31			PROCQuit
32			PROCWimp_Close
33			END