gover_98.idlg

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

	over.cl_lcol3.enable
	over.tx_angle3.enable
	over.cb_angle3.enable
	over.tx_lsize3.enable
	over.cb_lsize3.enable
	over.tx_gap3.enable
	over.ed_gap3.enable
END

SCRIPT over_lab4_on
BEGIN
	over.ck_lcol4.enable
	over.cl_lcol4.enable
	over.tx_angle4.enable
	over.cb_angle4.enable
	over.tx_lsize4.enable
	over.cb_lsize4.enable
	over.tx_gap4.enable
	over.ed_gap4.enable
END

SCRIPT over_over1
BEGIN
	over.tx_comment.hide
	script over_over3_hide
	script over_over1_show
END

SCRIPT over_over3
BEGIN
	over.tx_comment.show
	script over_over1_hide
	script over_over3_show
END

SCRIPT over_over1_show
BEGIN
	over.gb_over.setlabel "Over 1"
	over.gb_over2.setlabel "Over 2"
	over.vn_over.show
	over.tx_over2.show
	over.vn_over2.show
	over.ed_relab.show
	over.ed_relab2.show
	over.ck_noaxis.show
	over.ck_noaxis2.show
	over.ck_nolab.show
	over.ck_nolab2.show
	over.ck_lcol.show
	over.ck_lcol2.show
	over.cb_angle.show
	over.tx_angle.show
	over.cb_angle2.show
	over.tx_angle2.show
	over.tx_lsize.show
	over.cb_lsize.show
	over.cb_lsize2.show
	over.tx_lsize2.show
	over.ed_gap.show
	over.tx_gap.show
	over.ed_gap2.show
	over.tx_gap2.show
	over.ed_bargap.show
	over.ed_bargap2.show
	over.vn_sort.show
	over.vn_sort2.show
	over.ck_sort.show
	over.ck_sort2.show
	over.ck_acol.show
	over.tx_ogap.show
	over.ed_ogap.show
	over.ed_ogap2.show
	over.tx_ogap2.show
	over.gb_lab.show
	over.gb_lab2.show
	over.gb_axis.show
	over.gb_axis2.show
	program over_over1_col_check
END

PROGRAM over_over1_col_check
BEGIN
	if over.ck_lcol {
		call gaction over.cl_lcol.show
	}
	if over.ck_lcol2 {
		call gaction over.cl_lcol2.show
	}
	if over.ck_acol {
		call gaction over.cl_acol.show
	}
	if over.ck_acol2 {
		call gaction over.cl_acol2.show
	}
END

SCRIPT over_over1_hide
BEGIN
	over.tx_over2.hide
	over.vn_over.hide
	over.vn_over2.hide
	over.ed_relab.hide
	over.ed_relab2.hide
	over.ck_noaxis.hide
	over.ck_noaxis2.hide
	over.ck_nolab.hide
	over.ck_nolab2.hide
	over.ck_lcol.hide
	over.cl_lcol.hide
	over.ck_lcol2.hide
	over.cl_lcol2.hide
	over.cb_angle.hide
	over.tx_angle.hide
	over.cb_angle2.hide
	over.tx_angle2.hide
	over.cb_lsize.hide
	over.tx_lsize.hide
	over.cb_lsize2.hide
	over.tx_lsize2.hide
	over.ed_gap.hide
	over.tx_gap.hide
	over.ed_gap2.hide
	over.tx_gap2.hide
	over.ed_bargap.hide
	over.ed_bargap2.hide
	over.vn_sort.hide
	over.vn_sort2.hide
	over.ck_sort.hide
	over.ck_sort2.hide
	over.ck_acol.hide
	over.cl_acol.hide
	over.cl_acol2.hide
	over.ed_ogap.hide
	over.tx_ogap.hide
	over.ed_ogap2.hide
	over.tx_ogap2.hide
	over.gb_lab.hide
	over.gb_lab2.hide
	over.gb_axis.hide
	over.gb_axis2.hide
END

