ticksetstyle.class

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

//				ticksetstyle
*! version 1.0.0  09sep2002

version 8

class {

    instance:
	numticks	= .numticks_g.new			// suggested

	tickstyle	 = .tickstyle.new
	tickangle	 = .anglestyle.new 		// , style(horizontal) 

	alternate	= .yesno.new
	alternate_gap	= .gsize.new

	gridstyle	= .gridstyle.new

	use_labels	= .yesno.new

}, inherit(style)


//---------------------------------------------------------------------------
program define new
						// composite style defaults
	syntax [ , Style(string) * ]
	if "`style'" == "" {
		.setstyle , style(scheme)
	}

	.Super.new `0'
end