prtesti1.dlg

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

/*
	prtesti

	VERSION 1.0.0  21dec2002

	One sample immediate prtest.
*/

VERSION 8.0

INCLUDE _std_small
INCLUDE header

HELP hlp1, view("help prtesti")
RESET res1

DIALOG main, label("prtesti - Proportion comparison test") tabtitle("Main")
BEGIN
  EDIT     en_obs1      _lft      _top      _en7wd      .,		/*
		*/ label("Sample size")					/*
		*/ numonly	
  TEXT     tx_obs1   _en7sep         @       _en7r      .,		/*
		*/ label("Sample size")	

  EDIT     en_prop1     _lft       _ls      _en7wd      ., 		/*
		*/ label("Sample proportion")				/*
		*/ numonly
  TEXT     tx_prop1  _en7sep         @       _en7r      .,		/*
		*/ label("Sample proportion")	

  EDIT     en_prop2     _lft       _ls      _en7wd      .,		/*
		*/ label("Hypothesized proportion")			/*
		*/ numonly
  TEXT     tx_prop2  _en7sep         @       _en7r      .,		/*
		*/ label("Hypothesized proportion")

  DEFINE _x _lft
  DEFINE _cx _spr
  DEFINE _y _ls
  INCLUDE _sp_level

  CHECKBOX ck_count     _lft	   _ls 	      _iwd      .,		/*
		*/ option("count")					/*
		*/ label("Use integer counts instead of proportions")	
END


PROGRAM command
BEGIN
	put "prtesti "	
	require main.en_obs1
	put main.en_obs1 
	put " "
	require main.en_prop1
	put main.en_prop1
	put " "
	require main.en_prop2
	put main.en_prop2
	put " "
	beginoptions
		INCLUDE _level_main_pr
		option main.ck_count
	endoptions
END