Re: LOGO-L> Computer games

[Franz@wallner.co.at (Franz Josef Wallner)]

>On Tue, 26 May 1998, Robyn Valentine wrote:
>> I know I have seen what I want somewhere but can't remember where, so I
>> wonder if someone could tell me how to program so that the keys on the
>> keyboard act as buttons.  I am making computer games in MicroWorlds, and
>> instead of placing a button on the screen "rt 90" for instance I would
>> like to be able to use a key to do the same thing.  I would appreciate
>> any input.
>Robyn
>here's a simple one:
>
>TO Doodle
>MAKE "x READCHAR
>IF :x = "8 [FD 15]
>IF :x = "2 [BK 15]
>IF :x = "4 [LT 90]
>IF :x = "6 [RT 90]
>Doodle
>END
>
>....you can elaborate this structure in all sorts of ways
>

Perhaps you try this 
Start with ANFANG
--------------------------------
to Anfang
Rennbahn
windowcreate "main "control [Steuerung] 0 0 100 100 [setup]
end

to kill
windowdelete "control
end

to Rennbahn
setpencolor [255 000 000] 
cs pu fd 150
pd rt 90 repeat 36 [fd 25 rt 10]
pu home
fd 100
pd rt 90 repeat 36 [fd 17 rt 10]
pu home 
lt 90 fd 100 rt 90 pd
fill
setpencolor [255 255 255]
end

to setup 
buttoncreate "control "vorw "Vorwaerts 30 10 40 10 [fd 10]
buttoncreate "control "links "Links 10 30 35 10 [lt 10] 
buttoncreate "control "rechts "Rechts 50 30 35 10 [rt 10] 
buttoncreate "control "zurueck "Zurueck 30 50 40 10 [bk 10] 
buttoncreate "control "ende "Ende 30 70 40 10 [kill] 
end
--------------------------------------------------------------------------
have fun
:)Franz
Wallner-Hutmacher
Franz@wallner.co.at
Tel:  ...431/600 10 43
Tel:  ...431/688 72 26
Fax: ...431/688 72 06

Liesingbachstr. 226/3
A-1100 Vienna / Austria

??? Have you ever heard about ???
 "EASY and QUICK TO INSTALL!"

---------------------------------------------------------------
Please post messages to the Logo forum to logo-l@gsn.org.  Mail
questions about the list administration to logofdn@gsn.org.  To
unsubscribe send    unsubscribe logo-l    to majordomo@gsn.org.