Ursula service call table added

s/Module

@@ -223,7 +223,23 @@ ExitInitialisation
         STRVS   r0, [ sp ]
         Pull    "r0-r4, pc"
 
+ServiceTable
+        DCD     0
+        DCD     ServiceMain - Origin
+
+        DCD     Service_UKCommand               ; Don't forget - ascending order required
+        DCD     Service_Reset
+        DCD     Service_FSRedeclare
+        DCD     Service_EconetDying
+        [       :LNOT: OldOs
+        DCD     Service_TerritoryStarted
+        DCD     Service_Portable
+        ]
+        DCD     0
+
+        DCD     ServiceTable - Origin
 Service ROUT
+        MOV     r0, r0
         TEQ     r1, #Service_FSRedeclare
         TEQNE   r1, #Service_UKCommand
         TEQNE   r1, #Service_EconetDying
@@ -233,6 +249,7 @@ Service ROUT
         TEQNE   r1, #Service_TerritoryStarted
         ]
         MOVNE   pc, lr
+ServiceMain
         TEQ     r1, #Service_FSRedeclare
         BEQ     RedeclareFilingSystem
         LDR     wp, [ r12 ]