dot_98.dlg

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

	main.ed_stat2B.hide
	main.tx_eq2B.hide
	main.vn_stat2B.hide
	main.ed_stat2C.hide
	main.tx_eq2C.hide
	main.vn_stat2C.hide
	main.ed_stat2D.hide
	main.tx_eq2D.hide
	main.vn_stat2D.hide
	main.ed_stat2E.hide
	main.tx_eq2E.hide
	main.vn_stat2E.hide
	main.ed_stat2F.hide
	main.tx_eq2F.hide
	main.vn_stat2F.hide
END

SCRIPT main_stat2_show
BEGIN
	main.ed_stat2A.show
	main.tx_eq2A.show
	main.vn_stat2A.show
	main.ed_stat2B.show
	main.tx_eq2B.show
	main.vn_stat2B.show
	main.ed_stat2C.show
	main.tx_eq2C.show
	main.vn_stat2C.show
	main.ed_stat2D.show
	main.tx_eq2D.show
	main.vn_stat2D.show
	main.ed_stat2E.show
	main.tx_eq2E.show
	main.vn_stat2E.show
	main.ed_stat2F.show
	main.tx_eq2F.show
	main.vn_stat2F.show
END

SCRIPT main_stat2_norm
BEGIN
	script main_stat2_show
	main.sp_stat2.disable
END

SCRIPT main_stat2_perc
BEGIN
	script main_stat2_show
	main.sp_stat2.enable
END

PROGRAM main_stat2_sd
BEGIN
	call script main_stat2_norm
END
	
/* stats3 */	
LIST main_stats3_change
BEGIN
	script main_stat3_hide   
	script main_stat3_norm
	script main_stat3_norm
	script main_stat3_perc /* enable pweights, enable sp_stat1 */
	program main_stat3_sd  /* warn on pweights with this one */
	script main_stat3_norm
END

SCRIPT main_stat3_hide   
BEGIN
	main.sp_stat3.disable
	main.ed_stat3A.hide
	main.tx_eq3A.hide
	main.vn_stat3A.hide
	main.ed_stat3B.hide
	main.tx_eq3B.hide
	main.vn_stat3B.hide
	main.ed_stat3C.hide
	main.tx_eq3C.hide
	main.vn_stat3C.hide
	main.ed_stat3D.hide
	main.tx_eq3D.hide
	main.vn_stat3D.hide
	main.ed_stat3E.hide
	main.tx_eq3E.hide
	main.vn_stat3E.hide
	main.ed_stat3F.hide
	main.tx_eq3F.hide
	main.vn_stat3F.hide
END

SCRIPT main_stat3_show
BEGIN
	main.ed_stat3A.show
	main.tx_eq3A.show
	main.vn_stat3A.show
	main.ed_stat3B.show
	main.tx_eq3B.show
	main.vn_stat3B.show
	main.ed_stat3C.show
	main.tx_eq3C.show
	main.vn_stat3C.show
	main.ed_stat3D.show
	main.tx_eq3D.show
	main.vn_stat3D.show
	main.ed_stat3E.show
	main.tx_eq3E.show
	main.vn_stat3E.show
	main.ed_stat3F.show
	main.tx_eq3F.show
	main.vn_stat3F.show
END

SCRIPT main_stat3_norm
BEGIN
	script main_stat3_show
	main.sp_stat3.disable
END

SCRIPT main_stat3_perc
BEGIN
	script main_stat3_show
	main.sp_stat3.enable
END

PROGRAM main_stat3_sd
BEGIN
	call script main_stat3_norm
END


/* stats4 */
LIST main_stats4_change
BEGIN
	script main_stat4_hide   
	script main_stat4_norm
	script main_stat4_norm
	script main_stat4_perc /* enable pweights, enable sp_stat1 */
	program main_stat4_sd  /* warn on pweights with this one */
	script main_stat4_norm
END

