Environment for creative processing of text and numerical data

Survo energy

K.Vehkalahti (1999)

Edit field:

   1 *
   2 *PLOT /FRAME 
   3 *PEN=[Swiss(66)][Yellow][rot(0)] SIZE=1800,1800 DEVICE=PS,EX.PS FRAME=0
   4 *TEXTS=A,B,C,D,E,F,G,H,I,J,K,L,a,b,c,d,e,f,g,h,i,j,k,l      x=960 y=960
   5 *A=[rot(010)],ovruS_~,x,y a=[Red][Swiss(33)][rot(030)],:____-_Survo,x,y
   6 *B=[rot(040)],ovruS_~,x,y b=[Red][Swiss(33)][rot(060)],:____-_Survo,x,y
   7 *C=[rot(070)],ovruS_~,x,y c=[Red][Swiss(33)][rot(090)],:____-_Survo,x,y
   8 *D=[rot(100)],ovruS_~,x,y d=[Red][Swiss(33)][rot(120)],:____-_Survo,x,y
   9 *E=[rot(130)],ovruS_~,x,y e=[Red][Swiss(33)][rot(150)],:____-_Survo,x,y
  10 *F=[rot(160)],ovruS_~,x,y f=[Red][Swiss(33)][rot(180)],:____-_Survo,x,y
  11 *G=[rot(190)],ovruS_~,x,y g=[Red][Swiss(33)][rot(210)],:____-_Survo,x,y
  12 *H=[rot(220)],ovruS_~,x,y h=[Red][Swiss(33)][rot(240)],:____-_Survo,x,y
  13 *I=[rot(250)],ovruS_~,x,y i=[Red][Swiss(33)][rot(270)],:____-_Survo,x,y
  14 *J=[rot(280)],ovruS_~,x,y j=[Red][Swiss(33)][rot(300)],:____-_Survo,x,y
  15 *K=[rot(310)],ovruS_~,x,y k=[Red][Swiss(33)][rot(330)],:____-_Survo,x,y
  16 *L=[rot(340)],ovruS_~,x,y l=[Red][Swiss(33)][rot(360)],:____-_Survo,x,y
  17 *

  Index | Catalog | Previous | Next