g}y=w
O#.F?.
CDBSE&File
&Open...	Ctrl+O
&Save	Ctrl+S
Save &As...
saveas
&Import...
import
&Export...
export
Print Set&up...
printsetup
&Print Pages...	Ctrl+P
printpages
Prin&t Report...
printreport
Send &Mail...
sendmail
&Run...
E&xit	Alt+F4
&Edit
&Undo	Ctrl+Z
Cu&t	Ctrl+X
&Copy	Ctrl+C
&Paste	Ctrl+V
paste
C&lear	Del
clear
Select &All	Shift+F9
selectall
Select Pa&ge	Shift+F12
selectpage
&Size to Page	F11
sizetopage
F&ind...	F5
Re&place...
replace
Aut&hor	F3
author
&Text
&Character...	F6
character
&Paragraph...	F7
paragraph
&Regular	Ctrl+Space
regular
&Bold	Ctrl+B
&Italic	Ctrl+I
italic
&Underline	Ctrl+U
underline
Stri&keout	Ctrl+K
strikeout
Superscrip&t/Subscript
superscriptSubscript
&Normal Script
normalscript
Su&bscript	Ctrl+L
subscript
Su&perscript	Ctrl+Shift+L
superscript
&Show Hotwords	F9
showhotwords
&Page
&Next	Alt+Right
&Previous	Alt+Left
previous
&First	Alt+Up
first
&Last	Alt+Down
&Back	Shift+F2
&History...	Ctrl+F2
history
N&ew Page	Ctrl+N
newpage
&Help
&Contents	F1
contents
Status &Bar	F12
statusbar
enterbook
\pcx\music\
cca10.DAT
cca31.DAT
\pcx\birds\
\pcx\arrows\
cca36.DAT
\pcx\trains\
\pcx\travel\
ccao9.DAT
cca12.DAT
\pcx\food\
cca40.DAT
\pcx\children\
cca14.DAT
cca20.DAT
\pcx\silhoet\
cca25.DAT
\pcx\cartoons\
\pcx\xmas\
\pcx\cats\
\pcx\symbols\
\pcx\maps\
cca26.DAT
cca01.DAT
ccao4.DAT
cca18.DAT
\pcx\occasio\
cca13.DAT
ccao5.DAT
cca23.DAT
\pcx\sports\
cca30.DAT
\pcx\people\
szCategory
\pcx\circus\
cca17.DAT
ccao6.DAT
cca41.DAT
cca34.DAT
\pcx\plants\
\pcx\religion\
cca33.DAT
ccao3.DAT
\pcx\borders\
\pcx\frames\
cca38.DAT
\pcx\health\
nCategorynumber
\pcx\misc\
cca22.DAT
cca24.DAT
nfilesincategory
cca37.DAT
\pcx\dogs\
\pcx\fish\
\pcx\autumn\
cca21.DAT
\pcx\trans\
\pcx\nautical\
cca19.DAT
ccao2.DAT
szsubpath
\pcx\western\
\pcx\educatio\
cca28.DAT
\pcx\signs\
\pcx\letters\
cca32.DAT
\pcx\home\
cca11.DAT
cca27.DAT
sztmpclp
cca39.DAT
ccao8.DAT
\pcx\recreati\
cca15.DAT
\pcx\hands\
\pcx\horses\
ccao7.DAT
cca16.DAT
\pcx\astro\
\pcx\holidays\
\pcx\romance\
\pcx\business\
\pcx\animals\
cca35.DAT
cca29.DAT
setvariables
.&+	+E
V,	#>
V,	#>
.&+	+E
nfilesincategory
szMedia
Done Importing
setvariables
szsubpath
t.BMP
mainctr
szCategory
start
ButtonClick
$$$$$$$/$/$/////9/9:/999<99<<<<<<<BBBBBBBFBFBFFFFIFIIIII:IPIPP   
4szCategory
4nfilesincategory
4szsubpath
setvariables ncasenumber
nCategorynumber = 
nCategoryNumber = 1
 = 101000
nFilesinCategory = 163
szsubPath = "\pcx\animals\"
setMediaPaths
sztmpclp = 
& "cca01.DAT"
importclips 
ncategoryNumber = 2
 = 102000
arrows\"
SetMediapaths
~& "ccao2.
 = 103000
astro\"
& "ccao3.
 = 104000
utumn\"
& "ccao4.
 = 105000
birds\"
& "ccao5.
 = 106000
