HP 8530A, Руководство по эксплуатации и программированию, Страница: 371 / 439

Programming Examples
741 ENTER @Rec_data1;Angle
743 RETURN
745 !
747 Example5: ! DISPLAY MODES *******************************************
749 PRINT
751 PRINT "Example 5, Display Modes"
753 OUTPUT @Rec;"USERPRES; POIN51; OUTPERRO;"
755 ENTER @Rec_data1;Error_number ! clear message
757 !
759 Example5a: ! SINGLE CHANNEL DISPLAYS ********************************
761 !
763 PRINT "Single Channel, Four Parameter Split Display"
765 OUTPUT @Rec;"CHAN1; FOURP; GRATSPLI; MKRLISTON; NUMG1; PARA1; AUTO;"
767 OUTPUT @Rec;"PARA2; AUTO; PARA3; AUTO; PARA4; AUTO; PARA1; CONT;"
769 OUTPUT @Rec;"MKRLFIVM; MARK1; MARK2; MARK3; MARK4; MARK5; ENTO;"
771 PRINT "Marker List shows All Markers for Selected Parameter"
773 !
775 LINPUT "Press Return.",Input$
777 OUTPUT @Rec;"MKRLFOUP; MARK3; ENTO;"
779 PRINT "Marker List shows Active Marker for all Parameters"
781 !
783 LINPUT "Press Return.",Input$
785 OUTPUT @Rec;"GRATOVER;"
787 PRINT "Single Channel, Four Parameter Overlay Display"
789 !
791 LINPUT "Press Return for Channel 2 Display",Input$
793 OUTPUT @Rec;"CHAN2; SING; AUTO; CONT; MARK1; ENTO;"
795 PRINT "Single Channel, Single Parameter Display"
797 PRINT "Single or Multi Parameter Display is Not Coupled"
799 !
801 LINPUT "Press Return",Input$
803 OUTPUT @Rec;"CHAN1; GRATSPLI; TWOP;"
805 PRINT "Single Channel, Two Parameter Split Display"
807 LINPUT "Press Return",Input$
809 OUTPUT @Rec;"THREEP;"
811 PRINT "Single Channel, Three Parameter Split Display"
813 !
815 Example5b: ! DUAL CHANNEL DISPLAYS *********************************
817 !
819 LINPUT "Press Return for Dual Channel Split Display",Input$
821 OUTPUT @Rec;"DUAC; GRATSPLI;"
823 PRINT "Dual Channel, Single Parameter/Channel Split Display"
825 !
827 LINPUT "Press Return for Dual Channel Overlay Display",Input$
829 OUTPUT @Rec;"GRATOVER;"
831 PRINT "Dual Channel, Single Parameter/Channel Overlay Display"
833 !
835 LINPUT "Press Return to Continue",Input$
837 RETURN
839 !
841 Example6: ! USING = MARKER **************************
843 PRINT
845 PRINT "Example 6, Using = Marker"
847 !
849 OUTPUT @Rec;"USERPRES; POIN51; SING; AUTO; CONT; CENT; OUTPACTI;"
851 ENTER @Rec;Freq
853 !
855 OUTPUT @Rec;"MARK1; MARKMAXI;"
857 PRINT "Refrence Value = Marker"
859 LINPUT "Press Return for REF VALUE = MARKER",Input$
861 OUTPUT @Rec;"REFV; EQUA;"
863 !
865 OUTPUT @Rec;"MARK1";Freq-1.E+9;";"
867 PRINT "Start Frequency = Marker"
18-42 HP-IB Programming