[ver]
	4
[sty]
	_macro.sty
[files]
[charset]
	82
	ANSI (Windows, IBM CP 1252)
[revisions]
	0
[prn]
	PostScript Printer
[port]
	LPT1:
[lang]
	1
[desc]
	Automates _LABEL.STY, providing the engine for Avery label-building
	
	
	
	noautorun
	708845799
	66
	703895045
	3823
	13
	1663
	14877
	51
	53
	
	
	
	
	
	
	1
[fopts]
	0
	1
	0
	0
[lnopts]
	2
	Body Text
	1
[docopts]
	5
	2
[GramStyle]
	
[ParaNum]
	1
[tag]
	Body Text
	2
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Body Text
	0
	0
[tag]
	Body Single
	3
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Body Single
	0
	0
[tag]
	Function
	4
	[fnt]
		Arial
		240
		0
		16385
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		244
		1
		0
		0
		1
		100
	[brk]
		68
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		272
		1
		3
		.
		,
		$
	Body Text
	0
	0
[tag]
	Bullet 1
	5
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		288
		288
		288
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		<*5>
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Bullet 1
	0
	0
[tag]
	Number List
	6
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		360
		360
		360
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		<*:>.
		360
		1
		1
		0
		0
		0
		0
	[nfmt]
		272
		1
		2
		.
		,
		$
	Number List
	0
	0
[tag]
	Subhead
	7
	[fnt]
		TimesNewRomanPS
		200
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		72
		72
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		272
		1
		2
		.
		,
		$
	Subhead
	0
	0
[tag]
	Title
	8
	[fnt]
		Arial MT
		360
		0
		16385
	[algn]
		4
		1
		0
		0
		0
	[spc]
		33
		446
		1
		144
		72
		1
		100
	[brk]
		16
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		272
		1
		2
		.
		,
		$
	Title
	0
	0
[tag]
	Header
	9
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Header
	0
	0
[tag]
	Footer
	11
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Footer
	0
	0
[tag]
	Outline1
	12
	[fnt]
		Times New Roman
		240
		0
		49153
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		1
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline1
	0
	0
[tag]
	Outline2
	0
	[fnt]
		Times New Roman
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		2
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline2
	0
	0
[tag]
	Outline3
	0
	[fnt]
		Times New Roman
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		3
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline3
	0
	0
[tag]
	Outline4
	0
	[fnt]
		Times New Roman
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		4
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline4
	0
	0
[tag]
	Bullet
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		288
		288
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		<*0>
		360
		1
		1
		0
		0
		0
		0
	[nfmt]
		272
		1
		2
		.
		,
		$
	Bullet
	0
	0
[tag]
	Outline6
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		6
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline6
	0
	0
[tag]
	Outline7
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		7
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline7
	0
	0
[tag]
	Outline8
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		8
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline8
	0
	0
[tag]
	Outline9
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		9
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline9
	0
	0
[tag]
	Outline10
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		10
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline10
	0
	0
[tag]
	Outline11
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		11
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline11
	0
	0
[tag]
	Outline12
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		12
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline12
	0
	0
[tag]
	Outline13
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		13
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline13
	0
	0
[tag]
	Outline14
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		14
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline14
	0
	0
[tag]
	Outline5
	0
	[fnt]
		Times New Roman
		240
		0
		49152
	[algn]
		1
		1
		0
		0
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		5
		
		0
		1
		1
		0
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Outline5
	0
	0
[tag]
	Footnote
	0
	[fnt]
		TimesNewRomanPS
		240
		0
		49152
	[algn]
		1
		1
		0
		720
		0
	[spc]
		33
		273
		1
		0
		0
		1
		100
	[brk]
		4
	[line]
		8
		0
		1
		0
		1
		1
		1
		10
		10
		1
	[spec]
		0
		0
		<*:>
		0
		1
		1
		256
		0
		0
		0
	[nfmt]
		280
		1
		2
		.
		,
		$
	Footnote
	0
	0
[lay]
	Standard
	513
	[rght]
		15840
		12240
		1
		1440
		1440
		1
		1440
		1440
		0
		1
		0
		1
		0
		2
		1
		1440
		10800
		12
		1
		720
		1
		1440
		1
		2160
		1
		2880
		1
		3600
		1
		4320
		1
		5040
		1
		5760
		1
		6480
		1
		7200
		1
		7920
		1
		8640
	[hrght]
	[lyfrm]
		1
		11200
		0
		0
		12240
		1440
		0
		1
		3
		1 0 0 0 0 0 0
		0
		0
		1
	[frmlay]
		1440
		12240
		1
		1440
		72
		1
		792
		1440
		0
		1
		0
		1
		1
		0
		1
		1440
		10800
		2
		2
		4680
		3
		9360
	[txt]
@Header@LABEL.SMM	<*7><*7>Page <:P10,0,> of <:X3,0;NumPages>11<:X~3,0;NumPages>	<:Db> 
<:b<*!>>

>
	[frght]
	[lyfrm]
		1
		13248
		0
		14400
		12240
		15840
		0
		1
		3
		1 0 0 0 0 0 0
		0
		0
		2
	[frmlay]
		15840
		12240
		1
		1440
		792
		1
		14472
		1440
		0
		1
		0
		1
		1
		0
		1
		1440
		10800
		2
		2
		4680
		3
		9360
	[txt]
@Footer@
>
[elay]
[l1]
	0
[edoc]
@Outline1@<:#293,9360><:f240,BArial,0,0,255>'Declares and defines<:f>

@Outline2@<:#284,9360>declare losezeros(num);

@Outline2@<:#284,9360>declare roundtotwo(num);

@Outline2@<:#284,9360>declare converttounits(num);

@Outline2@<:#284,9360>declare zeromin(num);

@Outline2@<:#284,9360>declare getdatafile();

@Outline2@<:#284,9360>declare freeglobs();

@Outline2@<:#284,9360>declare customem();

@Outline2@<:#284,9360>declare twips(num);

@Outline2@<:#284,9360>declare LetterSize(labelindrt, labelindtop);

@Outline2@<:#284,9360>declare A4Size(labelindrt, labelindtop);

@Outline2@<:#284,9360>declare ManualSize(labelindrt, labelindtop, manualpageheight, carrierwidth);

@Outline2@<:#284,9360>Declare PrinterType();

@Outline2@<:#284,9360>Declare GetCurrentCountry();

@Outline2@<:#284,9360>declare getmergedescfile();

@Outline2@<:#284,9360>declare GetNumLabelKeys(labelnumkey);

@Outline2@<:#284,9360>Define CurPrinterName()	GetInfo(62)

@Outline2@<:#284,9360>Define ShowWindow()		DllCall("User,ShowWindow,AHH",%1,%2)

@Outline2@<:#284,9360>Define GetActiveWindow()	DllCall("User,GetActiveWindow,H")

@Outline2@<:#284,9360>Define SetFocus()		DllCall("User,SetFocus,HH", %1)

@Outline2@<:#284,9360>define WinHelp(hWnd, file, cmd, ptr)	DllCall("user,WinHelp,HHCHJ", %1, %2, %3, %4)

@Outline2@<:#284,9360>define FindWindow() DllCall("user,FindWindow,HCC", %1, %2)

@Outline2@<:#284,9360>Define EnableWindow() DllCall("user,EnableWindow,HHH", %1, %2)

@Outline2@<:#284,9360>define	HFONT	"Setfont:hFont"

@Outline2@<:#568,9360>define	SendMessage(hwnd, msg, wpara, lparm)	DllCall("user,SendMessage,HHHHJ", %1, %2, %3, %4)

@Outline2@<:#284,9360>define	WM_SETFONT	0x30

@Outline2@<:#568,9360>define CreateFont()		DllCall("gdi,CreateFont,HHHHHHHHHHHHHHC", %1, %2, %3, %4, %5, %6, %7, %8, %9, %10, %11, %12, %13, %14)

@Outline2@<:#284,9360>define	DeleteObject(handle)	DllCall("gdi,DeleteObject,HH", %1)

@Outline2@<:#284,9360>define HELP_CONTEXT	0x0001

@Outline2@<:#284,9360>define VK_F1			112

@Outline2@<:#284,9360>define NoMouseAdj		1

@Outline1@<:#284,9360>function label()

@Outline2@<:#284,9360>'verify this is a clean untitled

@Outline3@<:#284,9360>if GetOpenFileName$() !="" or Filechanged(0,0) != 0

@Outline3@<:#568,9360>	message("This macro is for the _LABEL style sheet.  To use it, choose File/New and leave Run macro selected.")

@Outline3@<:#284,9360>	exit function

@Outline3@<:#284,9360>endif

