Hi all,
  Finally success at last!!!!
  I really want to thank everybody who participated in my macro lesson 101
here.  Fred, you finally solved the last mystery, and Andy, thanks for the
macro in the beginning.  So, here is the macro as it works for me.
   Very appreciated, Rick

//THIS MACRO GENERATES CODE FOR THE STAR VNC-20
//WITH A FANUC 6T CONTROL

STRING:#FILE_NAME
STRING:#EXTN
STRING:#YESNO
#EXTN=.DTM
PAUSE[TX="PRODUCE CODE FOR THE STAR ?    OK TO CONTINUE  
CANCEL TO EXIT",PT=1]
PROMPT[TX="ENTER PGM NUMBER With .txt FILE EXT.",
VN="FILE_NAME", DV=0]
PROMPT[TX="DO YOU WANT TO OPEN THE FILE AFTER POSTING IT?
       ENTER 1 FOR YES AND 0 FOR NO!",
VN="YESNO", DV=0]
AUTO_ANSWER[AA="OK"]
CODE[FN=STRTMP("C:\\sm9\\turn\\star\\%#FILE_NAME"),
MS1="C:\\sm9\\turn\\atsmf\\star.smf", 
MT1="C:\\sm9\\turn\\atsmf\\star.tmp", SH=0, DC=0, ST=0, DT=0,SP=9]
IF(#YESNO=0)
GOTO(LABEL)
ENDIF
SHELL[CMD_LN=STRTMP("C:\windows\notepad.exe
C:\\sm9\\turn\\star\\%FILE_NAME"), WA=1, DP=1] 
@LABEL
#YESNO=""
#FILE_NAME=""
#EXTN=""
    

Title: RE: [mfg-smartcam] starting edit plus in smartcam

Hi all,
  Finally success at last!!!!
  I really want to thank everybody who participated in my macro lesson 101 here.  Fred, you finally solved the last mystery, and Andy, thanks for the macro in the beginning.  So, here is the macro as it works for me.

   Very appreciated, Rick

//THIS MACRO GENERATES CODE FOR THE STAR VNC-20
//WITH A FANUC 6T CONTROL

STRING:#FILE_NAME
STRING:#EXTN
STRING:#YESNO
#EXTN=.DTM
PAUSE[TX="PRODUCE CODE FOR THE STAR ?    OK TO CONTINUE 
CANCEL TO EXIT",PT=1]
PROMPT[TX="ENTER PGM NUMBER With .txt FILE EXT.",
VN="FILE_NAME", DV=0]
PROMPT[TX="DO YOU WANT TO OPEN THE FILE AFTER POSTING IT?
       ENTER 1 FOR YES AND 0 FOR NO!",
VN="YESNO", DV=0]
AUTO_ANSWER[AA="OK"]
CODE[FN=STRTMP("C:\\sm9\\turn\\star\\%#FILE_NAME"),
MS1="C:\\sm9\\turn\\atsmf\\star.smf",
MT1="C:\\sm9\\turn\\atsmf\\star.tmp", SH=0, DC=0, ST=0, DT=0,SP=9]
IF(#YESNO=0)
GOTO(LABEL)
ENDIF
SHELL[CMD_LN=STRTMP("C:\windows\notepad.exe C:\\sm9\\turn\\star\\%FILE_NAME"), WA=1, DP=1]
@LABEL
#YESNO=""
#FILE_NAME=""
#EXTN=""
   


Reply via email to