LeCroy 9450 - Page 210

|
Appendix A
II
335 CALL IBRDF(BRD0%,FILE$)
340 IF IBSTA% < 0 THEN GOTO 430
345 PRINT ""
350 RETURN
355
"
360 "SUBROUTINE RECALL DATA
365
"
370 LINE INPUT "Specify target memory (MC,MD): ",MEMS
375 LINE INPUT "Enter filename : ",FILES
380 CALL IBCMD(BRD0%,CMDI$)
385 CMD$=MEM$+":TRACE ON": CALL IBWRT(BRD0%,CMD$)
390 CALL IBWRTF(BRD0%,FILE$)
395
IF IBSTA% < 0 THEN GOTO 430
400 PRINT " "
405 RETURN
410
"
415 "ERROR HANDLER
420
"
425 PRINT "IBFIND ERROR": STOP
430 PRINT "OPIB ERROR -- IBERR : ";IBERR%;"IBSTA : ";HEXS(IBSTA%)
435 STOP
440
END
2O4