qnorm.dlg

来自「是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到」· DLG 代码 · 共 55 行

/*
	qnorm

*!  VERSION 1.1.1  10mar2005

*/

VERSION 9.0

INCLUDE graph_header
INCLUDE header

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

DIALOG main, label("qnorm - Quantiles of normal distribution plot") 	///
	tabtitle("Main")
BEGIN

  TEXT     tx_var       _lft       _top       _iwd	 .,		///
	label("Variable:")
  VARNAME  vn_var       @          _ss        _vnwd      .,		///
	label("Quantiles variable")

  CHECKBOX ck_grid      @          _ls        _cwd1      .,		///
	option(grid)							///
	label("Add grid lines at percentiles 5, 10, 25, 50, 75, 90, and 95")
END

INCLUDE ifin
INCLUDE p1_opts
INCLUDE line_opts
INCLUDE addplot
INCLUDE gr_twoway

SCRIPT PREINIT
BEGIN
	script p1_opts_createAsNoRange
	script p1_opts_setDefaultScatter
END

PROGRAM command
BEGIN
        put "qnorm "
        varlist main.vn_var
        INCLUDE _ifin_pr
        beginoptions
                option main.ck_grid
		put " " /program p1_opts_recast_output
		put " " /program line_opts_rlopts_output
		put " " /program addplot_output
		put " " /program gr_twoway_output
        endoptions
END