版主帮我看下问题出在哪怎么运行不了呢？但用快捷键调用又可以的

lyh289114980

axlCmdRegister("efilm" `edit_film)
(defun edit_film ()
if( (home = axlGetVariable("home")) then
     menudir = strcat(home "/pcbenv")
  else
   ;;;; NT Only ;;;
   if( (home = axlGetVariable("homedrive") && (homepath = axlGetVariable("homepath"))) then
     menudir = strcat(home homepath "/pcbenv")
   else
     menudir = getWorkingDir()
   ); endif
   
  ); endif
   printf("%s\n" menudir)
   name1 = strcat(menudir "/" "scr" "/" "editfilm.scr")
   printf("%s\n" name1)
   editfilm = outfile(name1 "w")
   fprintf(editfilm "setwindow pcb\n")
   fprintf(editfilm "trapsize 344\n")
   fprintf(editfilm "artwork\n")
   fprintf(editfilm "setwindow form.film_control\n")
   fprintf(editfilm "FORM film_control general_parameters\n")
   fprintf(editfilm "FORM film_control gerber_rs274x YES\n")
   fprintf(editfilm "FORM film_control error_abort_film YES\n")
   fprintf(editfilm "FORM film_control film_max_x 32\n")
   fprintf(editfilm "FORM film_control film_max_y 24\n")
   fprintf(editfilm "FORM film_control format_int_places 3\n")
   fprintf(editfilm "FORM film_control format_dec_places 5\n")
   fprintf(editfilm "FORM film_control units_english YES\n")
   fprintf(editfilm "FORM film_control apertures\n")
   fprintf(editfilm "setwindow form.apt_wheels\n")
   fprintf(editfilm "FORM apt_wheels 1 edit\n")
   fprintf(editfilm "setwindow form.apt_stations\n")
   fprintf(editfilm "FORM apt_stations auto Without Rotation\n")
   fprintf(editfilm "FORM apt_stations apt_done\n")
   fprintf(editfilm "setwindow form.apt_wheels\n")
   fprintf(editfilm "FORM apt_wheels done\n")
   fprintf(editfilm "setwindow form.film_control\n")
   fprintf(editfilm "FORM film_control ok \n")
   fprintf(editfilm "setwindow pcb\n")  
   fprintf(editfilm "\n")
   close(editfilm)
   axlShell("replay  editfilm.scr")
   )

XYX365

你試試看修改下列兩行

axlCmdRegister("efilm" `edit_film ?cmdType "general")

axlShell(strcat("replay " name1))

lyh289114980

XYX365 发表于 2013-8-29 08:20
你試試看修改下列兩行

axlCmdRegister("efilm" `edit_film ?cmdType "general")

谢谢版主，可以了。能给我说下为什么吗？

kkman2000

支持支持支持  非常感謝