10 DEFFNS="EltLoad" 20 MODE1 30 VDU23;8202;0;0;0; 40 VDU19,1,3,0,0,0 50 VDU19,2,1,0,0,0 60 VDU19,3,6,0,0,0 70 *LDPIC 3 80 PROCw 90 *LDPIC 1 100 PROCw 110 *LDPIC 2 120 PROCw 130 *LDPIC 4 140 PROCw 150 *DRIVE 0 160 CHAIN"!BOOT" 170 END 180 DEFPROCw 190 VDU7 200 *FX21 210 REPEATUNTILGET 220 ENDPROC