**************************************************
  1)  START.MAC;4
   47   ;
***************
  2)  START.MAC;14
   47   ;                        
   48   ; RM SYSTEMS,MAY 1979 HAS MADE MODIFICATIONS TO DELETE ALL 
   49   ; INTERMEDIATE FILES GENERATED WHEN A "TOP OF FILE " COMMAND
   50   ; IS USED.CHANGES HAVE ALSO BEEN MADE TO DELETE TEMP.SAV FILES
   51   ;GENERATED BY THE "SAVE" COMMAND IF NO NAME IS ENTERED.
   52   ; THE DELETION OCCURS UPON TERMINATION OF EDIT AND DOES NOT
   53   ; AFFECT THE OPERATION OTHERWISE.
   54   ; CHANGES WERE MADE IN BOTTM,START,UNSAV,EDIMP, AND MSCCM
   55   ;
   56   ;
   57   ;
   58   ;       RM SYSTEMS************  MAY,1978
   59   ;           CHANGES MADE TO PROVIDE FOR DELETION OF INTERNAL
   60   ;           FILES AND UNNAMED TEMPORARY SAVE FILES.
   61   ;           CHANGES ARE MARKED WITH **RMS**/DATE    
   62   ;
**************************************************
  1)  START.MAC;4
  108   ;
  109   STRTS::
  110   	.IF DF	IAS
  111   	CALL	.TIDY		;CLOSE UNWANTED FILES
  112   	JMP	BOTT13		;
  113   	.IFF
  114   	JSR	R0,TYPED	;ANNOUNCE PRESENCE ON RESTARTS
  115   	MSG0
  116   	CLR 	-(SP)
  117   	.ENDC
  118   NOPRMT:	CALL	.TIDY1		;CLOSE OUT ANY FILES FROM PREVIOUS EDIT
***************
  2)  START.MAC;14
  123   ;*************************RMS 001 **********************************
  124   ;THESE CHANGES ALLOW EDI TO BE CALLED WITHOUT A FILE NAME ON THE 
  125   ;INPUT LINE.  
  126   ;
  127   ;
  128   STRTS::
  129   	;   .IF DF	IAS
  130   	;    CALL	.TIDY		;CLOSE UNWANTED FILES
  131   	;    JMP	BOTT13		;
  132   	;    .IFF
  133   	JSR	R0,TYPED	;ANNOUNCE PRESENCE ON RESTARTS
  134   	MSG0
  135   	CLR 	-(SP)
  136   	;    .ENDC
  137   ;***************************RMS**************************************
  138   NOPRMT:	CALL	.TIDY1		;CLOSE OUT ANY FILES FROM PREVIOUS EDIT
**************************************************
  1)  START.MAC;4
  148   3$:	MOV	VERFLG,INPVER	;SAVE INPUT FILE VERSION NUMBER FLAG
  149   ONED::	MOV	#INFILN,R0	;GET ADDRESS OF INPUT FILE NAME
***************
  2)  START.MAC;14
  168           BNE     ONED            ;YES, A NO. VER COUNT IS IN **RMS*^5/79
  169   3$:      MOV     INFILN+10,INPVER ;SAVE INPUT FILE VERSION #  **RMS**5/79
  170           MOV     VERFLG,OUTVER  ;ASSUME VERSION IS INPUT    **RMS**5/79
  171           TST     VERFLG         ;WAS A VERSION REQUESTED?   **RMS**5/79
  172           BNE     ONED            ;YES, ALREADY HAS COUNT     **RMS**5/79
  173           MOV     INPVER,OUTVER   ;NO, USE SAME COUNT FOR OUTFILE MS**
  174   ONED::	MOV	#INFILN,R0	;GET ADDRESS OF INPUT FILE NAME
**************************************************
  1)  START.MAC;4
  155   	TST	VERFLG		;VERSION SET?
  156   	BEQ	OKNSF		;IF EQ NO
  157   	MOV	VERFLG,OUTFIL+10 ;DON'T OPEN OUTPUT FILE WITH VERSION
  158   	BR	OKNSF
  159   .NSF::
  160   	BIS	#NOINFL,(R5)	;REMEMBER THAT THERE IS NO INPUT FILE
  161   	BR	NOINP
***************
  2)  START.MAC;14
  180           MOV     OUTVER,OUTFIL+10 ;OPEN OUTPUT FILE--NO VER  **RMS**5/79
  181           BR      OKNSF
  182   .NSF::
  183   	BIS	#NOINFL,(R5)	;REMEMBER THAT THERE IS NO INPUT FILE
  184           CLR     INPVER          ;ZERO INDICATES NO ORIGINAL VER.**RM**79
  185   	BR	NOINP

    4 DIFFERENCES FOUND
START.CMP=[320,13]START,[120,14]START