IF Open(1,"L:\Sigrity_UPD\master_strips\Unit_Array\unit_array_info.txt", 0) = 0
$DWG_NUMBER = ReadLine(1)
$DWG_REVISION = ReadLine(1)
$SOURCE_FOLDER = ReadLine(1)
ELSE
? ('Cannot find the file')
ENDIF
Close (1)
; gerber name = 123456GBL010A.GBR
$CheckFile = $SOURCE_FOLDER + 'unit.dxf'
;Rename the gerber files
$TIME_OUT = 0
WHILE $TIME_OUT < 300
IF EXIST ( $CheckFile ) ;Check for unit.dxf
IF EXIST ( $SOURCE_FOLDER + 'EB01.gbr' ) MOVE $SOURCE_FOLDER + 'EB01.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBEB01' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'EB04.gbr' ) MOVE $SOURCE_FOLDER + 'EB04.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBEB04' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'INNER.gbr' ) MOVE $SOURCE_FOLDER + 'INNER.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBINNER' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'L01.gbr' ) MOVE $SOURCE_FOLDER + 'L01.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBL01' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'L04.gbr' ) MOVE $SOURCE_FOLDER + 'L04.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBL04' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'S01.gbr' ) MOVE $SOURCE_FOLDER + 'S01.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBS01' + $DWG_REVISION + '.gbr'
IF EXIST ( $SOURCE_FOLDER + 'S04.gbr' ) MOVE $SOURCE_FOLDER + 'S04.gbr' $SOURCE_FOLDER + $DWG_NUMBER + 'GBS04' + $DWG_REVISION + '.gbr'
$TIME_OUT = 300
ELSE
sleep 20
$TIME_OUT = $TIME_OUT + 20
ENDIF
LOOP