REAL*8 XS,YS,TXSCAL
	  INTEGER IRGB,IDDSW
      COMMON  /TXFRM/  XS, YS, TXSCAL,IRGB,IDDSW