@Outline2@<:f240,BArial,0,0,255><:f>hourglass(1)

@Outline2@ignorekeyboard(2)

@Outline2@<:f240,BArial,0,0,255>'font handling

@Outline3@<:#284,9360>AllocGlobalVar(HFONT, 1)

@Outline3@<:#284,9360>SetGlobalVar(HFONT, 0)

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'collect initial info<:f>

@Outline3@<:#284,9360>rmac=getrunningmacrofile$()

@Outline3@<:#284,9360>allocglobalvar("units", 1)

@Outline3@<:#284,9360>allocglobalvar("inifile", 1)

@Outline3@<:#284,9360>inifile="AMILABEL.INI"

@Outline3@<:#284,9360>labelheadings=getprofilestring$("LabelTypes", "Headings", inifile)

@Outline3@<:#284,9360>if labelheadings = ""

@Outline4@<:#284,9360>	inipath = GetAmiDirectory$()

@Outline4@<:#284,9360>	inipathfile=strcat$(inipath, inifile)

@Outline4@<:#284,9360>	labelheadings=getprofilestring$("LabelTypes", "Headings", inipathfile)

@Outline4@<:#284,9360>	if labelheadings = ""

@Outline4@<:#284,9360>		inipath = GetMacPath$()

@Outline4@<:#284,9360>		inipathfile=strcat$(inipath, inifile)

@Outline4@<:#284,9360>		labelheadings=getprofilestring$("LabelTypes", "Headings", inipathfile)

@Outline4@<:#284,9360>		if labelheadings = ""

@Outline4@<:#284,9360>			message ("Cannot locate AMILABEL.INI")

@Outline4@<:#284,9360>			exit function

@Outline4@<:#284,9360>		endif

@Outline4@<:#284,9360>	endif

@Outline4@<:#284,9360>	inifile = inipathfile

@Outline4@<:#284,9360>endif

@Outline3@<:#284,9360>setglobalvar("inifile", inifile)

@Outline3@<:#284,9360><:f240,BArial,0,0,255>'unithandler<:f>

@Outline4@<:#284,9360>unittoshow=Getprofilestring$("LabelTypes", "Units", inifile)

@Outline4@<:#284,9360>if unittoshow=""

@Outline4@<:#284,9360>	Writeprofilestring("LabelTypes", "Units", "in.", inifile)

@Outline4@<:#284,9360>	unittoshow="in."

@Outline4@<:#284,9360>endif

@Outline4@<:#284,9360>setglobalvar("units", unittoshow)

@Outline3@<:#284,9360>'decide which labels to use (printer type and country settings)

@Outline4@<:#284,9360>printer=getprofilestring$("AmiProOwner", "PrefPrinter", inifile)<:Zfineadj2><:Z~fineadj2>

@Outline4@<:#284,9360>if printer=""

@Outline4@<:#284,9360>	printer=PrinterType()

@Outline4@<:#284,9360>endif

@Outline4@<:#284,9360>Country=getprofilestring$("AmiProOwner", "PrefCountry", inifile)<:Zfineadj21><:Z~fineadj21>

@Outline4@<:#284,9360>if country= ""

@Outline4@<:#284,9360>	country=GetCurrentCountry()

@Outline4@<:#284,9360>endif

@Outline4@<:#852,9360>a4countries="United Kingdom, Austria, Belgium (Dutch), Belguim (French), Denmark, Finland, France, Germany, Iceland, Ireland, Netherlands, Norway, Portugal, Spain, Switzerland (French), Switzerland (German), Switzerland (Italian)"

@Outline4@<:#284,9360>if printer="Laser" and country="United States"

@Outline4@<:#284,9360>	labelstouse="8.5"" x 11"""

@Outline4@<:#284,9360>elseif printer = "Dot Matrix" and <:f240,2Times New Roman,255,0,0> 
<:f>country ="United States"

@Outline4@<:#284,9360>	labelstouse="Continuous"

@Outline4@<:#284,9360>elseif printer="Laser" and instr(0, a4countries, country)

@Outline4@<:#284,9360>	labelstouse="A4"

@Outline4@<:#284,9360>elseif printer = "Dot Matrix" and instr(0, a4countries, country)

@Outline4@<:#284,9360>	labelstouse="UK Contin. French Contin."

@Outline4@<:#284,9360>else

@Outline4@<:#284,9360>	labelstouse="8.5"" x 11"" Continuous"

@Outline4@<:#284,9360>endif

@Outline4@<:#284,9360>labelstouse = strcat$(labelstouse, " Custom")

@Outline3@<:#284,9360>maxlabelskey=getprofilestring$("LabelTypes", "NextCustomLabelKey", inifile)

@Outline4@<:#284,9360>if maxlabelskey = ""

@Outline4@<:#284,9360>	maxlabelskey = "Label95"

@Outline4@<:#284,9360>	writeprofilestring("LabelTypes", "NextCustomLabelKey", maxlabelskey, inifile)

@Outline4@<:#284,9360>endif

@Outline2@<:#284,9360>StatusBarMsg("Loading label types...")

@Outline3@<:#284,9360><:f240,BArial,0,0,255>'singlestep(1)<:f>

@Outline3@<:#284,9360>hourglass(1)

@Outline3@<:#284,9360>maxlabels = GetNumLabelKeys(maxlabelskey)

@Outline3@<:#284,9360>ret=chr$(13)

@Outline3@<:#284,9360>dim labels(maxlabels)

@Outline3@<:#284,9360>'message (labelstouse)

@Outline3@<:#284,9360>for i=1 to maxlabels

@Outline3@<:#284,9360>	labelline=strcat$("Label", i)

@Outline3@<:#284,9360>	labellinetext=getprofilestring$("LabelTypes", labelline, inifile)

@Outline3@<:#284,9360>	labelpagetype=strfield$(labellinetext, 11, ",") 

@Outline3@<:#284,9360>	if len(labellinetext) << 10

@Outline3@<:#284,9360>		break

@Outline3@<:#284,9360>	endif

@Outline3@<:f240,2Times New Roman,255,0,0>	if instr(0, labelstouse, labelpagetyp<:f240,2Times New Roman,255,0,0>e) 
<:f>

@Outline3@<:#284,9360>		numlabels = numlabels + 1

@Outline3@<:#284,9360>		labels(numlabels)=strcat$(labellinetext, "~" , i)

@Outline3@<:#284,9360>		statusbarmsg("Loading label {numlabels}")

@Outline3@	else

@Outline3@		statusbarmsg("Checking label {i}")

@Outline3@<:#284,9360><:f240,2Times New Roman,255,0,0>	endif<:f>

@Outline3@<:#284,9360>next

@Outline3@<:#284,9360>'message("{i}; {numlabels}; {labels(i)}")

@Outline3@<:#284,9360><:f240,BArial,0,0,255>'tidyup<:f>

@Outline4@<:#284,9360><:f240,BArial,0,0,255>'result=ArrayDelete(&labels, i)<:f>

@Outline4@<:#284,9360><:f240,BArial,0,0,255>'if result != 1<:f>

@Outline4@<:#284,9360><:f240,BArial,0,0,255>'	message("Couldn't remove last item from array")<:f>

@Outline4@<:#284,9360><:f240,BArial,0,0,255>'endif<:f>

@Outline2@<:#284,9360>'message (numlabels)

@Outline2@<:#284,9360>StatusBarMsg("Sorting labels...")

@Outline3@<:#284,9360><:f240,BArial,0,0,255>'load the list boxes<:f>

@Outline3@<:#289,9360>for fieldtosorton=1 to 2	<:f240,BArial,0,0,255>'go through this 2x to fill both list boxes<:f>

@Outline3@<:#284,9360>	if fieldtosorton = 1

@Outline3@<:#284,9360>		StatusBarMsg("Sorting by part number...")

@Outline3@<:#284,9360>	else

@Outline3@<:#284,9360>		StatusBarMsg("Sorting by label type...")

@Outline3@<:#284,9360>	endif

@Outline3@<:#284,9360><:f240,BArial,0,0,255>'	result=ArraySort(&labels, fieldtosorton, ",")<:f>

@Outline3@<:#284,9360>	dim displayfield(numlabels)

@Outline3@<:#289,9360>	whichfieldtouse=1	<:f240,BArial,0,0,255>'1 is the part number<:f>

@Outline3@<:#289,9360>	whichotherfieldtouse=2	<:f240,BArial,0,0,255>'2 is the description<:f>

@Outline3@<:#284,9360>	for i = 1 to numlabels

@Outline3@<:#284,9360>		field1=strfield$(Labels(i), whichfieldtouse, ",")

