Table of Contents
Advertisement
Appendix C
320
CASE 13
330
Eeprom=180
340
CASE 14
350
Eeprom=184
360
CASE 15
370
Eeprom=188
380
CASE ELSE
390
Eeprom=64
400
END SELECT
410
!
420
SELECT Ram
430
CASE 1
440
Eeprom=Eeprom+1
450
CASE 2
460
Eeprom=Eeprom+2
470
CASE 3
480
Eeprom=Eeprom+3
490
END SELECT
500
!
510
Write_reg(8,5)
520
Write_reg(10,Eeprom)
530
Check_done
540 SUBEND
550 !
560 SUB Frequency1(Freq1)
570 Frequency1:
!Subprogram which sets the output frequency using frequency
580
!register 1.
590
COM Base_addr
600
Freq=(Freq1*100)
610
C$=DVAL$(Freq,16)
620
!
630 !Load the frequency value
640
Write_reg(8,1)
650
Write_reg(10,IVAL(C$[1;2],16))
660
Write_reg(10,IVAL(C$[3;2],16))
670
Write_reg(10,IVAL(C$[5;2],16))
680
Write_reg(10,IVAL(C$[7;2],16))
690
Check_done
700 SUBEND
HP E1340A Register-Based Programming 273
!3rd, 4th, 5th harmonic chord
!8 cycles linear rising sine wave
!Positive 1/2 cycle sine wave
!Input Data Register (arbitrary waveform)
!Turn off output as waveform is downloaded
!RAM 1
!RAM 2
!RAM 3
Advertisement
Table of Contents
