S.Mustonen, Survon käyttöopas (1992), s. 322
1 * 2 *Vuodet 1980 ja 1981 on jätetty pois, jotta nähdään mitä tapahtuu 3 *oletuksena, kun PLOT-operaatio havaitsee puuttuvia tietoja. 4 *DATA ALKO 5 * Vuosi Viina Viini Tunnus 6 * 1967 5492 1801 1967 7 * 1968 5464 1950 - 8 * 1969 5823 1956 1969 9 * 1970 6464 2179 1970 10 * 1971 7764 2337 - 11 * 1972 8084 2363 1972 12 * 1973 9433 2930 1973 13 * 1974 11384 3836 1974 14 * 1975 11131 3361 1975 15 * 1976 11880 3146 - 16 * 1977 12210 3044 1977 17 * 1978 11390 3210 - 18 * 1979 11051 3164 1979 19 * 1980 - - - 20 * 1981 - - - 21 * 1982 13599 3783 1982 22 * 1983 13713 3624 1983 23 * 1984 13977 3350 1984 24 * 1985 13635 3177 1985 25 * 1986 14414 3458 1986 26 * 1987 14689 3532 1987 27 * 1988 14259 3717 1988 28 * 1989 14342 3893 1989 29 * 1990 13925 4100 1990 30 * 1991 12355 4620 1991 31 * 32 *HEADER=[SwissB(13)],Viinan_ja_viinin_kulutus_Suomessa 33 *XSCALE=[Swiss(7)],1(2)25 YLABEL=1000_l_100%_(log) 34 *YSCALE=*log(y),1000(1000)4000,6000(2000)10000,12000,15000 35 *PLOT ALKO,TIME(Vuosi),Viina,Viini
36 * ViinaLINE=[RED][line_width(2)][line_type(0)],1,1,Viina 37 * ViiniLINE=[GREEN][line_width(2)][line_type(1)],1,1,Viini 38 *SIZE=1164,800 DEVICE=PS,ALKO1.PS 39 *GRID=[line_type(2)][line_width(0.24)],XY TICK=1,1000 40 *PEN=[Swiss(10)] FRAME=1 YDIV=100,550,150 41 *....................... 42 *PLOT ALKO,Viina,Viini
/ HEADER= 43 *LINE=[line_width(2)][line_type(2)],1 POINT=[Swiss(7)],Tunnus 44 *GRID=[line_width(0.24)][line_type(2)],XY 45 *SIZE=1164,1164 LINETYPE=[line_width(0)] DEVICE=PS,ALKO2.PS 46 *XSCALE=5000(2500)15000 YSCALE=1500(500)5000 47 *XLABEL=[RED],Viina YLABEL=[GREEN],Viini 48 *PEN=[BLACK][Swiss(10)] FRAME=1 49 *....................... 50 *PLOT /FRAME
/ DEVICE=PS,F.PS FRAME=0 51 *FRAMES=F F=0,0,1164,1770,0 52 *....................... 53 *EPS JOIN ALKO.PS,F,A1,A2
/ A1=ALKO1.PS,0,970 A2=ALKO2.PS,0,-75 54 *
Hakemisto | Kuvasto | Edellinen | Seuraava