@Outline3@<:#284,9360>		field2=strfield$(Labels(i), whichotherfieldtouse, ",")

@Outline3@<:#284,9360>		recnum=strfield$(Labels(i), 2, "~")

@Outline3@<:#289,9360>		<:f240,BArial,0,0,255>'check to make sure this is a valid (non-empty) record)<:f>

@Outline4@<:#284,9360>spacestilde="                                                                                              ~"

@Outline4@<:#284,9360>	if recnum <;> 0

@Outline4@<:#284,9360>		if fieldtosorton = 1

@Outline4@<:#284,9360>			texttoinsert=strcat$(field1, " - ", field2, spacestilde , recnum)

@Outline4@<:#284,9360>			statusbarmsg("Loading part number {field1}")

@Outline4@<:#284,9360>		else

@Outline4@<:#284,9360>			texttoinsert=strcat$(field2, " - ", field1, spacestilde , recnum)

@Outline4@<:#284,9360>			statusbarmsg("Loading description {field2}")

@Outline4@<:#284,9360>		endif

@Outline4@<:#284,9360>		ArrayInsert(&displayfield, i, texttoinsert)

@Outline4@<:#284,9360>	endif

@Outline3@<:#284,9360>	next

@Outline3@<:#284,9360>'message (recnum)

@Outline3@<:#284,9360>	if fieldtosorton = 1

@Outline3@<:#284,9360>		filledit(9000, &displayfield)

@Outline3@<:#284,9360>	elseif fieldtosorton=2

@Outline3@<:#284,9360>		filledit(9002, &displayfield)

@Outline3@<:#284,9360>	endif

@Outline3@<:#284,9360>next

@Outline2@<:#284,9360>filledit(20, True)

@Outline2@<:#284,9360>StatusBarMsg("Preparing labels for display...")

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'set callbacks and fill 1st heightwidth<:f>

@Outline3@<:#284,9360>DlgKeyInterrupt(VK_F1, "{rmac}!helper")

@Outline3@<:#284,9360>SetDlgCallBack(9000,"{rmac}!heightwidthcallback")

@Outline3@<:#284,9360>SetDlgCallBack(9002,"{rmac}!heightwidthcallback")

@Outline3@<:#284,9360>SetDlgCallBack(24,"{rmac}!unitbutton")

@Outline3@<:#284,9360>SetDlgCallBack(20,"{rmac}!sorttype")

@Outline3@<:#284,9360>SetDlgCallBack(0,"{rmac}!prebuild")

@Outline3@<:#284,9360>StatusBarMsg("")

@Outline3@<:#284,9360>hourglass(0)

@Outline2@<:#284,9360>box=dialogbox(".", "labeltest")

@Outline3@<:#284,9360>if box=0 or box =2

@Outline3@<:#284,9360>	freeglobs()

@Outline3@<:#284,9360>	exit function

@Outline3@<:#284,9360>elseif box=4

@Outline3@<:#284,9360>	customem()

@Outline3@<:#284,9360>	freeglobs()

@Outline3@<:#284,9360>	exit function

@Outline3@<:#284,9360>endif

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'find their labeldata<:f>

@Outline3@<:#284,9360>if getdialogfield$(20) = True

@Outline3@<:#284,9360>	labelchosen=getdialogfield$(9002)

@Outline3@<:#284,9360>elseif getdialogfield$(20) = False

@Outline3@<:#284,9360>	labelchosen=getdialogfield$(9000)

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>key=strfield$(labelchosen, 2, "~")

@Outline3@<:#284,9360>labelnumchosen=ArraySearch(&labels, key, 2, "~")

@Outline3@<:#284,9360>labeldata=labels(labelnumchosen)

@Outline3@<:#289,9360>labeldata=strfield$(labeldata, 1, "~")	<:f240,BArial,0,0,255>'chop off the key<:f>

@Outline3@<:#284,9360>switch box

@Outline3@<:#284,9360>	case 1

@Outline3@<:#284,9360>		call mergem(labeldata)

@Outline3@<:#284,9360>	case 3

@Outline3@<:#284,9360>		call manualem(labeldata)

@Outline3@<:#284,9360>endswitch

@Outline2@<:#284,9360>freeglobs()

@Outline2@<:#284,9360>'font bailout

@Outline3@<:#284,9360>font = GetGlobalVar$(HFONT)		' If we created

@Outline3@<:#284,9360>if (0 != font)				' the font.

@Outline3@<:#284,9360>	DeleteObject(font)		' Delete it

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>allocglobalvar(hfont, 1)

@Outline3@<:#284,9360>freeglobalvar(HFONT)

@Outline2@hourglass(0)

@Outline2@end function

@Outline1@<:#284,9360>function freeglobs()

@Outline2@<:#284,9360>freeglobalvar("units")

@Outline2@<:#284,9360>freeglobalvar("inifile")

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function unitbutton(Hdlg,id,dummy)

@Outline2@<:#284,9360>ignorekeyboard(2)

@Outline2@<:#284,9360>unittoshow=getglobalvar$("units")

@Outline2@<:#284,9360>switch unittoshow

@Outline3@<:#284,9360>	case "in."

@Outline3@<:#284,9360>		newunit="cm."

@Outline3@<:#284,9360>	case "cm."

@Outline3@<:#284,9360>		newunit="picas"

@Outline3@<:#284,9360>	case "picas"

@Outline3@<:#284,9360>		newunit="pt."

@Outline3@<:#284,9360>	case "pt."

@Outline3@<:#284,9360>		newunit="in."

@Outline3@<:#284,9360>endswitch

@Outline2@<:#284,9360>inifile=Getglobalvar$("inifile")

@Outline2@<:#284,9360>Writeprofilestring("LabelTypes", "Units", newunit, inifile)

@Outline2@<:#284,9360>setglobalvar("units", newunit)

@Outline2@<:#284,9360>setdlgitemtext(hdlg, id, newunit)

@Outline2@<:#284,9360>if getdlgitemtext(hdlg, 20) = True

@Outline2@<:#284,9360>	call heightwidthcallback(hdlg, 9002, dummy)

@Outline2@<:#284,9360>else

@Outline2@<:#284,9360>	call heightwidthcallback(hdlg, 9000, dummy)

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function helper()

@Outline2@<:R1,15,1,0,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,1,9360,1,10080,><:#284,9360>prohWnd = FindWindow("AmiProWndA", 0)

@Outline2@<:R1,15,1,0,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,1,9360,1,10080,><:#284,9360>helpfile = strcat$(GetAmiDirectory$(), "amipro.hlp")

@Outline2@<:R1,15,1,0,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,1,9360,1,10080,><:#289,9360>helpnum = 139 		<:f240,BArial,0,0,255>'or the pane you want to display (151 is Undo)<:f>

@Outline2@<:R><:#284,9360>WinHelp (prohWnd, helpfile, HELP_CONTEXT, helpnum)

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function prebuild(Hdlg,id,dummy)

@Outline2@<:#284,9360>id=20

@Outline2@<:#284,9360>call sorttype(Hdlg,id,dummy)

@Outline2@<:#284,9360>id=9002

@Outline2@<:#284,9360>call heightwidthcallback(Hdlg,id,dummy)

@Outline2@<:#284,9360>setdlgitemtext(hdlg, 24, Getglobalvar$("units"))

@Outline2@<:#284,9360>Font = CreateFont(13, 0, 0, 0, 400, 0, 0, 0, 0, 0, 0, 0, 32, "Helv")

@Outline3@<:#284,9360>if (Font)

@Outline3@<:#284,9360>	hctl = GetDlgItem(hDlg, 9000)

@Outline3@<:#284,9360>	hctl2 = GetDlgItem(hDlg, 9002)

@Outline3@<:#284,9360>	hctl3 = GetDlgItem(hDlg, 1002)

@Outline3@<:#284,9360>	hctl4 = GetDlgItem(hDlg, 1004)

@Outline3@<:#284,9360>	SendMessage(hctl, WM_SETFONT, font, 0)

@Outline3@<:#284,9360>	SendMessage(hctl2, WM_SETFONT, font, 0)

@Outline3@<:#284,9360>	SendMessage(hctl3, WM_SETFONT, font, 0)

@Outline3@<:#284,9360>	SendMessage(hctl4, WM_SETFONT, font, 0)

@Outline3@<:#284,9360>	SetGlobalVar(HFONT, Font)

@Outline3@<:#284,9360>endif 

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function sorttype(Hdlg,id,dummy)

@Outline2@<:#284,9360>sortbylabeltype=getdlgitemtext(hdlg, id)

@Outline2@<:#284,9360>if sortbylabeltype=1

@Outline2@<:#284,9360>	ShowWindow(GetDlgItem(Hdlg,9002), 1)

