Can someone check out my code and give me some tips?
STARTUP =ALIGNMENT/START,RECALL:USE_PART_SETUP,LIST=YES ALIGNMENT/END MODE/MANUAL PROBECOM/ON PREHIT/0.25 RETRACT/0.25 CHECK/1,1 FLY/ON,0.1181 TOUCHSPEED/ 1.25 MOVESPEED/ 100 FORMAT/ , , ,HEADINGS, , ;MEAS,NOM,DEV,TOL,OUTTOL, , $$ NO, LOADPROBE/P315Z1314-21_A TIP/T1A0B0, SHANKIJK=0, 0, 1, ANGLE=90 $$ NO, COMMENT/OPER,NO,FULL SCREEN=YES,AUTO-CONTINUE=NO, LOAD PART PER SET UP $$ NO, SERIAL_NO =COMMENT/INPUT,NO,FULL SCREEN=NO, SERIAL NUMBER............. TEMP =COMMENT/INPUT,NO,FULL SCREEN=NO, CMM ROOM TEMPERATURE...... INSP_BY =COMMENT/INPUT,NO,FULL SCREEN=NO, INSPECTED BY.............. INSP_DATE =COMMENT/INPUT,NO,FULL SCREEN=NO, INSPECTION DATE........... $$ NO, L1 =LABEL/ $$ NO, ASSIGN/COUNT=SERIAL_NO.INPUT $$ NO, COMMENT/REPT, ===================================================================== COMMENT/REPT, = = COMMENT/REPT, = COMPUTER CONTROL INSPECTION RESULTS = COMMENT/REPT, = = COMMENT/REPT, ===================================================================== COMMENT/REPT, = PART NUMBER : 315Z1314-21 = COMMENT/REPT, = CREATION DATE: 08-14-2011 17:46 = COMMENT/REPT, = PROGRAMMER : ALEX = COMMENT/REPT, = PROVEN DATE : 09-14-2011 08:59 = COMMENT/REPT, = PROVEN BY : BRIAN = COMMENT/REPT, = REV : A = COMMENT/REPT, = E.O. : NA = COMMENT/REPT, ===================================================================== $$ NO, COMMENT/REPT, "SERIAL NUMBER............. : " + SERIAL_NO.INPUT COMMENT/REPT, "TEMPERATURE............... : " + TEMP.INPUT JOB_INFO =FILE/OPEN,C:\CMM\JOBINFO.DAT,READ JOB_NO =FILE/READLINE,JOB_INFO,{LINE1} COMMENT/REPT, "JOB NUMBER................ : " + LINE1 PO_NO =FILE/READLINE,JOB_INFO,{LINE2} COMMENT/REPT, "PO NUMBER................. : " + LINE2 FILE/CLOSE,JOB_INFO,KEEP COMMENT/REPT, "INSPECTED BY.............. : " + INSP_BY.INPUT COMMENT/REPT, "INSPECTION DATE........... : " + INSP_DATE.INPUT $$ NO, COMMENT/OPER,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, TAKE FOUR POINTS AT SEQ 6, DATUM C. $$ NO, * * * ============================== INSPECTION STUFF ============================== * * * $$ NO, PRINT/REPORT,EXEC MODE=END,$ TO_FILE=ON,AUTO=1,$ TO_PRINTER=OFF,$ TO_DMIS_REPORT=OFF,FILE_OPTION=INDEX,FILENAME= 315Z1314-21 ,$ REPORT_THEORETICALS=NONE,REPORT_FEATURE_WITH_DIMENSIONS=NO,$ PREVIOUS_RUNS=DELETE_INSTANCES $$ NO, C1 =COMMENT/YESNO,NO,FULL SCREEN=NO,AUTO-CONTINUE=NO, DO YOU WANT TO CHECK ANOTHER PART? $$ NO, IF/C1.INPUT=="YES" $$ NO, ASSIGN/SERIAL_NO.INPUT=COUNT + 1 $$ NO, GOTO/L1 $$ NO, END_IF/ $$ NO,