SCRIPT main_stat4_hide   
BEGIN
	main.sp_stat4.disable
	main.ed_stat4A.hide
	main.tx_eq4A.hide
	main.vn_stat4A.hide
	main.ed_stat4B.hide
	main.tx_eq4B.hide
	main.vn_stat4B.hide
	main.ed_stat4C.hide
	main.tx_eq4C.hide
	main.vn_stat4C.hide
	main.ed_stat4D.hide
	main.tx_eq4D.hide
	main.vn_stat4D.hide
	main.ed_stat4E.hide
	main.tx_eq4E.hide
	main.vn_stat4E.hide
	main.ed_stat4F.hide
	main.tx_eq4F.hide
	main.vn_stat4F.hide
END

SCRIPT main_stat4_show
BEGIN
	main.ed_stat4A.show
	main.tx_eq4A.show
	main.vn_stat4A.show
	main.ed_stat4B.show
	main.tx_eq4B.show
	main.vn_stat4B.show
	main.ed_stat4C.show
	main.tx_eq4C.show
	main.vn_stat4C.show
	main.ed_stat4D.show
	main.tx_eq4D.show
	main.vn_stat4D.show
	main.ed_stat4E.show
	main.tx_eq4E.show
	main.vn_stat4E.show
	main.ed_stat4F.show
	main.tx_eq4F.show
	main.vn_stat4F.show
END

SCRIPT main_stat4_norm
BEGIN
	script main_stat4_show
	main.sp_stat4.disable
END

SCRIPT main_stat4_perc
BEGIN
	script main_stat4_show
	main.sp_stat4.enable
END

PROGRAM main_stat4_sd
BEGIN
	call script main_stat4_norm
END

	