SCRIPT over_over3_show
BEGIN
	over.gb_over.setlabel "Over 3"
	over.gb_over2.setlabel "Yvaroptions (advanced)"
	over.ck_showy.show
	over.vn_over3.show
	over.ed_relab3.show
	over.ed_relab4.show
	over.ck_noaxis3.show
	over.ck_noaxis4.show
	over.ck_nolab3.show
	over.ck_nolab4.show
	over.ck_lcol3.show
	over.ck_lcol4.show
	over.cb_angle3.show
	over.tx_angle3.show
	over.cb_angle4.show
	over.tx_angle4.show
	over.cb_lsize3.show
	over.tx_lsize3.show
	over.cb_lsize4.show
	over.tx_lsize4.show
	over.ed_gap3.show
	over.tx_gap3.show
	over.ed_gap4.show
	over.tx_gap4.show
	over.ed_bargap3.show
	over.ed_bargap4.show
	over.vn_sort3.show
	over.vn_sort4.show
	over.ck_sort3.show
	over.ck_sort4.show
	over.ck_acol3.show
	over.ck_acol4.show
	over.ed_ogap3.show
	over.tx_ogap3.show
	over.ed_ogap4.show
	over.tx_ogap4.show
	over.gb_lab3.show
	over.gb_lab4.show
	over.gb_axis3.show
	over.gb_axis4.show
	program over_over3_col_check
END

PROGRAM over_over3_col_check
BEGIN
	if over.ck_lcol3 {
		call gaction over.cl_lcol3.show
	}
	if over.ck_lcol4 {
		call gaction over.cl_lcol4.show
	}
	if over.ck_acol3 {
		call gaction over.cl_acol3.show
	}
	if over.ck_acol4 {
		call gaction over.cl_acol4.show
	}

END

SCRIPT over_over3_hide
BEGIN
	over.ck_showy.hide
	over.vn_over3.hide
	over.ed_relab3.hide
	over.ed_relab4.hide
	over.ck_noaxis3.hide
	over.ck_noaxis4.hide
	over.ck_nolab3.hide
	over.ck_nolab4.hide
	over.ck_lcol3.hide
	over.cl_lcol3.hide
	over.ck_lcol4.hide
	over.cl_lcol4.hide
	over.cb_angle3.hide
	over.tx_angle3.hide
	over.cb_angle4.hide
	over.tx_angle4.hide
	over.cb_lsize3.hide
	over.tx_lsize3.hide
	over.cb_lsize4.hide
	over.tx_lsize4.hide
	over.ed_gap3.hide
	over.tx_gap3.hide
	over.ed_gap4.hide
	over.tx_gap4.hide
	over.ed_bargap3.hide
	over.ed_bargap4.hide
	over.vn_sort3.hide
	over.vn_sort4.hide
	over.ck_sort3.hide
	over.ck_sort4.hide
	over.ck_acol3.hide
	over.ck_acol4.hide
	over.cl_acol3.hide
	over.cl_acol4.hide
	over.ed_ogap3.hide
	over.tx_ogap3.hide
	over.ed_ogap4.hide
	over.tx_ogap4.hide
	over.gb_lab3.hide
	over.gb_lab4.hide
	over.gb_axis3.hide
	over.gb_axis4.hide
END

PROGRAM overopt_output
BEGIN
	beginoptions
	hoptionarg over.ed_relab
	hoptionarg /hidedefault over.ed_bargap
	hoptionarg over.vn_sort
	hoption over.ck_sort
	hoption over.ck_noaxis
	if !over.ck_noaxis {
		hoption over.ck_nolab
		if !over.ck_nolab {
			if over.ck_lcol | over.cb_angle |/*
			*/ over.cb_lsize | over.ed_gap {
				put "label("
				put /program label_output
				put ") "
			}
		}
		if over.ck_acol | over.ed_ogap {
			put "axis("
			put /program axis_output
			put ")"
		}
	}
	endoptions
END

PROGRAM label_output
BEGIN
	if over.ck_lcol {
		hoptionarg over.cl_lcol
	}
	hoptionarg over.cb_angle
	hoptionarg over.cb_lsize
	hoptionarg /hidedefault over.ed_gap
END

PROGRAM axis_output
BEGIN
	if over.ck_acol {
		hoptionarg over.cl_acol
	}
	hoptionarg /hidedefault over.ed_ogap
END

PROGRAM over2opt_output
BEGIN
	beginoptions
	hoptionarg over.ed_relab2
	hoptionarg /hidedefault over.ed_bargap2
	hoptionarg over.vn_sort2
	hoption over.ck_sort2
	hoption over.ck_noaxis2
	if !over.ck_noaxis2 {
		hoption over.ck_nolab2
		if !over.ck_nolab2 {
			if over.ck_lcol2 | over.cb_angle2 | over.cb_lsize2 | /*
			*/ over.ed_gap2 {
				put "label("
				put /program label2_output
				put ") "
			}
		}
		if over.ck_acol2 | over.ed_ogap2 {
			put "axis("
			put /program axis2_output
			put ")"
		}

	}
	endoptions
