Technical data

User’s and Service Guide 31
87050A Option K22 Example Programs
1480 Set_switches:!
1490 !
1500 SELECT UPC$(TRIM$(Main_port$))
1510 CASE "REFL"
1520 SELECT UPC$(TRIM$(Input_select$))
1530 CASE "0","TERMINATE"
1540 Hswitch_code$="aterm"
1550 Pswitch_code$="52"
1560 CASE "1","A1"
1570 SELECT UPC$(TRIM$(Switched_port$))
1580 CASE "1","PORT 1"
1590 Hswitch_code$="a1p1"
1600 Pswitch_code$="0"
1610 CASE "2","PORT 2"
1620 Hswitch_code$="a1p2"
1630 Pswitch_code$="1"
1640 CASE "3","PORT 3"
1650 Hswitch_code$="a1p3"
1660 Pswitch_code$="2"
1670 CASE "4","PORT 4"
1680 Hswitch_code$="a1p4"
1690 Pswitch_code$="3"
1700 CASE "5","PORT 5"
1710 Hswitch_code$="a1p5"
1720 Pswitch_code$="4"
1730 CASE "6","PORT 6"
1740 Hswitch_code$="a1p6"
1750 Pswitch_code$="5"
1760 CASE "7","PORT 7"
1770 Hswitch_code$="a1p7"
1780 Pswitch_code$="6"
1790 CASE "8","PORT 8"
1800 Hswitch_code$="a1p8"
1810 Pswitch_code$="7"
1820 CASE "9","PORT 9"
1830 Hswitch_code$="a1p9"