PROGRAM command
BEGIN
	put "graph dot "
	if !main.vn_stat1A & !main.vn_stat1B & !main.vn_stat1C & 	/*
		*/!main.vn_stat1D & !main.vn_stat1E & !main.vn_stat1F 	/*
		*/& !H(main.cb_stat2) {
		stopbox stop "At least one variable must be specified"
	}
	if H(main.cb_stat2) & !main.vn_stat1A & !main.vn_stat1B & 	/*
		*/!main.vn_stat1C & !main.vn_stat1D & !main.vn_stat1E & /*
		*/!main.vn_stat1F {
		if !main.vn_stat2A & !main.vn_stat2B &			/*
		*/!main.vn_stat2C & !main.vn_stat2D & !main.vn_stat2E & /*
		*/!main.vn_stat2F {
			if !main.vn_stat3A & !main.vn_stat3B &		/*
		*/!main.vn_stat3C & !main.vn_stat3D & !main.vn_stat3E & /*
		*/!main.vn_stat3F {
				if !main.vn_stat4A & !main.vn_stat4B &	/*
		*/!main.vn_stat4C & !main.vn_stat4D & !main.vn_stat4E & /*
		*/!main.vn_stat4F {
		stopbox stop "At least one variable must be specified"
				}
			}
		}
	}
	if !H(main.sp_stat1) {
		put "(" main.cb_stat1 main.sp_stat1 ") "
	}
	if H(main.sp_stat1) {
		optionarg main.cb_stat1
	}
	if main.vn_stat1A & main.ed_stat1A {
		put main.ed_stat1A " ="
	}
	put " "main.vn_stat1A
	if main.vn_stat1B & main.ed_stat1B {
		put " "main.ed_stat1B " ="
	}
	put " "main.vn_stat1B
	if main.vn_stat1C & main.ed_stat1C {
		put " "main.ed_stat1C " ="
	}
	put " "main.vn_stat1C
	if main.vn_stat1D & main.ed_stat1D {
		put " "main.ed_stat1D " ="
	}
	put " "main.vn_stat1D
	if main.vn_stat1E & main.ed_stat1E {
		put " "main.ed_stat1E " ="
	}
	put " "main.vn_stat1E
	if main.vn_stat1F & main.ed_stat1F {
		put " "main.ed_stat1F " ="
	}
	put " "main.vn_stat1F
	put " "

	/* stat2 */
	if main.vn_stat2A | main.vn_stat2B | main.vn_stat2C |	/*
		*/main.vn_stat2D | main.vn_stat2E | main.vn_stat2F {
		if !H(main.sp_stat2) {
			put "(" main.cb_stat2 main.sp_stat2 ") "
		}
		if H(main.sp_stat2) {
			optionarg main.cb_stat2 
		}
	}
	if main.vn_stat2A & main.ed_stat2A {
		put main.ed_stat2A " ="
	}
	put " "main.vn_stat2A
	if main.vn_stat2B & main.ed_stat2B {
		put " "main.ed_stat2B " ="
	}
	put " "main.vn_stat2B
	if main.vn_stat2C & main.ed_stat2C {
		put " "main.ed_stat2C " ="
	}
	put " "main.vn_stat2C
	if main.vn_stat2D & main.ed_stat2D {
		put " "main.ed_stat2D " ="
	}
	put " "main.vn_stat2D
	if main.vn_stat2E & main.ed_stat2E {
		put " "main.ed_stat2E " ="
	}
	put " "main.vn_stat2E
	if main.vn_stat2F & main.ed_stat2F {
		put " "main.ed_stat2F " ="
	}
	put " "main.vn_stat2F
	put " "

	/* stat3 */
	if main.vn_stat3A | main.vn_stat3B | main.vn_stat3C |	/*
		*/main.vn_stat3D | main.vn_stat3E | main.vn_stat3F {
		if !H(main.sp_stat3) {
			put "(" main.cb_stat3 main.sp_stat3 ") "
		}
		if H(main.sp_stat3) {
			optionarg main.cb_stat3
		}
	}
	if main.vn_stat3A & main.ed_stat3A {
		put main.ed_stat3A " ="
	}
	put " "main.vn_stat3A
	if main.vn_stat3B &  main.ed_stat3B {
		put " "main.ed_stat3B " ="
	}
	put " "main.vn_stat3B
	if main.vn_stat3C & main.ed_stat3C {
		put " "main.ed_stat3C " ="
	}
	put " "main.vn_stat3C
	if main.vn_stat3D & main.ed_stat3D {
		put " "main.ed_stat3D " ="
	}
	put " "main.vn_stat3D
	if main.vn_stat3E & main.ed_stat3E {
		put " "main.ed_stat3E " ="
	}
	put " "main.vn_stat3E
	if main.vn_stat3F & main.ed_stat3F {
		put " "main.ed_stat3F " ="
	}
	put " "main.vn_stat3F
	put " "

	/* stat4 */
	if main.vn_stat4A | main.vn_stat4B | main.vn_stat4C |	/*
		*/main.vn_stat4D | main.vn_stat4E | main.vn_stat4F {
		if !H(main.sp_stat4) {
			put " (" main.cb_stat4 main.sp_stat4 ") "
		}
		if H(main.sp_stat4) {
			optionarg main.cb_stat4
		}
	}
	if main.vn_stat4A & main.ed_stat4A {
		put main.ed_stat4A " ="
	}
	put " "main.vn_stat4A
	if main.vn_stat4B & main.ed_stat4B {
		put " "main.ed_stat4B " ="
	}
	put " "main.vn_stat4B
	if main.vn_stat4C & main.ed_stat4C {
		put " "main.ed_stat4C " ="
	}
	put " "main.vn_stat4C
	if main.vn_stat4D & main.ed_stat4D {
		put " "main.ed_stat4D " ="
	}
	put " "main.vn_stat4D
	if main.vn_stat4E & main.ed_stat4E {
		put " "main.ed_stat4E " ="
	}
	put " "main.vn_stat4E
	if main.vn_stat4F & main.ed_stat4F {
		put " "main.ed_stat4F " ="
	}
	put " "main.vn_stat4F
	INCLUDE _weights_pr
	INCLUDE _ifin_pr
	beginoptions
		put " " /program gover_output
		put " " /program gby_output
		put " " /program gdotmarkstyle_output 
		put " " /program gdotline_output
		put " " /program gdotopt_output
		put " " /program gbaryaxis_output
		put " " /program gtitle_output
		put " " /program gcaption_output
		put " " /program glegend_output
		put " " /program gregion_output
	endoptions
END