//Icarus to Reticle of #1?Icarus" File:# to #2?Output" File(no" extension):# #3?Hundredths" microns" per" Icarus" units" (2" numbers):# #4?per:# // This version is a big kludge - // The magic code is set up to generate all layer files in one pass. // However PressOut can't handle more than one Press file at a time, even though it's supposed to. Problems are insufficient state held in PressFileDescriptor, and use of a single buffer file EntityList$. // If PressOut ever gets fixed then all the vis~invis stuff below can be removed and Magic will generate all Reticle files in one pass, instead of the one pass per layer used here. // i.e. the command should be: //JaM magic (#1) #3 #4 readic outline reticle (#2)output .quit JaM magic (#1) #3 #4 readic outline reticle ^ (NI)invis (ND)invis (NP)invis (NC)invis (NM)invis (NB)invis (NG)invis ^ (NI)vis (#2)output (NI)invis ^ (ND)vis (#2)output (ND)invis ^ (NP)vis (#2)output (NP)invis ^ (NC)vis (#2)output (NC)invis ^ (NM)vis (#2)output (NM)invis ^ (NB)vis (#2)output (NB)invis ^ (NG)vis (#2)output (NG)invis ^ .quit