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 |