Measurement-computing Micro 488/EX rev.2.1 Manual de usuario descargar pdf (Pagina 68)

Section 4 General Programming

4.26

310 PRINT:PRINT TAB(10) "Program Aborted"

320 END

330 PRINT:PRINT:PRINT"Resetting Micro488/EX Memory"

340 PRINT#1,"Factory"

350 FOR N = 1 TO 10000 : NEXT N

360 PRINT#1,"Save"

370 '

380 ' restore macros

390 '

400 PRINT: PRINT:PRINT"Restoring Macros"

410 WHILE NOT EOF(2)

420 LINE INPUT #2,A$

430 IF LEFT$(A$,1) = "*" THEN PRINT A$ : GOTO 450 ' skip

comments

440 PRINT#1,A$ : PRINT".";

450 WEND

460 PRINT:PRINT:PRINT"Macro Restoration Completed"

470 END

480 '

490 ' get file name

500 '

510 CLS

520 PRINT:PRINT"Restore Macros from what file? => ";

530 LINE INPUT F$

540 IF F$ = "" THEN PRINT : PRINT CHR$(7) : FILES : GOTO 520

550 IF INSTR(F$,".") THEN GOTO 560 ELSE F$ = F$ + ".mcr"

560 ' check if file already exists

570 ON ERROR GOTO 610

580 OPEN F$ FOR INPUT AS #2

590 ON ERROR GOTO 0 ' turn error off

600 RETURN

610 PRINT:PRINT CHR$(7);F$;" File Not Found " : PRINT

620 FILES

630 RESUME 520

The following describes the functionality of the Restore Macro program

on a line by line basis.

Line

170

Opens the

COM1

port on the PC for serial

communications with the Micro488/EX.

Line

180

Sends the

command to the Micro488/EX to reset it to

known power-on conditions. It utilizes the time delay

provided by line

200

; get the output file name.

Line

200 GOSUB

s to Line

480

to get the output file name and

open it.

1 2 ... 63 64 65 66 67 68 69 70 71 72 73 ... 217 218

Comentarios a estos manuales

Sin comentarios

Measurement-computing Micro 488/EX rev.2.1 Manual de usuario Pagina 68

Comentarios a estos manuales

Relacionado con productos y manuales para Hardware Measurement-computing Micro 488/EX rev.2.1