| 1 |
james |
19 |
| > !Territory.!Run |
| 2 |
|
|
|
| 3 |
|
|
If "<Territory$Dir>" = "" Then Set Run$Path <Obey$Dir>.Library.,<Run$Path> |
| 4 |
|
|
Set Territory$Dir <Obey$Dir> |
| 5 |
|
|
|
| 6 |
|
|
| Open directory if in desktop |
| 7 |
|
|
If "<Wimp$State>" = "desktop" Then Filer_OpenDir <Obey$Dir>.Terrs |
| 8 |
|
|
If "<Wimp$State>" = "desktop" Then Obey |
| 9 |
|
|
|
| 10 |
|
|
| Check if territories have been loaded |
| 11 |
|
|
RMEnsure DummyTerritory 1.00 Repeat RMLoad <Territory$Dir>.Messages |
| 12 |
|
|
|
| 13 |
|
|
| Replace territory manager messages file |
| 14 |
|
|
Set TerritoryManager$Path <Territory$Dir>.Utils. |
| 15 |
|
|
RMReInit TerritoryManager |
| 16 |
|
|
|
| 17 |
|
|
| Select territory |
| 18 |
|
|
WimpSlot -min 32K -max 32K |
| 19 |
|
|
Run <Obey$Dir>.Utils.Choose |
| 20 |
|
|
|
| 21 |
|
|
| Load territory |
| 22 |
|
|
Set Territory$Path <Territory$Dir>.Terrs.!<Territory$Name>. |
| 23 |
|
|
If "<Boot$OSVersion>" <> "" Then IfThere Territory:<Boot$OSVersion> Then Run Territory:<Boot$OSVersion> |
| 24 |
|
|
Run Territory:!Run |