@Outline2@<:#284,9360>	ShowWindow(GetDlgItem(Hdlg,9000), 0)

@Outline2@<:#284,9360>	id=9002

@Outline2@<:#284,9360>	call heightwidthcallback(Hdlg,id,dummy)

@Outline2@<:#284,9360>else

@Outline2@<:#284,9360>	ShowWindow(GetDlgItem(Hdlg,9000), 1)

@Outline2@<:#284,9360>	ShowWindow(GetDlgItem(Hdlg,9002), 0)

@Outline2@<:#284,9360>	id=9000

@Outline2@<:#284,9360>	call heightwidthcallback(Hdlg,id,dummy)

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function heightwidthcallback(Hdlg,id,dummy)

@Outline2@<:#284,9360>ignorekeyboard(2)

@Outline2@<:#284,9360>inifile="AMILABEL.INI"

@Outline2@<:#284,9360>labelchosen=getdlgitemtext(hdlg, id)

@Outline2@<:#284,9360>key=strfield$(labelchosen, 2, "~");

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'labelnumchosen=ArraySearch(*labels, key, 2, "~")<:f>

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'labeldata=labels(labelnumchosen)<:f>

@Outline2@<:#284,9360>labelline=strcat$("Label",key)

@Outline2@<:#284,9360>labeldata=GetProfileString$("LabelTypes", labelline, inifile)

@Outline2@<:#284,9360>height=strfield$(labeldata, 3, ",")

@Outline2@<:#284,9360>	height=converttounits(height)

@Outline2@<:#284,9360>	height=roundtotwo(height)

@Outline2@<:#284,9360>width=strfield$(labeldata, 4, ",")

@Outline2@<:#284,9360>	width=converttounits(width)

@Outline2@<:#284,9360>	width=roundtotwo(width)

@Outline2@<:#284,9360>heightwidth=strcat$(height, " x ", width )

@Outline2@<:#284,9360>setdlgitemtext(hdlg, 1002, heightwidth)

@Outline2@<:#284,9360>labelpagetype=strfield$(labeldata, 11, ",") 

@Outline2@<:#284,9360>setdlgitemtext(hdlg, 1004, labelpagetype)

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function losezeros(num)

@Outline2@<:#284,9360>if IsNumeric(num) != 1 or instr(0, num, ".") = 0

@Outline2@<:#284,9360>	losezeros=num

@Outline2@<:#284,9360>	exit function

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>while (Right$(num, 1) =0)

@Outline2@<:#284,9360>	num = left$(num, (len(num) - 1))

@Outline2@<:#284,9360>wend

@Outline2@<:#284,9360>if right$(num, 1) = "."

@Outline2@<:#284,9360>	num=left$(num, (len(num) - 1))

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>losezeros=num

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function roundtotwo(num)

@Outline2@<:#284,9360>roundtotwo=FormatNum$("", "", 2, (round(num * 100))/100)

@Outline2@<:#284,9360><:>end function

@Outline1@<:#284,9360>function converttounits(num)

@Outline2@<:#284,9360>unittoshow=getglobalvar$("units")

@Outline2@<:#284,9360>switch unittoshow

@Outline2@<:#284,9360>	case "in."

@Outline2@<:#289,9360>		<:f240,BArial,0,0,255>'Avery data is in inches; no conversion is necessary<:f>

@Outline2@<:#284,9360>		newnum=num

@Outline2@<:#284,9360>	case "cm."

@Outline2@<:#284,9360>		newnum=2.54 * num

@Outline2@<:#284,9360>	case "picas"

@Outline2@<:#284,9360>		newnum=6 * num

@Outline2@<:#284,9360>	case "pt."

@Outline2@<:#284,9360>		newnum=72 * num

@Outline2@<:#284,9360>endswitch

@Outline2@<:#284,9360>converttounits=newnum

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function GetNumLabelKeys(labelnumkey)

@Outline2@<:#284,9360>lenthiskeynum = len(labelnumkey) - 5

@Outline2@<:#284,9360>thiskeynum = right$(labelnumkey, lenthiskeynum)

@Outline2@<:#284,9360>GetNumLabelKeys = thiskeynum + 1

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function mergem(labeldata)

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'parse labeldata<:f>

@Outline3@<:#284,9360>labelheight=strfield$(labeldata, 3, ",")

@Outline3@<:#284,9360>labelwidth=strfield$(labeldata, 4, ",")

@Outline3@<:#284,9360>numacross=strfield$(labeldata, 5, ",")

@Outline3@<:#284,9360>numdown=strfield$(labeldata, 6, ",")

@Outline3@<:#284,9360>topmarg=strfield$(labeldata, 7, ",")

@Outline3@<:#284,9360>sidemarg=strfield$(labeldata, 8, ",")

@Outline3@<:#284,9360>horizpitch=strfield$(labeldata, 9, ",")

@Outline3@<:#284,9360>vertpitch=strfield$(labeldata, 10, ",")

@Outline3@<:#284,9360>if vertpitch="-"

@Outline3@<:#284,9360>	vertpitch = labelheight

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>if horizpitch="-"

@Outline3@<:#284,9360>	horizpitch = labelwidth

@Outline3@<:#284,9360>endif

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'fine-adjust constants<:f>

@Outline3@<:#284,9360>inifile=getglobalvar$("inifile")

@Outline3@<:#284,9360>fineright=getprofilestring$("AmiProOwner", "FineRightMargin", inifile)<:Zfineadj><:Z~fineadj>

@Outline3@<:#284,9360>if fineright=""

@Outline3@<:#284,9360>	fineright= 0.125

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>fineindrt=getprofilestring$("AmiProOwner", "FineIndRight", inifile)<:Zfineadj1><:Z~fineadj1>

@Outline3@<:#284,9360>if fineindrt= ""

@Outline3@<:#284,9360>	fineindrt= 0.25

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>fineindtop=getprofilestring$("AmiProOwner", "FineIndTop", inifile)<:Zfineadj11><:Z~fineadj11>

@Outline3@<:#284,9360>if fineindrt = ""

@Outline3@<:#284,9360>	fineindtop = 0.25

@Outline3@<:#284,9360>endif

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'make pro info<:f>

@Outline3@<:#284,9360>labelindrt=Twips(zeromin(sidemarg - fineindrt))

@Outline3@<:#284,9360>labelindtop=Twips(zeromin(topmarg - fineindtop))

@Outline3@<:#284,9360>protop=twips(0)

@Outline3@<:#284,9360>proleft=twips(0)

@Outline3@<:#284,9360>proright=twips(fineright + zeromin((horizpitch - labelwidth)))

@Outline3@<:#284,9360>probottom=twips(zeromin(vertpitch - labelheight))

@Outline3@<:#284,9360>proheight=twips(vertpitch)

@Outline3@<:#284,9360>prowidth=twips(horizpitch)

@Outline3@<:#284,9360>righttab=twips((labelwidth - fineright))

@Outline3@<:#284,9360>centertab=righttab / 2 

@Outline3@<:#284,9360>firstlefttab=centertab / 3

@Outline3@<:#284,9360>secondlefttab =firstlefttab * 2

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'change the page layout<:f>

@Outline3@<:#284,9360>LayoutMode()

@Outline3@<:#284,9360>ModLayoutInit(512)

@Outline3@<:#568,9360>ModLayoutRightPage(proleft, protop, proright, probottom, 1 0 1 proleft, righttab, 4 1 firstlefttab 1 secondlefttab  2 centertab 3 righttab)

@Outline3@<:#568,9360>ModLayoutRightHeader(proleft, 0, proright, 0 1 0 1 proleft, righttab, 4 1 firstlefttab 1 secondlefttab 2 centertab 3 righttab)

@Outline3@<:#568,9360>ModLayoutRightFooter(proleft, 0, proright, 0 1 0 1 proleft, righttab,  4 1 firstlefttab 1 secondlefttab 2 centertab 3 righttab)

@Outline3@<:#284,9360>ModLayoutPageSize(proheight, prowidth, 1, 7)

@Outline3@<:#284,9360>ModLayoutFinish()

@Outline2@<:#284,9360>prohwnd=GetActiveWindow()

@Outline2@<:#284,9360>rmac=getrunningmacrofile$()

@Outline2@<:#284,9360>runlater("{rmac}!AmiUIGray(3, 0)", 0.1)

@Outline2@<:#284,9360>runlater("{rmac}!AmiUIGray(4, 0)", 0.1)

@Outline2@<:#284,9360>pause(005)

@Outline2@<:#284,9360>SelectMergeDataFile

@Outline2@<:#284,9360>pause(001)

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'InsertMerge<:f>