borders\" 	
& "ccao6.
 = 107000
business\"
& "ccao7.
 = 108000
cartoons\"
& "ccao8.
 = 109000
cats\"
& "ccao9.
 = 11
children\"
& "cca10.
 = 111000
circus\"
& "cca11.
 = 112000
dogs\"	
& "cca12.
 = 113000
educatio\"	
& "cca13.
 = 114000
fish\"
& "cca14.
 = 115000
food\"
& "cca15.
 = 116000
frames\"
& "cca16.
 = 117000
hands\"
& "cca17.
 = 118000
health\"
& "cca18.
 = 119000
holidays\"	
& "cca19.
 = 12
home\"
& "cca20.
 = 121000
horses\"
& "cca21.
 = 122000
letters\"
& "cca22.
 = 123000
maps\"
& "cca23.
 = 124000
misc\"
& "cca24.
 = 125000
music\"		
& "cca25.
,	 = 126000
nautical\"
& "cca26.
	 = 127000
occasio\"
& "cca27.
	 = 128000
L	151
<	people\"
%	& "cca28.
 = 129000
	plants\"
}	& "cca29.
 = 13
	recreati\"	
	& "cca30.
 = 131000
religion\"
& "cca31.
 = 132000
romance\"	
& "cca32.
 = 133000
signs\"
& "cca33.
 = 134000
silhoet\"
& "cca34.
 = 135000
sports\"
& "cca35.
 = 136000
symbols\"
& "cca36.
 = 137000
trains\"		
& "cca37.
 = 138000
trans\"
& "cca38.
 = 139000
travel\"
& "cca39.
 = 14
western\"
& "cca40.
 = 141000
