Programming Examples
Transferring the Logic Analyzer Configuration
660! ********************* SEND THE SETUP **********************************
670! Make sure buffer is not empty.
680!
690IF Numbytes=0 THEN
700PRINT "BUFFER IS EMPTY"
710GOTO 1170
720END IF
730!
740! ********************* SEND THE SETUP COMMAND **************************
750! Send the Setup command
760!
770OUTPUT @Comm USING "#,15A";":SYSTEM:SETUP #"
780PRINT "SYSTEM:SETUP command has been sent. Press Continue to send setup"
790PAUSE
800!
810! ********************* SEND THE BLOCK SETUP ****************************
820! Send the block setup header to the module in the proper
821! format.
830!
840Byte=LEN(VAL$(Numbytes))
850OUTPUT @Comm USING "#,B";(Byte+48)
860IF Byte=1 THEN OUTPUT @Comm USING "#,A";VAL$(Numbytes)
870IF Byte=2 THEN OUTPUT @Comm USING "#,AA";VAL$(Numbytes)
880IF Byte=3 THEN OUTPUT @Comm USING "#,AAA";VAL$(Numbytes)
890IF Byte=4 THEN OUTPUT @Comm USING "#,AAAA";VAL$(Numbytes)
900IF Byte=5 THEN OUTPUT @Comm USING "#,AAAAA";VAL$(Numbytes)
910IF Byte=6 THEN OUTPUT @Comm USING "#,AAAAAA";VAL$(Numbytes)
920IF Byte=7 THEN OUTPUT @Comm USING "#,AAAAAAA";VAL$(Numbytes)
930IF Byte=8 THEN OUTPUT @Comm USING "#,AAAAAAAA";VAL$(Numbytes)
940!
950! *********************** SAVE BUFFER POINTERS *************************
960! Save the transfer buffer pointer so it can be restored after the
970! transfer.
980!
990STATUS @Buff,5;Streg
1000 !
1010 ! ************ TRANSFER SETUP TO THE MODULE ****************
1020 ! Transfer the setup from the buffer to the HP 16554A/HP 16555A/HP 16555D. 1030 !
1040 TRANSFER @Buff TO @Comm;COUNT Numbytes,WAIT
1050 !