@Outline2@<:#284,9360>datafile=getdatafile()

@Outline2@<:#284,9360>if datafile != ""

@Outline2@<:#284,9360>	descfile = GetMergeDescFile()

@Outline2@<:#284,9360>	MergeMacro(24 datafile descfile numacross numdown labelindrt labelindtop )

@Outline2@<:#284,9360>	mergeAction(mergestop)

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>setfocus(prohwnd)

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function manualem(labeldata)

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'parse labeldata<:f>

@Outline3@<:#284,9360>labelheight=strfield$(labeldata, 3, ",")

@Outline3@<:#284,9360>labelwidth=strfield$(labeldata, 4, ",")

@Outline3@<:#284,9360>numacross=strfield$(labeldata, 5, ",")

@Outline3@<:#284,9360>numdown=strfield$(labeldata, 6, ",")

@Outline3@<:#284,9360>topmarg=strfield$(labeldata, 7, ",")

@Outline3@<:#284,9360>sidemarg=strfield$(labeldata, 8, ",")

@Outline3@<:#284,9360>horizpitch=strfield$(labeldata, 9, ",")

@Outline3@<:#284,9360>vertpitch=strfield$(labeldata, 10, ",")

@Outline3@<:#284,9360>labelpagetype=strfield$(labeldata, 11, ",") 

@Outline3@<:#284,9360>if vertpitch="-"

@Outline3@<:#284,9360>	vertpitch = labelheight

@Outline3@<:#284,9360>endif

@Outline3@<:#284,9360>if horizpitch="-"

@Outline3@<:#284,9360>	horizpitch = labelwidth

@Outline3@<:#284,9360>endif

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'fine-adjust constants<:f><:f240,BArial,0,0,255> 
<:f>

@Outline3@<:#284,9360>fineright= 0.125

@Outline3@<:#284,9360>fineindrt= 0.125

@Outline3@<:#284,9360>fineindtop = 0

@Outline3@<:#284,9360>finewidth= 0.5 / numacross

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'make pro info<:f>

@Outline3@<:#284,9360>labelindrt=Twips(zeromin(sidemarg + fineindrt))

@Outline3@<:#284,9360>labelindtop=Twips(zeromin(topmarg - fineindtop))

@Outline3@<:#284,9360>protop=twips(0)

@Outline3@<:#284,9360>proleft=twips(0)

@Outline3@<:#284,9360>proright=twips(fineright + zeromin((horizpitch - labelwidth)))

@Outline3@<:#284,9360>probottom=twips(zeromin(vertpitch - labelheight))

@Outline3@<:#284,9360>proheight=twips(labelheight)

@Outline3@<:#284,9360>prowidth=twips(zeromin(labelwidth - finewidth))

@Outline3@<:#284,9360>righttab=twips((labelwidth - fineright))

@Outline3@<:#284,9360>centertab=righttab / 2 

@Outline3@<:#284,9360>firstlefttab=centertab / 3

@Outline3@<:#284,9360>secondlefttab =firstlefttab * 2

@Outline3@<:#284,9360>manualpageheight = Twips(vertpitch)

@Outline3@<:#284,9360>carrierwidth = Twips((2 * sidemarg) + (horizpitch * numacross))

@Outline2@<:#284,9360>if labelpagetype="A4"

@Outline3@<:#284,9360>	A4Size(labelindrt, labelindtop)

@Outline3@<:#284,9360>	Tables(1, 0, NumAcross, NumDown)

@Outline3@<:#568,9360>	TableLayout(2, 0, prowidth, proright, ProHeight, probottom, 0, 0, 0, 0, Off, NoMouseAdj) 

@Outline2@<:#284,9360>elseif labelpagetype="Continuous"

@Outline3@<:#284,9360>	ManualSize(labelindrt, labelindtop, (manualpageheight + labelindtop), carrierwidth)

@Outline3@<:#284,9360>if NumAcross <;> 1

@Outline3@<:#284,9360>	Tables(1, 0, NumAcross, 1)

@Outline3@<:#284,9360>	TableLayout(2, 0, prowidth, proright, ProHeight, 0, 0, 0, 0, 0, Off, NoMouseAdj)

@Outline3@<:#284,9360>endif

@Outline2@<:#289,9360>else	<:f240,BArial,0,0,255>'pagetype = 8.5 x 11<:f>

@Outline3@<:#284,9360>	LetterSize(labelindrt, labelindtop)

@Outline3@<:#284,9360>	Tables(1, 0, NumAcross, NumDown)

@Outline3@<:#568,9360>	TableLayout(2, 0, prowidth, proright, ProHeight, probottom, 0, 0, 0, 0, Off, NoMouseAdj)

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'message("Manual module not complete")<:f>

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function A4Size(labelindrt, labelindtop)

@Outline2@<:#284,9360>ModLayoutInit(512  )

@Outline2@<:#568,9360>ModLayoutRightPage(labelindrt labelindtop 0 0 1 0 1 labelindrt 11908 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640  )

@Outline2@<:#284,9360>ModLayoutPageSize(16833 11908 1 4  )

@Outline2@<:#284,9360>ModLayoutRightHeader(labelindrt 0 0 0 1 0 1 labelindrt 11908 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutRightFooter(labelindrt 0 0 0 1 0 1 labelindrt 11908 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutFinish( )

@Outline2@<:#284,9360>END FUNCTION

@Outline1@<:#284,9360>function LetterSize(labelindrt, labelindtop)

@Outline2@<:#284,9360>ModLayoutInit(512  )

@Outline2@<:#568,9360>ModLayoutRightPage(labelindrt labelindtop 0 0 1 0 1 labelindrt 12240 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640  )

@Outline2@<:#284,9360>ModLayoutPageSize(15840 12240 1 1  )

@Outline2@<:#284,9360>ModLayoutRightHeader(labelindrt 0 0 0 1 0 1 labelindrt 12240 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutRightFooter(labelindrt 0 0 0 1 0 1 labelindrt 12240 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutFinish( )

@Outline2@<:#284,9360>END FUNCTION

@Outline1@<:#284,9360>function ManualSize(labelindrt, labelindtop, manualpageheight, carrierwidth)

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'set page width as carrier width, height as label pitch<:f>

@Outline2@<:#284,9360>ModLayoutInit(512  )

@Outline2@<:#568,9360>ModLayoutRightPage(labelindrt labelindtop 0 0 1 0 1 labelindrt carrierwidth 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640  )

@Outline2@<:#284,9360>ModLayoutPageSize(manualpageheight carrierwidth 1 1  )

@Outline2@<:#284,9360>ModLayoutRightHeader(labelindrt 0 0 0 1 0 1 labelindrt carrierwidth 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutRightFooter(labelindrt 0 0 0 1 0 1 labelindrt carrierwidth 2 2 4680 3 9360  )

@Outline2@<:#284,9360>ModLayoutFinish( )

@Outline2@<:#284,9360>END FUNCTION

@Outline1@<:#284,9360>function customem()

@Outline2@<:#284,9360>ModifyLayout

@Outline2@<:#284,9360>SelectMergeDataFile

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function zeromin(num)

@Outline2@<:#284,9360>if num << 0

@Outline2@<:#284,9360>	num = 0

@Outline2@<:#284,9360>endif

@Outline2@<:#284,9360>zeromin=num

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function twips(num)

@Outline2@<:#284,9360>twips = num * 1440

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>Function getdatafile()

@Outline2@<:#284,9360>MergeOpts = GetInfo(165)

@Outline2@<:#284,9360>GetDataFile = StrField$(MergeOpts,8,",")

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>Function getmergedescfile()

@Outline2@<:#284,9360>MergeOpts = GetInfo(165)

@Outline2@<:#284,9360>GetMergeDescFile = StrField$(MergeOpts,10,",")

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>Function PrinterType()

@Outline2@<:#284,9360>printer=CurPrinterName()

@Outline2@<:#284,9360>DriverAndPort=GetProfileString$("devices", printer)

@Outline2@<:#284,9360>driver=UCASE$(strfield$(DriverAndPort, 1, ","))

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'Lasers<:f>

@Outline3@<:#573,9360>if instr(0, "CANON10E  HPDSKJET  HPPCL  HPPCL5A  HPPLOT  IBM4019  LBPII  LBPIII  PAINTJET  PSCRIPT  THINKJET  TI850", driver) != 0	<:f240,BArial,0,0,255>'put complete driver names here<:f>

@Outline3@<:#284,9360>	PrinterType="Laser"

@Outline3@<:#289,9360>elseif instr(0, driver, "PCL") != 0	<:f240,BArial,0,0,255>'detail partial names like this<:f>