xmas\"	
& "cca41.
To Handle ButtonClick
4szCategory
4nfilesincategory
4szsubpath
MainCounter = 
endno = 
While 
setvariables Maincounter
"mainctr" = maincounter
* < nFilesincategory + 1 
szMedia = "f:" & szsubPath & (
& ".PCX"
mmYield
qclip 
Name 
mmSearchCD 
= True
mmSearchHD 
processing 
tnail 
szt = 
U"l" 
zt & (
& "t.BMP"
szmedia
) & "t" 
"Done Importing"
141001
141001t
141002
141002t
141003
141003t
141004
141004t
141005
141005t
141006
141006t
141007
141007t
141008
141008t
141009
141009t
141010
141010t
141011
141011t
141012
141012t
141013
141013t
141014
141014t
141015
141015t
141016
141016t
141017
141017t
141018
141018t
141019
141019t
141020
141020t
141021
141021t
141022
141022t
141023
141023t
141024
141024t
141025
141025t
141026
141026t
141027
141027t
141028
141028t
141029
141029t
141030
141030t
141031
141031t
141032
141032t
141033
141033t
141034
141034t
141035
141035t
141036
141036t
141037
141037t
141038
141038t
141039
141039t
141040
141040t
141041
141041t
f:\pcx\xmas\141001.PCX
f:\tnail\xmas\141001t.BMP
f:\pcx\xmas\141002.PCX
f:\tnail\xmas\141002t.BMP
f:\pcx\xmas\141003.PCX
f:\tnail\xmas\141003t.BMP
f:\pcx\xmas\141004.PCX
f:\tnail\xmas\141004t.BMP
f:\pcx\xmas\141005.PCX
f:\tnail\xmas\141005t.BMP
f:\pcx\xmas\141006.PCX
f:\tnail\xmas\141006t.BMP
f:\pcx\xmas\141007.PCX
f:\tnail\xmas\141007t.BMP
f:\pcx\xmas\141008.PCX
f:\tnail\xmas\141008t.BMP
f:\pcx\xmas\141009.PCX
f:\tnail\xmas\141009t.BMP
f:\pcx\xmas\141010.PCX
f:\tnail\xmas\141010t.BMP
f:\pcx\xmas\141011.PCX
f:\tnail\xmas\141011t.BMP
f:\pcx\xmas\141012.PCX
f:\tnail\xmas\141012t.BMP
f:\pcx\xmas\141013.PCX
f:\tnail\xmas\141013t.BMP
f:\pcx\xmas\141014.PCX
f:\tnail\xmas\141014t.BMP
f:\pcx\xmas\141015.PCX
f:\tnail\xmas\141015t.BMP
f:\pcx\xmas\141016.PCX
f:\tnail\xmas\141016t.BMP
f:\pcx\xmas\141017.PCX
f:\tnail\xmas\141017t.BMP
f:\pcx\xmas\141018.PCX
f:\tnail\xmas\141018t.BMP
f:\pcx\xmas\141019.PCX
f:\tnail\xmas\141019t.BMP
f:\pcx\xmas\141020.PCX
f:\tnail\xmas\141020t.BMP
f:\pcx\xmas\141021.PCX
f:\tnail\xmas\141021t.BMP
f:\pcx\xmas\141022.PCX
f:\tnail\xmas\141022t.BMP
f:\pcx\xmas\141023.PCX
f:\tnail\xmas\141023t.BMP
f:\pcx\xmas\141024.PCX
f:\tnail\xmas\141024t.BMP
f:\pcx\xmas\141025.PCX
f:\tnail\xmas\141025t.BMP
f:\pcx\xmas\141026.PCX
f:\tnail\xmas\141026t.BMP
f:\pcx\xmas\141027.PCX
f:\tnail\xmas\141027t.BMP
f:\pcx\xmas\141028.PCX
f:\tnail\xmas\141028t.BMP
f:\pcx\xmas\141029.PCX
f:\tnail\xmas\141029t.BMP
f:\pcx\xmas\141030.PCX
f:\tnail\xmas\141030t.BMP
f:\pcx\xmas\141031.PCX
f:\tnail\xmas\141031t.BMP
f:\pcx\xmas\141032.PCX
f:\tnail\xmas\141032t.BMP
f:\pcx\xmas\141033.PCX
f:\tnail\xmas\141033t.BMP
f:\pcx\xmas\141034.PCX
f:\tnail\xmas\141034t.BMP
f:\pcx\xmas\141035.PCX
f:\tnail\xmas\141035t.BMP
f:\pcx\xmas\141036.PCX
f:\tnail\xmas\141036t.BMP
f:\pcx\xmas\141037.PCX
f:\tnail\xmas\141037t.BMP
f:\pcx\xmas\141038.PCX
f:\tnail\xmas\141038t.BMP
f:\pcx\xmas\141039.PCX
f:\tnail\xmas\141039t.BMP
f:\pcx\xmas\141040.PCX
f:\tnail\xmas\141040t.BMP
f:\pcx\xmas\141041.PCX
f:\tnail\xmas\141041t.BMP
-')))-
-)))))'
))))))),
'))))))'
-)))))))
-)))))))
-)))))))
-))))))'
))))))'
)))))))
)))))))
))))),)
))))),
))))),
))))))
*'''''*
))))))
*'('('('*
))))))
*'''***''(
))))))
))))))
))))))
false
:HDMEDIAPATH
System
<BookPath>;d:\bmp\cat800;d:\tnail\cat800
syschangedb
false
System
enterbook
nCategorynumber
setvariables
4szCategory
4nfilesincategory
4szsubpath
setvariables ncasenumber
nCategorynumber = 
V,	#>
nStart
szPath
szMedia
Please Enter the Category Name to Import
Please Enter the complete path for the media to be imported
Please Enter the Start number of the Media
Please Enter the End number of the Media
szCatName
Done Importing
ButtonClick
To Handle ButtonClick
Ask "Please Enter the Category Name 
Import"
szCatName = It
)complete path 
;media 
be imported"
szPath = It
_Start 
jMedia"
nStart = It
nEnd = It
Counter = 
While 
szMedia = 
+ counter)
& ".BMP"
qclip 
mmSearchCD 
= True
mmSearchHD 
] + 1
"Done Importing"
Import Clip Media
,%H.%
allclips
buttonclick
buttonclick
counter = 1
allclips = resourceList("
szn = 
&clear clips
V,	#>
nStart
szPath
szMedia
Please Enter the Category Name to Import
Please Enter the complete path for the media to be imported
Please Enter the Start number of the Media
Please Enter the End number of the Media
szCatName
Done Importing
ButtonClick
To Handle ButtonClick
Ask "Please Enter the Category Name 
Import"
szCatName = It
)complete path 
;media 
be imported"
szPath = It
_Start 
jMedia"
nStart = It
nEnd = It
Counter = 
While 
szMedia = 
+ counter) & "t"
& ".BMP"
qclip 
e) & "t"
mmSearchCD 
= True
mmSearchHD 
l + 1
"Done Importing"
Import Thumb Nail
Mainctr
Begin Import
buttonclick
buttonclick
resourceCount(clip, 
&Button
start
Start