Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-03 - decus/20-0078/demos/formt.rel
There are no other files named formt.rel in the archive.
xxM?]g&i#$sCannotbeVsorlightSwiththatheight.Musthavename.givennames:surname:nationality:birthyear:BirthyearshouldVbebetween1800and.height:Height0shouldXbebetween10and220cm.weight:Weightshould*bebetween1andh300kg.eyecolour:Acceptedeyecolours:brown,blueandgrey.brownbluegreyDemonstration example of form-fill-in program in SIMULA:Facilities: Initial letters in names are made upper-case,            Missing letters in eyecolour are filled in,            Several validity checks on each i 8nput value,            Move back and forward allowed on screen.Push e.g. "^birth" to correct previous entry. is a  citizen,  centimeters tall, weighing  kilogramsand with  eyes.Is this OK to store? 
DD
DDDDDDDDDDDDDDDDDDD i>$ Xq	[H8`s*s qhp
ekst uG",:yK`Xwh	[I=z*z(xhvBbHMR{ |
DG",:t]PX~h	[J>*(h~BbHMM 
Di7@XH]h HId]
n"
*
8hLejnN@ 
$
$i7}:X]hHic 
k*8hJejnu 
D
d*I1j*c^z0YN6nr4kn"hZ+?%Po>[J>[I=[H8`[D\@tF[CG[?[>T
[=X|[=/UMdPK^edRSj21	#T/m^xi]INXxM?PINXxm'H INXxY&:6gg	 @ $$h<  P 0@ (+4g+5 :0-<+  ",	++ "-  h	f o~ p8  	/(h( 2&+ ",,,	 "- " "+ "- h`h+ "?,",,	+h $,Ofh * &h,h[1f +7Fh+h
h *0 , $, $,@ &h $,d0& 0f-gOJ Fh+N "<  [,h,,	 "-  "C+ "- ,h(@ H (@ H*, (  H ( H,,	 Fh5,h(@D H ( H+, (
 H ( H,,	 Fh6,  h& ( H ( H,, ( H ( H,,	" Fh6 "X, * , $,h4,h@ H ( H-,  ( H ( H, ( H (h4 $, HS(W 
oX, @ ,M.`L4`M/`,	,<(,	 Fh7,h ( H ( H0, ( H (@ H, ( H (n H1,,	 Fh8,h @D H ( H2, (
 H ( H, ( H (@ H3,,	 Fh7,h ( H ( H4, (D" H ( H,5,,	1F|+ Fo~Zo~ Fh8,@(@(`6,,	,`C7,,	,`G8,@,	@*o~+@@o~ "- - ,p= ('< "R H (	 HZ.  HZ.  H@ H@ H, ,	 FhOfh h1F|+ Fo~7Fh+S& o~Xo,S& o~Xo,!(h# *?,	S& o~Xo,S&c o~Xo,!(h# @ *@,	S&j o~Xo,!(h# *A,	S&g o~Xo,S&n o~Xo,!(h# *B,	S&s o~Xo,S&u o~Xo,!(h# *C,	S&z o~Xo,S&| o~Xo,!(h# *D,	 S& o~Xo,S& o~Xo,S& o~< Xo,@ H ( H,	S& o~Xo,!(h# *E,	 S& o~Xo,+S& o~Xo, ( H,	S& o~Xo, ( H,	S& o~Xo, ( H,	S&! o~Xo, ( H,	 o~ p3,S&% o~Xo, ( H,	S& o~Xo,-*`1 o~ p5Q& "o~-!o|!(f#XZ,	S&/ o~Xo,!(h# *F,	S&7 o~Xo,-*`> o~ p6Q& "o~-!o|!(f#XZ,	 S& o~Xo,S&; o~Xo,!(h# *G< @I,	S&F o~Xo,-*`M o~ p6Q& "o~-!o|!(f#XZ @,	S&J o~Xo,!(h# *H,	S&R o~Xo,-*`Y o~  p8Q& "o~-!o|!(f#XZ,	S&W o~Xo,!(h# *I,	S&_ o~Xo,-*`f o~ p7Q& "o~-!o|!(f#XZ,	S&c o~XoA,!(h# *J,	S&C o~Xo,S&k o~Xo,!(h# *K,	S&r o~Xo,-*`y o~ p8, $,L "o~-!o|@!(n#XZ,	S&w o~Xo,!(h# *L< 	oLzM&-I(	kBt^]lYTK2 (
@$Y4oLzM&-I@$M7i]lYTK2i4s7@5O'4[WC6(@6gWh6J@6]%wC2NN@7E'JG@,K7oLz8Kf.08QLza;wS8(RG>t0SkBr@YgR~(WWO$@Tg
~-$W_W$:$ Fm'H $ IM?P$ Oi]Q[wXi7}:@_/~KgR~) @$ 1a;wS8F@" ,	S&p o~Xo,S& o~Xo,!(h# *M,	S& o~Xo,Z.  & $, Fh h0F<gO h0H,gOG  Fh@*o~+@@o~+] "b,;(E
 S&:Ch`@9x"ExS&E_hx#`@D`@	D"`
P(8880PD
P(    p4H5p4[@aPp9h!(D"@8!@'`(h-82@8 >hBCD"(CPD`GPHHI0J(N(@px(NpX3*@VP1 4 7lll l(l0l8d@dHdPhXl`Dh 8Tp"U
U* h8T 9 :0B`_ 8DT0 @DPEXJhKpMPUZ[(^*U*E*`@b 0`0a8k@uHPhx'5X5Xo~ B(C0J8M`pl@O*Q*U*`^XQ`]x]X(=XO~_` c8g@jPn`shuxz|*U*U*(0
8PXhp%x)+/; C(J0R8@cHp*U*TPrX`hp
x`Pr`]`V@Da;wK8=G"Y&I9$e[2G?$hiFC@$hg&n9:@$`g&n[i&}`$$M&dS@$$#S:5@$$(bW$j6J@$$,aJMmS2(@$$1I'XzM&dPgg@#\gg}:, FT(@
}a[J>Za[I=Ya[H8`ft+UD"a[=X|bUMdP\`edYeRSj2[e1	#\ve1	#[Je1	#[le1	#Ze1	#Y[D"e1	#WGe1	#W%e1	#Ve1	#Ve1	#U
e1	#T;e/m^`e/m^
e/m^D"e/m^e/m^
Z84@x