1*----------------------------------------------------------------------- 2* Copyright (C) 2000-2004 GFD Dennou Club. All rights reserved. 3*----------------------------------------------------------------------- 4 SUBROUTINE SZTXZV(VX,VY,CHARS) 5 6 CHARACTER CHARS*(*) 7 8 9 CALL SZTXWV(VX,VY,CHARS) 10 11 END 12