This is a CTK panel and Macro set up with 16 different directories and the input for the file name. Hope it helps.....
<<Codepanel.pcb>>
MASK[TL=*, SH=0]
MASK[TL=200, SH=1]
IF(#AT=0)
ENDIF
IF(#AT=1)
CODE[FN=STRTMP("J:\\PROG\\SM7\D010\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D010\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=2)
CODE[FN=STRTMP("J:\\PROG\\SM7\D015\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D015\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=3)
CODE[FN=STRTMP("J:\\PROG\\SM7\D020\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D020\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=4)
CODE[FN=STRTMP("J:\\PROG\\SM7\D025\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D025\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
//
IF(#AT=5)
CODE[FN=STRTMP("J:\\PROG\\SM7\D030\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D030\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=6)
CODE[FN=STRTMP("J:\\PROG\\SM7\\D035\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D035\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=7)
CODE[FN=STRTMP("J:\\PROG\\SM7\D040\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D040\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT=8)
CODE[FN=STRTMP("J:\\PROG\\SM7\D045\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D045\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=0)
ENDIF
IF(#AT1=1)
CODE[FN=STRTMP("J:\\PROG\\SM7\D050\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D050\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=2)
CODE[FN=STRTMP("J:\\PROG\\SM7\D055\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D055\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=3)
CODE[FN=STRTMP("J:\\PROG\\SM7\D060\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D060\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=4)
CODE[FN=STRTMP("J:\\PROG\\SM7\D065\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D065\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
//
IF(#AT1=5)
CODE[FN=STRTMP("J:\\PROG\\SM7\D070\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D070\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=6)
CODE[FN=STRTMP("J:\\PROG\\SM7\\D075\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D075\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=7)
CODE[FN=STRTMP("J:\\PROG\\SM7\D080\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D080\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
IF(#AT1=8)
CODE[FN=STRTMP("J:\\PROG\\SM7\D075\\%#FILE.P4"),
MF="C:\\SM1\\Fsmf\\SALVAP.SMF",TF="C:\\SM1\\Fsmf\\SALVAP.TMP",SH=1,
DC=1,RP=0,ST=1,DT=1,SP=9]
CODE[FN="J:\PROG\SM7\D075\D000000",
MF="C:\SM1\FSMF\SALVA.SMF",
TF="C:\SM1\FSMF\SALVA.TMP", SH=0, DC=0, SP=9] // HELP FILE
ENDIF
MASK[TL=*, SH=1]
MASK[TL=200, SH=0]
Greg King
Group Leader
Manufacturing Services
Rittal Corporation
937-399-0500 Ext. 3371
[EMAIL PROTECTED]
> -----Original Message-----
> From: B Rider [SMTP:[EMAIL PROTECTED]]
> Sent: Thursday, July 13, 2000 3:14 AM
> To: SmartCam Forum
> Subject: [mfg-smartcam] macro question
>
> I am creating a macro, and I would like to use the box that comes up when
> you use the code command. The box that allows you select where your files
> are saved, the code filename, etc.
>
> Has anyone been able to do this or have any other suggestions that may be
> useful?
>
> Thanks in advance
>
> b. rider
Codepanel.pcb
Description: Binary data
