// spruceparams  --  Tables for setting up menu windows.


external MenuParamsHelp


// MenuInitHelp => MenuParamsHelp after MenuEdit -- manual change
let MenuParamsHelp() = valof
	[
	// set up menu table
	let menu=table
		[
		44
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		]
	menu!1=table [ 0;#44002;#113;#101;#763;#403 ]
	menu!2=table [ 0;#44002;#113;#55;#763;#100 ]
	menu!3=table [ 0;#4000;#115;#104;#260;#127 ]
	menu!4=table [ 0;#40002;#264;#104;#345;#127 ]
	menu!5=table [ 0;#40002;#351;#104;#444;#127 ]
	menu!6=table [ 0;#40002;#450;#104;#543;#127 ]
	menu!7=table [ 0;#40002;#547;#104;#642;#127 ]
	menu!8=table [ 0;#40002;#646;#104;#753;#127 ]
	menu!9=table [ 0;#4000;#40121;#44135;#245;#160 ]
	menu!10=table [ 0;#4000;#266;#136;#443;#161 ]
	menu!11=table [ 0;#4000;#513;#136;#656;#161 ]
	menu!12=table [ 0;#40002;#655;#136;#724;#161 ]
	menu!13=table [ 0;#40002;#656;#265;#725;#310 ]
	menu!14=table [ 0;#4000;#512;#171;#655;#214 ]
	menu!15=table [ 0;#40002;#443;#171;#512;#214 ]
	menu!16=table [ 0;#40002;#655;#171;#724;#214 ]
	menu!17=table [ 0;#4000;#725;#171;#753;#213 ]
	menu!18=table [ 0;#4000;#266;#171;#443;#214 ]
	menu!19=table [ 0;#4000;#40121;#44171;#264;#214 ]
	menu!20=table [ 0;#40002;#443;#136;#513;#161 ]
	menu!21=table [ 0;#4000;#44455;#44266;#656;#307 ]
	menu!22=table [ 0;#4000;#725;#136;#742;#160 ]
	menu!23=table [ 0;#4000;#40121;#44265;#322;#310 ]
	menu!24=table [ 0;#40002;#332;#265;#401;#310 ]
	menu!25=table [ 0;#4000;#404;#265;#442;#307 ]
	menu!26=table [ 0;#40002;#443;#227;#512;#252 ]
	menu!27=table [ 0;#4000;#726;#265;#751;#311 ]
	menu!28=table [ 0;#40002;#657;#227;#726;#252 ]
	menu!29=table [ 0;#4000;#727;#227;#761;#252 ]
	menu!30=table [ 0;#4000;#40121;#44227;#264;#252 ]
	menu!31=table [ 0;#4000;#265;#227;#442;#252 ]
	menu!32=table [ 0;#4000;#513;#227;#656;#252 ]
	menu!33=table [ 0;#40002;#122;#353;#245;#376 ]
	menu!34=table [ 0;#40002;#336;#353;#521;#376 ]
	menu!35=table [ 0;#40002;#606;#353;#757;#376 ]
	menu!36=table [ 0;#4000;#455;#323;#635;#346 ]
	menu!37=table [ 0;#40002;#635;#323;#727;#346 ]
	menu!38=table [ 0;#4000;#40121;#46323;#265;#346 ]
	menu!39=table [ 0;#40002;#275;#323;#446;#346 ]
	menu!40=table [ 0;#40002;#113;#404;#763;#427 ]
	menu!41=table [ 0;#0;#115;#406;#164;#426 ]
	menu!42=table [ 0;#0;#202;#406;#364;#426 ]
	menu!43=table [ 0;#1;#173;#406;#174;#425 ]
	menu!44=table [ 0;#1;#367;#406;#370;#425 ]

	// set up stringlist table
	let stringlist=table
		[
		44
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		0;0;0;0;0;0;0;0;0;0;0;0;0;0;0;0
		]
	stringlist!2="DEVICE PARAMETERS"
	stringlist!3="Printer Type"
	stringlist!4="Dover"
	stringlist!5="Pimlico"
	stringlist!6="Sequoia"
	stringlist!7="Puffin"
	stringlist!8="Penguin"
	stringlist!9="Paper Size"
	stringlist!10="Scan Direction"
	stringlist!11="Bit Direction"
	stringlist!12="11.0"
	stringlist!13="10.2"
	stringlist!14="Bit Direction"
	stringlist!15="384"
	stringlist!16="384"
	stringlist!17="bpi"
	stringlist!18="Scan Direction"
	stringlist!19="Resolution"
	stringlist!20="8.5"
	stringlist!21="Paper Speed"
	stringlist!22="in"
	stringlist!23="Scan Line Length"
	stringlist!24="11.7"
	stringlist!25="(in)"
	stringlist!26="190"
	stringlist!27="ips"
	stringlist!28="120"
	stringlist!29="dots"
	stringlist!30="Margin Adj."
	stringlist!31="Scan Direction"
	stringlist!32="Bit Direction"
	stringlist!33="Landscape"
	stringlist!34="First Page First"
	stringlist!35="No Break Page"
	stringlist!36="Debug Settings"
	stringlist!37="#40"
	stringlist!38="Printer Name"
	stringlist!39="Chester"
	stringlist!41="QUIT"
	stringlist!42="INSTALL FILES"

	// set up menuDCB table
	let menuDCB=table
		[
		0
		0;#0;0;22
		0;#2036;0;118
		0;#0;0;264
		]
	test (menuDCB&1) eq 1 ifso menuDCB=menuDCB+1
		ifnot for n=0 to 11 do menuDCB!n=menuDCB!(n+1)
	for n=0 to 1 do menuDCB!(4*n)=menuDCB+4*(n+1)

	// now finish up
	let temp=table [ 0;0;0 ]
	temp!0=menu
	temp!1=stringlist
	temp!2=menuDCB
	resultis temp
	]