Agilent Technologies 655 A Series - Page 69

Troubleshooting 69
Figure 3-17. Initialization and Factory Preset Replacement Program Listing (Sheet 3 of 6)
1030 NEXT I
1040 !
1050 RESTORE Eprom_data_len
1060 !
1070 FOR I=1 T0 45
1080 READ Length(I)
1090 NEXT I
1100 !
1110 SELECT Model$
uppercase
1120 !
1130 CASE "6541A"
1140 RESTORE Eprom_data_6x41
1150 CASE "6542A"
1160 RESTORE Eprom_data_6x42
1170 CASE "6543A"
1180 RESTORE Eprom_data_6x43
1190 CASE "6544A"
1200 RESTORE Eprom_data_6x44
1210 CASE "6545A"
1220 RESTORE Eprom_data_6x45
1230 !
1240 CASE "6641A"
1250 RESTORE Eprom_data_6x41
1260 CASE "6642A"
1270 RESTORE Eprom_data_6x42
1280 CASE "6643A"
1290 RESTORE Eprom_data_6x43
1300 CASE "6644A"
1310 RESTORE Eprom_data_6x44
1320 CASE "6645A"
1330 RESTORE Eprom_data_6x45
1340 !
1350 CASE "6551A"
1360 RESTORE Eprom_data_6x51
1370 CASE "6552A"
1380 RESTORE Eprom_data_6x52
1390 CASE "6545A"
1400 RESTORE Eprom_data_6x53
1410 CASE "6554A"
1420 RESTORE Eprom_data_6x54
1430 CASE "6555A"
1440 RESTORE Eprom_data_6x55
1450 !
1460 CASE "6651A"
1470 RESTORE Eprom_data_6x51
1480 CASE "6652A"
1490 RESTORE Eprom_data_6x52
1500 CASE "6653A"
1510 RESTORE Eprom_data_6x53
1520 CASE "6654A"