@Outline3@<:#284,9360>	PrinterType="Laser"

@Outline3@<:#284,9360>elseif instr(0, driver, "JET") != 0

@Outline3@<:#284,9360>	PrinterType="Laser"

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'Dot Matrix<:f>

@Outline3@<:#852,9360>elseif instr(0, "CIT24US CIT9US EPSON24 EPSON9 FUJI24 FUJI9 IBMGRX NEC24PIN OKI24 OKI9 OKI9IBM PANSON24 PANSON9 PROPRINT PROPRN24 QWIII TTY", driver) != 0

@Outline3@<:#284,9360>	PrinterType="Dot Matrix"

@Outline3@<:#284,9360>else

@Outline2@<:#284,9360><:f240,BArial,0,0,255>'Other<:f>

@Outline3@<:#284,9360>	PrinterType=driver

@Outline3@<:#284,9360>endif

@Outline2@<:#284,9360>END FUNCTION

@Outline1@<:#284,9360>Function GetCurrentCountry()

@Outline2@<:#284,9360>GetCurrentCountry=GetProfileString$("intl", "sCountry")

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>function AmiUIGray(ID, State)

@Outline2@<:#284,9360>hdlg = getactivewindow()

@Outline2@<:#284,9360>idnew = GetDlgItem(Hdlg, ID)

@Outline2@<:#284,9360>enablewindow(idnew, state)

@Outline2@<:#284,9360>end function

@Outline1@<:#284,9360>DIALOG	labeltest

@Outline2@<:#284,9360>-2134376448	13	83	31	191	120	""	"AmiDialog"	"Labels"

@Outline2@<:#284,9360>FONT	8	"Helv"

@Outline2@<:#284,9360>4	12	132	78	9000	1352728579	"listbox"	""	0 

@Outline2@<:#284,9360>4	12	132	78	9002	1352728579	"listbox"	""	0 

@Outline2@<:#284,9360>144	4	38	14	1	1342373889	"button"	"&Merge"	0 

@Outline2@<:#284,9360>144	22	38	14	3	1342373888	"button"	"Ma&nual"	0 

@Outline2@<:#284,9360>144	40	38	14	4	1342373888	"button"	"&Custom"	0 

@Outline2@<:#284,9360>144	66	38	14	2	1342373888	"button"	"Cancel"	0 

@Outline2@<:#284,9360>108	94	26	12	24	1342373888	"button"	"in."	0 

@Outline2@<:#284,9360>4	108	74	10	20	1342242819	"button"	"&Sort by label type"	0 

@Outline2@<:#284,9360>4	96	44	8	1001	1342177280	"static"	"Dimensions:"	0 

@Outline2@<:#284,9360>46	96	60	8	1002	1342177280	"static"	"heightwidth"	0 

@Outline2@<:#284,9360>6	2	38	8	1000	1342177280	"static"	"&Labels:"	0 

@Outline2@<:#284,9360>108	108	38	10	1003	1342177280	"static"	"&Page type:"	0 

@Outline2@<:#284,9360>146	108	42	10	1004	1342177280	"static"	"Continuous"	0 

@Outline2@<:#284,9360>END DIALOG

>

