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


external MenuInitHelp


let MenuInitHelp() = valof
	[
	// set up menu table
	let menu=table
		[
		94
		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
		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;#4;#540;#720;#664;#747 ]
	menu!2=table [ 0;#4;#671;#663;#1015;#712 ]
	menu!3=table [ 0;#4;#407;#663;#533;#712 ]
	menu!4=table [ 0;#4;#407;#720;#533;#747 ]
	menu!5=table [ 0;#2;#661;#417;#1015;#436 ]
	menu!6=table [ 0;#2;#661;#441;#1015;#460 ]
	menu!7=table [ 0;#4;#540;#663;#664;#712 ]
	menu!8=table [ 0;#2;#661;#375;#1015;#414 ]
	menu!9=table [ 0;#2;#100;#424;#234;#443 ]
	menu!10=table [ 0;#2;#100;#550;#234;#567 ]
	menu!11=table [ 0;#2;#100;#624;#234;#643 ]
	menu!12=table [ 0;#2;#661;#512;#1015;#531 ]
	menu!13=table [ 0;#2;#100;#446;#234;#465 ]
	menu!14=table [ 0;#2;#661;#353;#1015;#372 ]
	menu!15=table [ 0;#2;#661;#562;#1015;#601 ]
	menu!16=table [ 0;#2;#661;#604;#1015;#623 ]
	menu!17=table [ 0;#4002;#661;#534;#1015;#553 ]
	menu!18=table [ 0;#2;#100;#352;#234;#371 ]
	menu!19=table [ 0;#2;#661;#626;#1015;#645 ]
	menu!20=table [ 0;#2;#661;#470;#1015;#507 ]
	menu!21=table [ 0;#5;#272;#356;#423;#427 ]
	menu!22=table [ 0;#5;#470;#356;#621;#427 ]
	menu!23=table [ 0;#6;#112;#1047;#235;#1121 ]
	menu!24=table [ 0;#4004;#77;#211;#365;#236 ]
	menu!25=table [ 0;#4004;#100;#265;#211;#310 ]
	menu!26=table [ 0;#4004;#77;#131;#422;#156 ]
	menu!27=table [ 0;#4003;#420;#212;#540;#235 ]
	menu!28=table [ 0;#4004;#472;#131;#1015;#156 ]
	menu!29=table [ 0;#4003;#420;#264;#540;#307 ]
	menu!30=table [ 0;#4003;#675;#212;#1015;#235 ]
	menu!31=table [ 0;#4003;#675;#265;#1015;#310 ]
	menu!32=table [ 0;#4004;#102;#665;#370;#712 ]
	menu!33=table [ 0;#4003;#541;#442;#645;#463 ]
	menu!34=table [ 0;#4003;#541;#520;#645;#541 ]
	menu!35=table [ 0;#4002;#420;#310;#540;#335 ]
	menu!36=table [ 0;#4003;#547;#212;#667;#235 ]
	menu!37=table [ 0;#4003;#547;#264;#667;#307 ]
	menu!38=table [ 0;#6;#372;#1142;#526;#1245 ]
	menu!39=table [ 0;#3;#74;#121;#1020;#126 ]
	menu!40=table [ 0;#3;#1021;#121;#1026;#1135 ]
	menu!41=table [ 0;#3;#74;#1130;#1020;#1135 ]
	menu!42=table [ 0;#4002;#547;#236;#667;#263 ]
	menu!43=table [ 0;#4002;#547;#310;#667;#335 ]
	menu!44=table [ 0;#4002;#541;#542;#645;#566 ]
	menu!45=table [ 0;#4002;#541;#464;#645;#510 ]
	menu!46=table [ 0;#4002;#77;#157;#422;#201 ]
	menu!47=table [ 0;#4002;#472;#157;#1015;#201 ]
	menu!48=table [ 0;#4002;#102;#713;#370;#735 ]
	menu!49=table [ 0;#4002;#77;#237;#365;#261 ]
	menu!50=table [ 0;#4002;#100;#311;#211;#336 ]
	menu!51=table [ 0;#4002;#420;#236;#540;#263 ]
	menu!52=table [ 0;#4002;#675;#311;#1015;#335 ]
	menu!53=table [ 0;#4002;#675;#236;#1015;#262 ]
	menu!54=table [ 0;#4;#720;#1145;#1020;#1212 ]
	menu!55=table [ 0;#4003;#307;#1047;#575;#1074 ]
	menu!56=table [ 0;#4002;#307;#1075;#575;#1121 ]
	menu!57=table [ 0;#4003;#647;#1047;#755;#1074 ]
	menu!58=table [ 0;#4002;#647;#1075;#755;#1121 ]
	menu!59=table [ 0;#4003;#250;#442;#354;#463 ]
	menu!60=table [ 0;#4002;#250;#464;#354;#510 ]
	menu!61=table [ 0;#4003;#404;#520;#510;#541 ]
	menu!62=table [ 0;#4002;#404;#542;#510;#566 ]
	menu!63=table [ 0;#3;#74;#342;#1020;#347 ]
	menu!64=table [ 0;#3;#74;#650;#1020;#655 ]
	menu!65=table [ 0;#3;#66;#121;#73;#1135 ]
	menu!66=table [ 0;#3;#74;#1031;#1020;#1036 ]
	menu!67=table [ 0;#4003;#404;#442;#510;#463 ]
	menu!68=table [ 0;#4002;#404;#464;#510;#510 ]
	menu!69=table [ 0;#4003;#250;#520;#354;#541 ]
	menu!70=table [ 0;#4002;#250;#542;#354;#566 ]
	menu!71=table [ 0;#4004;#543;#756;#655;#1002 ]
	menu!72=table [ 0;#4002;#543;#1003;#655;#1024 ]
	menu!73=table [ 0;#4002;#222;#752;#341;#776 ]
	menu!74=table [ 0;#4004;#102;#752;#221;#776 ]
	menu!75=table [ 0;#4002;#250;#617;#354;#643 ]
	menu!76=table [ 0;#4003;#250;#575;#354;#616 ]
	menu!77=table [ 0;#4004;#353;#756;#526;#1002 ]
	menu!78=table [ 0;#4002;#353;#1003;#526;#1024 ]
	menu!79=table [ 0;#4003;#404;#575;#510;#616 ]
	menu!80=table [ 0;#4002;#404;#617;#510;#643 ]
	menu!81=table [ 0;#40002;#100;#374;#234;#413 ]
	menu!82=table [ 0;#44004;#220;#265;#365;#310 ]
	menu!83=table [ 0;#44002;#220;#311;#365;#336 ]
	menu!84=table [ 0;#40002;#100;#572;#234;#611 ]
	menu!85=table [ 0;#4003;#541;#575;#645;#616 ]
	menu!86=table [ 0;#4002;#541;#617;#645;#643 ]
	menu!87=table [ 0;#4003;#102;#777;#264;#1020 ]
	menu!88=table [ 0;#4002;#265;#777;#341;#1020 ]
	menu!89=table [ 0;#4002;#66;#73;#1026;#115 ]
	menu!90=table [ 0;#40002;#100;#476;#234;#515 ]
	menu!91=table [ 0;#40002;#100;#520;#234;#537 ]
	menu!92=table [ 0;#4;#671;#720;#1015;#747 ]
	menu!93=table [ 0;#4004;#674;#756;#1006;#1002 ]
	menu!94=table [ 0;#4002;#674;#1003;#1006;#1024 ]

	// set up stringlist table
	let stringlist=table
		[
		94
		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
		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!1="List"
	stringlist!2="Extract"
	stringlist!3="Merge"
	stringlist!4="Supersede"
	stringlist!5="Width"
	stringlist!6="Rename"
	stringlist!7="Delete"
	stringlist!8="Show"
	stringlist!9="MakeCU"
	stringlist!10="MakeAL"
	stringlist!11="MakeStrike"
	stringlist!12="ReadWidths"
	stringlist!13="ReadCU"
	stringlist!14="Rotate"
	stringlist!15="Grow"
	stringlist!16="Shrink"
	stringlist!17="Coordinate"
	stringlist!18="OrbitFormat"
	stringlist!19="Scale"
	stringlist!20="ImposeWidths"
	stringlist!21="ReadSF"
	stringlist!22="Convert"
	stringlist!23="Edit"
	stringlist!24="Family Name"
	stringlist!25="Face"
	stringlist!26="Source file"
	stringlist!27="Point size"
	stringlist!28="Output file"
	stringlist!29="Mica size"
	stringlist!30="Rotation"
	stringlist!31="Incline"
	stringlist!32="Dictionary"
	stringlist!33="X factor"
	stringlist!34="Y factor"
	stringlist!36="X resol."
	stringlist!37="Y resol."
	stringlist!38="DO IT"
	stringlist!42=" "
	stringlist!43=" "
	stringlist!44=" "
	stringlist!45=" "
	stringlist!52=" "
	stringlist!54="QUIT"
	stringlist!55="Background"
	stringlist!57="Dot size"
	stringlist!59="Percent"
	stringlist!61="Bit Factor"
	stringlist!67="Update"
	stringlist!69="Thicken"
	stringlist!71="Fast"
	stringlist!74="Trident"
	stringlist!76="Orbitize"
	stringlist!77="ReviseWidths"
	stringlist!79="Clip"
	stringlist!81="DeOrbitize"
	stringlist!82="File Type"
	stringlist!84="ReadAL"
	stringlist!85="Angle"
	stringlist!87="Drive number"
	stringlist!90="MakeKS"
	stringlist!91="ReadKS"
	stringlist!92="Compact"
	stringlist!93="Verify"

	// set up menuDCB table
	let menuDCB=table
		[
		0
		0;#0;0;29
		0;#1440;0;10
		0;#0;0;1
		0;#1440;0;263
		0;#0;0;2
		0;#7424;0;34
		0;#0;0;65
		]
	test (menuDCB&1) eq 1 ifso menuDCB=menuDCB+1
		ifnot for n=0 to 27 do menuDCB!n=menuDCB!(n+1)
	for n=0 to 5 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
	]