END

PROGRAM label2_output
BEGIN
	if over.ck_lcol2 {
		hoptionarg over.cl_lcol2
	}

	hoptionarg over.cb_angle2
	hoptionarg over.cb_lsize2
	hoptionarg /hidedefault over.ed_gap2
END

PROGRAM axis2_output
BEGIN
	if over.ck_acol2 {
		hoptionarg over.cl_acol2
	}
	hoptionarg /hidedefault over.ed_ogap2
END

PROGRAM over3opt_output
BEGIN
	beginoptions
	hoptionarg over.ed_relab3
	hoptionarg /hidedefault over.ed_bargap3
	hoptionarg over.vn_sort3
	hoption over.ck_sort3
	hoption over.ck_noaxis3
	if !over.ck_noaxis3 {
		hoption over.ck_nolab3
		if !over.ck_nolab3 {
			if over.ck_lcol3 | 		/*
			*/ over.cb_angle3 | over.cb_lsize3 |		/*
			*/ over.ed_gap3 {
				put "label("
				put /program label3_output
				put ") "
			}
		}
		if over.ck_acol3 | over.ed_ogap3 {
			put "axis("
			put /program axis3_output
			put ")"
		}
	}
	endoptions
END

PROGRAM label3_output
BEGIN
	if over.ck_lcol3 {
		hoptionarg over.cl_lcol3
	}
	hoptionarg over.cb_angle3
	hoptionarg over.cb_lsize3
	hoptionarg /hidedefault over.ed_gap3
END

PROGRAM axis3_output
BEGIN
	if over.ck_acol3 {
		hoptionarg over.cl_acol3
	}

	hoptionarg /hidedefault over.ed_ogap3
END

PROGRAM yvaropt_output
BEGIN
	hoptionarg over.ed_relab4
	hoptionarg /hidedefault over.ed_bargap4
	hoptionarg over.vn_sort4
	hoption over.ck_sort4
	hoption over.ck_noaxis4
	if !over.ck_noaxis4 {
		hoption over.ck_nolab4
		if !over.ck_nolab4 {
			if over.ck_lcol4 | 				/*
			*/ over.cb_angle4 | over.cb_lsize4 |		/*
			*/ over.ed_gap4 {
				put "label("
				put /program label4_output
				put ") "
			}
		}
		if over.ck_acol4 | over.ed_ogap4 {
			put "axis("
			put /program axis4_output
			put ")"
		}
	}
END

PROGRAM label4_output
BEGIN
	if over.ck_lcol4 {
		hoptionarg over.cl_lcol4
	}
	hoptionarg over.cb_angle4
	hoptionarg over.cb_lsize4
	hoptionarg /hidedefault over.ed_gap4
END

PROGRAM axis4_output
BEGIN
	if over.ck_acol4 {
		hoptionarg over.cl_acol4
	}
	hoptionarg /hidedefault over.ed_ogap4
END

PROGRAM gover_output
BEGIN
	hoption over.ck_xalt
	hoption over.ck_showy
	if over.vn_over {
		put /hidden "over(" over.vn_over
		put /program overopt_output
		put ") "
	}
	if over.vn_over2 {
		put /hidden "over(" over.vn_over2
		put /program over2opt_output
		put ") "
	}
	if over.vn_over3 {
		put /hidden "over(" over.vn_over3
		put /program over3opt_output
		put ") "
	}
	if !(over.ck_noaxis4) {
		if !over.ck_nolab4 {
			if over.ed_relab4 | over.ed_bargap4 | 	/*
			*/ over.vn_sort4 | over.ck_sort4 |	/*
			*/ over.ck_lcol4 | over.cb_angle4 | over.cb_lsize4 | /*
			*/ over.ed_gap4 | over.ck_acol4 | over.ed_ogap4 {
				put "yvaroptions("
				put /program yvaropt_output
				put ")"
			}
		}
		if over.ck_nolab4{
			put "yvaroptions("
			put /program yvaropt_output
			put ")"
		}
	}
	if over.ck_noaxis4 {
		put "yvaroptions("
		put /program yvaropt_output
		put ")"
	}
END