Quite some minor changes to have the two C128 TGI driver source files only differ where they are semantically different.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4552 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/c128/c128-640-200-2.s

@@ -453,8 +453,8 @@ SETPALETTE:
 	ora	COLTRANS,y
 
 	ldx	#VDC_COLORS
-       	jsr     VDCWriteReg     ; Clear error code
-        lda     #TGI_ERR_OK
+       	jsr     VDCWriteReg
+        lda     #TGI_ERR_OK     ; Clear error code
         sta     ERROR
         rts
 
@@ -881,6 +881,7 @@ HORLINE:
 
 @L5:	jmp	HORLINE
 
+
 ; ------------------------------------------------------------------------
 ; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in X and Y
 ; direction is passend in X/Y, the text direction is passed in A.

libsrc/c128/c128-640-480-2.s

@@ -56,7 +56,7 @@ VDC_DATA	  = 31
 ; capabilities of the driver
 
         .byte   $74, $67, $69           ; "tgi"
-        .byte   TGI_API_VERSION         ; TGI version number
+        .byte   TGI_API_VERSION         ; TGI API version number
 xres:   .word   640                     ; X resolution
 yres:   .word   480                     ; Y resolution
         .byte   2                       ; Number of drawing colors
@@ -123,7 +123,7 @@ BITMASK:        .res    1       ; $00 = clear, $FF = set pixels
 
 OLDCOLOR:	.res	1	; colors before entering gfx mode
 
-; Line routine stuff (combined with CIRCLE to save space)
+; Line routine stuff
 
 COUNT:		 .res	2
 NY:		 .res	2
@@ -283,13 +283,13 @@ UNINSTALL:
 
 INIT:
 	lda	pages			; is there enough memory?
-	bne	@L11			; Jump if there is one screen
+	bne	@L1			; Jump if there is one screen
 	lda	#TGI_ERR_INV_MODE	; Error
 	bne	@L9
 
 ; Initialize variables
 
-@L11:   ldx     #$FF
+@L1:    ldx     #$FF
         stx     BITMASK
 
 ; Remeber current color value