Listing of file='DATA.BAS;01' on disk='vmedia/chip_64-sector.ccvf'
0 PLOT 27,24,6,2,12,15,29,3,0,1:PRINT "DATA STORAGE FOR CONTOR.BAS" 2 PLOT 15,3,4,4:PRINT "DATA STORAGE FOR THE CONTOR.BAS IS ACCOMPLISHED BY STORING" 4 PLOT 3,0,6:PRINT "THE DATA AS ARRAY FILES FROM BASIC AND THE USING THE FCS COMMAND" 6 PLOT 3,0,8:PRINT "REN TO RENAME THE FILES TO THE APPROPRIATE NAME. TO RETRIEVE" 8 PLOT 3,0,10:PRINT "THE FILES A REVERSE TYPE METHOD IS USED." 10 PLOT 3,4,12:PRINT "THE TWO FILE TYPES ARE .RED AND .RAW FOR REDUCED AND RAW" 12 PLOT 3,0,14:PRINT "DATA FILES." 14 PLOT 3,1,18:PRINT "FILE CONTENTS FILE TYPE NAME OF ARRAY DIMENSION" 16 PLOT 3,1,21:PRINT "RAW DATA";SPC( 10);".RAW";SPC( 13);"D";SPC( 15);"D(3,100)" 18 PLOT 3,1,23:PRINT "REDUCED DATA .RED";SPC( 13);"P";SPC( 15);"P(25,10)" 20 PLOT 3,16,27:PRINT "PRESS RETURN TO CONTINUE....." 22 PLOT 3,64,29:INPUT "";T$ 24 PLOT 6,2,12,15,29,3,0,0:PRINT "RAW DATA ARRAYS" 26 PLOT 3,0,1:PRINT "eeeeeeeeeeeeeee" 28 PLOT 3,0,3:PRINT "DIMENSION: D(3,100)" 30 PLOT 3,0,5:PRINT "DATA IN ARRAY: D(0,1)= NUMBER OF RAW DATA POINTS" 32 PLOT 3,17,7:PRINT "D(0,0)= SIZE OF ARRAY - 5 = 50 X 100" 34 PLOT 3,41,8:PRINT "10 = 100 X 100" 36 PLOT 3,41,9:PRINT "20 = 200 X 100" 38 PLOT 3,30,13:PRINT "COORDINATE" 40 PLOT 3,30,14:PRINT "eeeeeeeeee" 42 PLOT 3,3,15:PRINT "DATA POINT";SPC( 8);"X";SPC( 13);"Y";SPC( 14);"Z" 44 PLOT 3,3,16:PRINT "eeeeeeeeee";SPC( 8);"e";SPC( 13);"e";SPC( 14);"e" 46 PLOT 3,7,18:PRINT "1";SPC( 10);"D(1,1)";SPC( 9);"D(2,1)";SPC( 9);"D(3,1)" 48 PLOT 3,7,20:PRINT "2";SPC( 10);"D(1,2)";SPC( 9);"D(2,2)";SPC( 9);"D(3,2)" 50 PLOT 3,7,22:PRINT "3";SPC( 10);"D(1,3)";SPC( 9);"D(2,3)";SPC( 9);"D(3,3)" 52 PLOT 3,7,23:PRINT ".";SPC( 12);".";SPC( 14);".";SPC( 14);"." 54 PLOT 3,7,24:PRINT ".";SPC( 12);".";SPC( 14);".";SPC( 14);"." 56 PLOT 3,7,25:PRINT ".";SPC( 12);".";SPC( 14);".";SPC( 14);"." 58 PLOT 3,7,26:PRINT ".";SPC( 12);".";SPC( 14);".";SPC( 14);"." 60 PLOT 3,7,28:PRINT "N";SPC( 10);"D(1,N)";SPC( 9);"D(2,N)";SPC( 9);"D(3,N)" 62 PLOT 3,45,31:PRINT "PRESS RETURN....." 64 PLOT 3,64,25:INPUT "";T$ 66 PLOT 6,2,12,15,29,3,0,0:PRINT "REDUCED DATA ARRAYS" 68 PLOT 3,0,1:PRINT "eeeeeeeeeeeeeeeeeee" 70 PLOT 3,0,3:PRINT "DIMENSION: P(25,10)" 72 PLOT 3,0,5:PRINT "ARRAY VALUES: P(21,0) = SIZE OF ARRAY (5,10,20) SEE LAST PAGE." 74 PLOT 3,16,6:PRINT "P(21,1) = REDUCTION METHOD (1-6)" 76 PLOT 3,16,7:PRINT "P(21,3) = NUMBER OF RAW DATA POINTS USED" 78 PLOT 3,16,8:PRINT "P(22, 1 THRU 10) TO" 80 PLOT 3,16,9:PRINT "P(25, 1 THRU 10) = SEQUENTIAL ASCII VALUES OF" 82 PLOT 3,26,10:PRINT "THE PLOT TITLE - UP TO 40 CHARACTERS." 84 PLOT 3,26,11:PRINT "A VALUE OF 0 INDICATES END OF TITLE." 86 PLOT 3,2,12:PRINT "P(0-20,0-10)" 88 PLOT 3,5,13:PRINT " a |" 90 PLOT 3,5,14:PRINT "a |a" 92 PLOT 3,5,15:PRINT "a e 0 10 20 30 40 50 60 70 80 90 100" 94 PLOT 3,5,16:PRINT " a" 96 PLOT 3,5,17:PRINT "| 0 neeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeo " 98 PLOT 3,6,18:PRINT " | a";SPC( 49);"b " 100 PLOT 3,7,19:PRINT " |a a";SPC( 49);"b " 102 PLOT 3,7,20:PRINT " e 10 a";SPC( 49);"b " 104 PLOT 3,12,21:PRINT " a";SPC( 49);"b " 106 PLOT 3,12,22:PRINT " a THIS IS THE ARRAY OF REDUCED VALUES";SPC( 8);" b " 108 PLOT 3,9,23:PRINT "20 a";SPC( 49);"b " 110 PLOT 3,10,24:PRINT ". a";SPC( 49);"b " 112 PLOT 3,10,25:PRINT ". a";SPC( 49);"b " 114 PLOT 3,10,26:PRINT ". a";SPC( 49);"b " 116 PLOT 3,10,27:PRINT ". a";SPC( 49);"b " 118 PLOT 3,8,28:PRINT "200 l _________________________________________________ m " 120 PLOT 3,32,31:PRINT "PRESS RETURN TO END PROGRAM....." 122 PLOT 3,64,1:INPUT "";T$:PLOT 12