[Embedded]
00043016
>
[macsum] 25
label 0 0 35 31
freeglobs 4482 0 1 209
unitbutton 4540 3 4 213
helper 5079 0 4 236
prebuild 5258 3 6 242
sorttype 5850 3 2 261
heightwidthcallback 6278 3 10 275
losezeros 6768 1 1 295
roundtotwo 7111 1 1 308
converttounits 7209 1 3 311
GetNumLabelKeys 7521 1 3 326
mergem 7632 1 29 331
manualem 9392 1 28 398
A4Size 10844 2 1 452
LetterSize 11153 2 1 460
ManualSize 11466 4 1 468
customem 11779 0 1 477
zeromin 11820 1 1 481
twips 11893 1 1 487
getdatafile 11938 0 2 490
getmergedescfile 12014 0 2 494
PrinterType 12096 0 4 498
GetCurrentCountry 12762 0 1 517
AmiUIGray 12830 2 3 520
labeltest 12967 0 -1 525
[macse]
14 label
0 267
13
7 ""
18 1
0 34 0 0
13
5 0
18 1
1 2
11 00000195
0 3 "This macro is for the _LABEL style sheet.  To use it, choose File/New and leave Run macro selected."
6 0
15
9
0 296 1
0 32 2
0 271 "Setfont:hFont" 1
0 264 "Setfont:hFont" 0
0 802
13
8 1
0 271 "units" 1
0 271 "inifile" 1
7 "AMILABEL.INI"
8 2
0 286 "LabelTypes" "Headings" "{2}"
13
8 3
6 3
7 ""
18 0
11 00000707
0 798
13
8 4
0 16 "{4}" "{2}"
13
8 5
0 286 "LabelTypes" "Headings" "{5}"
13
8 3
6 3
7 ""
18 0
11 00000697
0 295
13
8 4
0 16 "{4}" "{2}"
13
8 5
0 286 "LabelTypes" "Headings" "{5}"
13
8 3
6 3
7 ""
18 0
11 00000697
0 3 "Cannot locate AMILABEL.INI"
6 0
15
9
6 5
8 2
0 264 "inifile" "{2}"
0 286 "LabelTypes" "Units" "{2}"
13
8 6
6 6
7 ""
18 0
11 00000857
0 287 "LabelTypes" "Units" "in." "{2}"
7 "in."
8 6
0 264 "units" "{6}"
0 286 "AmiProOwner" "PrefPrinter" "{2}"
13
8 7
6 7
7 ""
18 0
11 00000983
16 PrinterType
13
8 7
0 286 "AmiProOwner" "PrefCountry" "{2}"
13
8 8
6 8
7 ""
18 0
11 00001094
16 GetCurrentCountry
13
8 8
7 "United Kingdom, Austria, Belgium (Dutch), Belguim (French), Denmark, Finland, France, Germany, Iceland, Ireland, Netherlands, Norway, Portugal, Spain, Switzerland (French), Switzerland (German), Switzerland (Italian)"
8 9
6 7
7 "Laser"
18 0
6 8
7 "United States"
18 0
1 1
11 00001428
7 "8.5"" x 11"""
8 10
10 00001785
6 7
7 "Dot Matrix"
18 0
6 8
7 "United States"
18 0
1 1
11 00001538
7 "Continuous"
8 10
10 00001785
6 7
7 "Laser"
18 0
0 808 0 "{9}" "{8}"
13
1 1
11 00001630
7 "A4"
8 10
10 00001785
6 7
7 "Dot Matrix"
18 0
0 808 0 "{9}" "{8}"
13
1 1
11 00001750
7 "UK Contin. French Contin."
8 10
10 00001785
7 "8.5"" x 11"" Continuous"
8 10
0 16 "{10}" " Custom"
13
8 10
0 286 "LabelTypes" "NextCustomLabelKey" "{2}"
13
8 11
6 11
7 ""
18 0
11 00001979
7 "Label95"
8 11
0 287 "LabelTypes" "NextCustomLabelKey" "{11}" "{2}"
0 789 "Loading label types..."
0 296 1
16 GetNumLabelKeys "{11}"
13
8 12
0 39 13
13
8 13
6 12
21 14 [X]
5 1
8 15
6 12
6 15
18 2
12 00002183
10 00002528
5 1
6 15
3 0
8 15
10 00002104
0 16 "Label" "{15}"
13
8 16
0 286 "LabelTypes" "{16}" "{2}"
13
8 17
0 20 "{17}" 11 ","
13
8 18
0 14 "{17}"
13
5 10
18 5
11 00002342
10 00002528
0 808 0 "{10}" "{18}"
13
11 00002486
6 19
5 1
3 0
8 19
6 19
0 16 "{17}" "~" "{15}"
13
23 14
0 789 "Loading label {19}"
10 00002515
0 789 "Checking label {15}"
10 00002148
0 789 "Sorting labels..."
5 1
8 20
5 2
6 20
18 2
12 00002644
10 00003515
5 1
6 20
3 0
8 20
10 00002566
6 20
5 1
18 0
11 00002722
0 789 "Sorting by part number..."
10 00002756
0 789 "Sorting by label type..."
6 19
21 21 [X]
5 1
8 22
5 2
8 23
5 1
8 15
6 19
6 15
18 2
12 00002885
10 00003399
5 1
6 15
3 0
8 15
10 00002806
6 15
22 14
0 20 [X] "{22}" ","
13
8 24
6 15
22 14
0 20 [X] "{23}" ","
13
8 25
6 15
22 14
0 20 [X] 2 "~"
13
8 26
7 "                                                                                              ~"
8 27
6 26
5 0
18 3
11 00003386
6 20
5 1
18 0
11 00003276
0 16 "{24}" " - " "{25}" "{27}" "{26}"
13
8 28
0 789 "Loading part number {24}"
10 00003360
0 16 "{25}" " - " "{24}" "{27}" "{26}"
13
8 28
0 789 "Loading description {25}"
0 1041 &21 "{15}" "{28}"
10 00002850
6 20
5 1
18 0
11 00003457
0 31 9000 &21
10 00003502
6 20
5 2
18 0
11 00003502
0 31 9002 &21
10 00002609
0 31 20 1
0 789 "Preparing labels for display..."
0 47 112 "{1}!helper"
0 41 9000 "{1}!heightwidthcallback"
0 41 9002 "{1}!heightwidthcallback"
0 41 24 "{1}!unitbutton"
0 41 20 "{1}!sorttype"
0 41 0 "{1}!prebuild"
0 789 ""
0 296 0
0 26 "." "labeltest"
13
8 29
6 29
5 0
18 0
6 29
5 2
18 0
1 2
11 00003879
16 freeglobs
6 0
15
9
10 00003948
6 29
5 4
18 0
11 00003948
16 customem
16 freeglobs
6 0
15
9
0 27 20
13
5 1
18 0
11 00004019
0 27 9002
13
8 30
10 00004077
0 27 20
13
5 0
18 0
11 00004077
0 27 9000
13
8 30
0 20 "{30}" 2 "~"
13
8 31
0 1044 &14 "{31}" 2 "~"
13
8 32
6 32
22 14
8 33
0 20 "{33}" 1 "~"
13
8 33
5 1
6 29
18 0
11 00004250
16 mergem "{33}"
10 00004300
5 3
6 29
18 0
11 00004300
16 manualem "{33}"
16 freeglobs
0 265 "Setfont:hFont"
13
8 34
5 0
6 34
18 1
11 00004413
0 284 "gdi,DeleteObject,HH" "{34}"
0 271 "Setfont:hFont" 1
0 266 "Setfont:hFont"
0 296 0
6 0
15
9
14 freeglobs
0 266 "units"
0 266 "inifile"
6 0
15
9
14 unitbutton
0 32 2
0 265 "units"
13
8 4
7 "in."
6 4
18 0
11 00000107
7 "cm."
8 5
10 00000278
7 "cm."
6 4
18 0
11 00000169
7 "picas"
8 5
10 00000278
7 "picas"
6 4
18 0
11 00000231
7 "pt."
8 5
10 00000278
7 "pt."
6 4
18 0
11 00000278
7 "in."
8 5
0 265 "inifile"
13
8 6
0 287 "LabelTypes" "Units" "{5}" "{6}"
0 264 "units" "{5}"
0 43 "{0}" "{1}" "{5}"
0 42 "{0}" 20
13
5 1
18 0
11 00000486
16 heightwidthcallback "{0}" 9002 "{2}"
10 00000527
16 heightwidthcallback "{0}" 9000 "{2}"
6 3
15
9
14 helper
0 284 "user,FindWindow,HCC" "AmiProWndA" 0
13
8 1
0 798
13
0 16 [X] "amipro.hlp"
13
8 2
5 139
8 3
0 284 "user,WinHelp,HHCHJ" "{1}" "{2}" 1 "{3}"
6 0
15
9
14 prebuild
5 20
8 1
16 sorttype "{0}" "{1}" "{2}"
5 9002
8 1
16 heightwidthcallback "{0}" "{1}" "{2}"
0 265 "units"
13
0 43 "{0}" 24 [X]
0 284 "gdi,CreateFont,HHHHHHHHHHHHHHC" 13 0 0 0 400 0 0 0 0 0 0 0 0 "Helv"
13
8 4
6 4
11 00000580
0 44 "{0}" 9000
13
8 5
0 44 "{0}" 9002
13
8 6
0 44 "{0}" 1002
13
8 7
0 44 "{0}" 1004
13
8 8
0 284 "user,SendMessage,HHHHJ" "{5}" 48 "{4}" 0
0 284 "user,SendMessage,HHHHJ" "{6}" 48 "{4}" 0
0 284 "user,SendMessage,HHHHJ" "{7}" 48 "{4}" 0
0 284 "user,SendMessage,HHHHJ" "{8}" 48 "{4}" 0
0 264 "Setfont:hFont" "{4}"
6 3
15
9
14 sorttype
0 42 "{0}" "{1}"
13
8 4
6 4
5 1
18 0
11 00000249
0 44 "{0}" 9002
13
0 284 "User,ShowWindow,AHH" [X] 1
0 44 "{0}" 9000
13
0 284 "User,ShowWindow,AHH" [X] 0
5 9002
8 1
16 heightwidthcallback "{0}" "{1}" "{2}"
10 00000416
0 44 "{0}" 9000
13
0 284 "User,ShowWindow,AHH" [X] 1
0 44 "{0}" 9002
13
0 284 "User,ShowWindow,AHH" [X] 0
5 9000
8 1
16 heightwidthcallback "{0}" "{1}" "{2}"
6 3
15
9
14 heightwidthcallback
0 32 2
7 "AMILABEL.INI"
8 4
0 42 "{0}" "{1}"
13
8 5
0 20 "{5}" 2 "~"
13
8 6
0 16 "Label" "{6}"
13
8 7
0 286 "LabelTypes" "{7}" "{4}"
13
8 8
0 20 "{8}" 3 ","
13
8 9
16 converttounits "{9}"
13
8 9
16 roundtotwo "{9}"
13
8 9
0 20 "{8}" 4 ","
13
8 10
16 converttounits "{10}"
13
8 10
16 roundtotwo "{10}"
13
8 10
0 16 "{9}" " x " "{10}"
13
8 11
0 43 "{0}" 1002 "{11}"
0 20 "{8}" 11 ","
13
8 12
0 43 "{0}" 1004 "{12}"
6 3
15
9
14 losezeros
0 277 "{0}"
13
5 1
18 1
0 808 0 "{0}" "."
13
5 0
18 0
1 2
11 00000116
6 0
8 1
6 1
15
9
0 807 "{0}" 1
13
5 0
18 0
11 00000224
0 14 "{0}"
13
5 1
3 1
0 806 "{0}" [X]
13
8 0
10 00000116
0 807 "{0}" 1
13
7 "."
18 0
11 00000321
0 14 "{0}"
13
5 1
3 1
0 806 "{0}" [X]
13
8 0
6 0
8 1
6 1
15
9
14 roundtotwo
6 0
5 100
4 0
0 786 [X]
13
5 100
4 1
0 19 "" "" 2 [X]
13
8 1
6 1
15
9
14 converttounits
0 265 "units"
13
8 2
7 "in."
6 2
18 0
11 00000099
6 0
8 3
10 00000290
7 "cm."
6 2
18 0
11 00000168
5 2.54
6 0
4 0
8 3
10 00000290
7 "picas"
6 2
18 0
11 00000236
5 6
6 0
4 0
8 3
10 00000290
7 "pt."
6 2
18 0
11 00000290
5 72
6 0
4 0
8 3
6 3
8 1
6 1
15
9
14 GetNumLabelKeys
0 14 "{0}"
13
5 5
3 1
8 2
0 807 "{0}" "{2}"
13
8 3
6 3
5 1
3 0
8 1
6 1
15
9
14 mergem
0 20 "{0}" 3 ","
13
8 2
0 20 "{0}" 4 ","
13
8 3
0 20 "{0}" 5 ","
13
8 4
0 20 "{0}" 6 ","
13
8 5
0 20 "{0}" 7 ","
13
8 6
0 20 "{0}" 8 ","
13
8 7
0 20 "{0}" 9 ","
13
8 8
0 20 "{0}" 10 ","
13
8 9
6 9
7 "-"
18 0
11 00000269
6 2
8 9
6 8
7 "-"
18 0
11 00000310
6 3
8 8
0 265 "inifile"
13
8 10
0 286 "AmiProOwner" "FineRightMargin" "{10}"
13
8 11
6 11
7 ""
18 0
11 00000439
5 0.125
8 11
0 286 "AmiProOwner" "FineIndRight" "{10}"
13
8 12
6 12
7 ""
18 0
11 00000537
5 0.25
8 12
0 286 "AmiProOwner" "FineIndTop" "{10}"
13
8 13
6 12
7 ""
18 0
11 00000633
5 0.25
8 13
6 7
6 12
3 1
16 zeromin [X]
13
16 Twips [X]
13
8 14
6 6
6 13
3 1
16 zeromin [X]
13
16 Twips [X]
13
8 15
16 twips 0
13
8 16
16 twips 0
13
8 17
6 8
6 3
3 1
6 11
16 zeromin [X]
13
3 0
16 twips [X]
13
8 18
6 9
6 2
3 1
16 zeromin [X]
13
16 twips [X]
13
8 19
16 twips "{9}"
13
8 20
16 twips "{8}"
13
8 21
6 3
6 11
3 1
16 twips [X]
13
8 22
6 22
5 2
4 1
8 23
6 23
5 3
4 1
8 24
6 24
5 2
4 0
8 25
2 210 1
2 361 1 512
2 363 1 "{17}" "{16}" "{18}" "{19}" 1 0 1 "{17}" "{22}" 4 1 "{24}" 1 "{25}" 2 "{23}" 3 "{22}"
2 364 1 "{17}" 0 "{18}" 0 1 0 1 "{17}" "{22}" 4 1 "{24}" 1 "{25}" 2 "{23}" 3 "{22}"
2 365 1 "{17}" 0 "{18}" 0 1 0 1 "{17}" "{22}" 4 1 "{24}" 1 "{25}" 2 "{23}" 3 "{22}"
2 362 1 "{20}" "{21}" 1 7
2 376 1
0 284 "User,GetActiveWindow,H"
13
8 26
0 802
13
8 27
0 285 "{27}!AmiUIGray(3, 0)" 0.1
0 285 "{27}!AmiUIGray(4, 0)" 0.1
0 274 005
24 788
0 274 001
16 getdatafile
13
8 28
6 28
7 ""
18 1
11 00001715
16 GetMergeDescFile
13
8 29
2 110 4 24 "{28}" "{29}" "{4}" "{5}" "{14}" "{15}"
2 116 1 4
0 284 "User,SetFocus,HH" "{26}"
6 1
15
9
14 manualem
0 20 "{0}" 3 ","
13
8 2
0 20 "{0}" 4 ","
13
8 3
0 20 "{0}" 5 ","
13
8 4
0 20 "{0}" 6 ","
13
8 5
0 20 "{0}" 7 ","
13
8 6
0 20 "{0}" 8 ","
13
8 7
0 20 "{0}" 9 ","
13
8 8
0 20 "{0}" 10 ","
13
8 9
0 20 "{0}" 11 ","
13
8 10
6 9
7 "-"
18 0
11 00000300
6 2
8 9
6 8
7 "-"
18 0
11 00000341
6 3
8 8
5 0.125
8 11
5 0.125
8 12
5 0
8 13
5 0.5
6 4
4 1
8 14
6 7
6 12
3 0
16 zeromin [X]
13
16 Twips [X]
13
8 15
6 6
6 13
3 1
16 zeromin [X]
13
16 Twips [X]
13
8 16
16 twips 0
13
8 17
16 twips 0
13
8 18
6 8
6 3
3 1
6 11
16 zeromin [X]
13
3 0
16 twips [X]
13
8 19
6 9
6 2
3 1
16 zeromin [X]
13
16 twips [X]
13
8 20
16 twips "{2}"
13
8 21
6 3
6 14
3 1
16 zeromin [X]
13
16 twips [X]
13
8 22
6 3
6 11
3 1
16 twips [X]
13
8 23
6 23
5 2
4 1
8 24
6 24
5 3
4 1
8 25
6 25
5 2
4 0
8 26
16 Twips "{9}"
13
8 27
5 2
6 7
4 0
6 8
6 4
4 0
3 0
16 Twips [X]
13
8 28
6 10
7 "A4"
18 0
11 00001124
16 A4Size "{15}" "{16}"
2 457 1 1 0 "{4}" "{5}"
2 626 1 2 0 "{22}" "{19}" "{21}" "{20}" 0 0 0 0 0 1
10 00001440
6 10
7 "Continuous"
18 0
11 00001333
6 27
6 16
3 0
16 ManualSize "{15}" "{16}" [X] "{28}"
6 4
5 1
18 3
11 00001320
2 457 1 1 0 "{4}" 1
2 626 1 2 0 "{22}" "{19}" "{21}" 0 0 0 0 0 0 1
10 00001440
16 LetterSize "{15}" "{16}"
2 457 1 1 0 "{4}" "{5}"
2 626 1 2 0 "{22}" "{19}" "{21}" "{20}" 0 0 0 0 0 1
6 1
15
9
14 A4Size
2 361 1 512
2 363 1 "{0}" "{1}" 0 0 1 0 1 "{0}" 11908 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640
2 362 1 16833 11908 1 4
2 364 1 "{0}" 0 0 0 1 0 1 "{0}" 11908 2 2 4680 3 9360
2 365 1 "{0}" 0 0 0 1 0 1 "{0}" 11908 2 2 4680 3 9360
2 376 1
6 2
15
9
14 LetterSize
2 361 1 512
2 363 1 "{0}" "{1}" 0 0 1 0 1 "{0}" 12240 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640
2 362 1 15840 12240 1 1
2 364 1 "{0}" 0 0 0 1 0 1 "{0}" 12240 2 2 4680 3 9360
2 365 1 "{0}" 0 0 0 1 0 1 "{0}" 12240 2 2 4680 3 9360
2 376 1
6 2
15
9
14 ManualSize
2 361 1 512
2 363 1 "{0}" "{1}" 0 0 1 0 1 "{0}" "{3}" 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640
2 362 1 "{2}" "{3}" 1 1
2 364 1 "{0}" 0 0 0 1 0 1 "{0}" "{3}" 2 2 4680 3 9360
2 365 1 "{0}" 0 0 0 1 0 1 "{0}" "{3}" 2 2 4680 3 9360
2 376 1
6 4
15
9
14 customem
24 352
24 788
6 0
15
9
14 zeromin
6 0
5 0
18 5
11 00000051
5 0
8 0
6 0
8 1
6 1
15
9
14 twips
6 0
5 1440
4 0
8 1
6 1
15
9
14 getdatafile
0 1313 165
13
8 1
0 20 "{1}" 8 ","
13
8 0
6 0
15
9
14 getmergedescfile
0 1313 165
13
8 1
0 20 "{1}" 10 ","
13
8 0
6 0
15
9
14 PrinterType
0 1313 62
13
8 1
0 286 "devices" "{1}"
13
8 2
0 20 "{2}" 1 ","
13
0 18 [X]
13
8 3
0 808 0 "CANON10E  HPDSKJET  HPPCL  HPPCL5A  HPPLOT  IBM4019  LBPII  LBPIII  PAINTJET  PSCRIPT  THINKJET  TI850" "{3}"
13
5 0
18 1
11 00000286
7 "Laser"
8 0
10 00000654
0 808 0 "{3}" "PCL"
13
5 0
18 1
11 00000364
7 "Laser"
8 0
10 00000654
0 808 0 "{3}" "JET"
13
5 0
18 1
11 00000442
7 "Laser"
8 0
10 00000654
0 808 0 "CIT24US CIT9US EPSON24 EPSON9 FUJI24 FUJI9 IBMGRX NEC24PIN OKI24 OKI9 OKI9IBM PANSON24 PANSON9 PROPRINT PROPRN24 QWIII TTY" "{3}"
13
5 0
18 1
11 00000644
7 "Dot Matrix"
8 0
10 00000654
6 3
8 0
6 0
15
9
14 GetCurrentCountry
0 286 "intl" "sCountry"
13
8 0
6 0
15
9
14 AmiUIGray
0 284 "User,GetActiveWindow,H"
13
8 3
0 44 "{3}" "{0}"
13
8 4
0 284 "user,EnableWindow,HHH" "{4}" "{1}"
6 2
15
9
DIALOG labeltest
-2134376448 13 83 31 191 120 "" "AmiDialog" "Labels" 
FONT 8 "Helv" 
4 12 132 78 9000 1352728579 "listbox" "" 0 
4 12 132 78 9002 1352728579 "listbox" "" 0 
144 4 38 14 1 1342373889 "button" "&Merge" 0 
144 22 38 14 3 1342373888 "button" "Ma&nual" 0 
144 40 38 14 4 1342373888 "button" "&Custom" 0 
144 66 38 14 2 1342373888 "button" "Cancel" 0 
108 94 26 12 24 1342373888 "button" "in." 0 
4 108 74 10 20 1342242819 "button" "&Sort by label type" 0 
4 96 44 8 1001 1342177280 "static" "Dimensions:" 0 
46 96 60 8 1002 1342177280 "static" "heightwidth" 0 
6 2 38 8 1000 1342177280 "static" "&Labels:" 0 
108 108 38 10 1003 1342177280 "static" "&Page type:" 0 
146 108 42 10 1004 1342177280 "static" "Continuous" 0 
00043041
