----boundary-LibPST-iamunique-1584596991_-_-
Content-type: text/plain
> It's fine to write to StdLog, but how do you read from it?
> How do you read ANYTHING from the keyboard?
I think some people here might prefer the Zonnon language.
Here's some example code from Zonnon:
procedure Inquiry;
var
sum: longreal;
since, result: integer;
begin
write( "please enter the sum to reach (real): " );
readln( sum );
writeln( "please enter the day you want to start (integer): " );
readln( since );
result := RainSumSince( sum, since );
if ( result + since ) = MaxDays then
writeln( "not reached" )
else
write( result );
writeln( " day(s) in between." )
end;
end Inquiry;
See? It reads from the keyboard, has readln/write/writeln,
has lowercase reserve words... what more could you ask for? :-)
http://www.zonnon.ethz.ch/
Marc
--- BlackBox
--- send subject HELP or UNSUBSCRIBE to blackbox{([at]})nowhere.xy
----boundary-LibPST-iamunique-1584596991_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwID4gSXQncyBmaW5lIHRvIHdyaXRlIHRvIFN0ZExv
ZywgYnV0IGhvdyBkbyB5b3UgcmVhZCBmcm9tIGl0PyAgXHBhcg0KPiBIb3cgZG8geW91IHJlYWQg
QU5ZVEhJTkcgZnJvbSB0aGUga2V5Ym9hcmQ/XHBhcg0KXHBhcg0KSSB0aGluayBzb21lIHBlb3Bs
ZSBoZXJlIG1pZ2h0IHByZWZlciB0aGUgWm9ubm9uIGxhbmd1YWdlLlxwYXINCkhlcmUncyBzb21l
IGV4YW1wbGUgY29kZSBmcm9tIFpvbm5vbjpccGFyDQpccGFyDQogIHByb2NlZHVyZSBJbnF1aXJ5
O1xwYXINCiAgdmFyXHBhcg0KICAgIHN1bTogbG9uZ3JlYWw7XHBhcg0KICAgIHNpbmNlLCByZXN1
bHQ6IGludGVnZXI7XHBhcg0KICBiZWdpblxwYXINCiAgICB3cml0ZSggInBsZWFzZSBlbnRlciB0
aGUgc3VtIHRvIHJlYWNoIChyZWFsKTogIiApO1xwYXINCiAgICByZWFkbG4oIHN1bSApO1xwYXIN
CiAgICB3cml0ZWxuKCAicGxlYXNlIGVudGVyIHRoZSBkYXkgeW91IHdhbnQgdG8gc3RhcnQgKGlu
dGVnZXIpOiAiICk7XHBhcg0KICAgIHJlYWRsbiggc2luY2UgKTtccGFyDQpccGFyDQogICAgcmVz
dWx0IDo9IFJhaW5TdW1TaW5jZSggc3VtLCBzaW5jZSApO1xwYXINCiAgICBpZiAoIHJlc3VsdCAr
IHNpbmNlICkgPSBNYXhEYXlzIHRoZW5ccGFyDQogICAgICB3cml0ZWxuKCAibm90IHJlYWNoZWQi
IClccGFyDQogICAgZWxzZVxwYXINCiAgICAgIHdyaXRlKCByZXN1bHQgKTtccGFyDQogICAgICB3
cml0ZWxuKCAiIGRheShzKSBpbiBiZXR3ZWVuLiIgKVxwYXINCiAgICBlbmQ7XHBhcg0KICBlbmQg
SW5xdWlyeTtccGFyDQpccGFyDQpTZWU/ICBJdCByZWFkcyBmcm9tIHRoZSBrZXlib2FyZCwgaGFz
IHJlYWRsbi93cml0ZS93cml0ZWxuLFxwYXINCmhhcyBsb3dlcmNhc2UgcmVzZXJ2ZSB3b3Jkcy4u
LiB3aGF0IG1vcmUgY291bGQgeW91IGFzayBmb3I/ICA6LSlccGFyDQpccGFyDQogIGh0dHA6Ly93
d3cuem9ubm9uLmV0aHouY2gvXHBhcg0KXHBhcg0KTWFyY1xwYXINClxwYXINCi0tLSBCbGFja0Jv
eFxwYXINCi0tLSBzZW5kIHN1YmplY3QgSEVMUCBvciBVTlNVQlNDUklCRSB0byBibGFja2JveEBv
YmVyb24uY2h9fQByDQpG
----boundary-LibPST-iamunique-1584596991_-_---
Received on Thu Jul 12 2007 - 22:21:26 UTC