update to Ursula service format

Version

@@ -65,8 +65,8 @@
 
         ; REMEMBER TO UPDATE VERSION IN MESSAGES FILE
 
-Version SETA    034             ; 000
-VString SETS    "0.34"          ; "0.00" 
-Date    SETS    "29 May 1997"   ; "Development"
+Version SETA    035
+VString SETS    "0.35"       
+Date    SETS    "15 Apr 1998"
 
         END        

s/Module

@@ -130,7 +130,37 @@ Mod_PathDefault DCB     "Resources:$.Resources.Display.",0
 ;---------------------------------------------------------------------------
 ;       Service call handler.
 ;
+;Ursula format
+;
+        ASSERT  Service_Reset              < Service_ModeChange
+        ASSERT  Service_ModeChange         < Service_StartWimp
+        ASSERT  Service_StartWimp          < Service_StartedWimp
+        ASSERT  Service_StartedWimp        < Service_CalibrationChanged
+        ASSERT  Service_CalibrationChanged < Service_WimpPalette
+        ASSERT  Service_WimpPalette        < Service_MessageFileClosed
+        ASSERT  Service_MessageFileClosed  < Service_ResourceFSStarting
+        ASSERT  Service_ResourceFSStarting < Service_ModeFileChanged
+;
+UServTab
+        DCD     0
+        DCD     UService - Module_BaseAddr
+        DCD     Service_Reset
+        DCD     Service_ModeChange
+        DCD     Service_StartWimp
+        DCD     Service_StartedWimp
+        DCD     Service_CalibrationChanged
+        DCD     Service_WimpPalette
+  [ MessageChanging
+        DCD     Service_MessageFileClosed
+  ]
+  [ standalone
+        DCD     Service_ResourceFSStarting
+  ]
+        DCD     Service_ModeFileChanged
+        DCD     0
+        DCD     UServTab - Module_BaseAddr
 Mod_Service
+        MOV     r0, r0
         TEQ     r1, #Service_StartWimp
         TEQNE   r1, #Service_StartedWimp
         TEQNE   r1, #Service_Reset
@@ -145,7 +175,7 @@ Mod_Service
         TEQNE   r1, #Service_MessageFileClosed
   ]
         MOVNES  pc, lr
-
+UService
         TEQ     r1, #Service_StartWimp
         BEQ     svc_startwimp