[Coco] Extended basic 1.1 command?

Arthur Flexser flexser at fiu.edu
Tue Nov 20 20:27:12 EST 2012


Oops, I get it now:  bit 7 is the joystick comparator bit and must be
forced to one;  bits 2-6 should already be ones if no keys are down.
Right?


Art

On Tue, Nov 20, 2012 at 8:00 PM, Arthur Flexser <flexser at fiu.edu> wrote:
> Shouldn't $FF00's contents be ORed with $FC rather than $80, if the
> intent is to set all but the lower 2 bits?  (ORing actually should be
> unnecessary so long as the user isn't mashing down any keys at the
> same time as the joystick button is being checked, I think.)
>
> Art
>
> On Tue, Nov 20, 2012 at 7:15 PM, Bill Pierce <ooogalapasooo at aol.com> wrote:
>>
>> Charlie,
>> You have to use PEEKs in CB & CEB for the firebuttons.
>> "BUT=PEEK(&HFF00) OR &H80"
>> "IF BUT=&HFF"  = no button
>> "IF BUT = &HFE" = right button
>> "IF BUT = &HFD" = left button
>>
>> I think that's right,
>> Hope it helps
>> Bill P
>>
>> Music from the Tandy/Radio Shack Color Computer 2 & 3
>> https://sites.google.com/site/dabarnstudio/
>> Bill Pierce
>> ooogalapasooo at aol.com
>>
>>
>>
>>
>> -----Original Message-----
>> From: Charlie <chazbeenhad at hotmail.com>
>> To: coco list <coco at maltedmedia.com>
>> Sent: Tue, Nov 20, 2012 6:42 pm
>> Subject: [Coco] Extended basic 1.1 command?
>>
>>
>> I am trying to edit one of my old programs written on the Coco3 to run on my
>> Coco1.
>>
>> The program reads
>>
>> 120 IF BUTTON(0)=1 THEN 140
>> 130 GOTO120
>>
>> This detects if Joystick 0 button is pressed, if so goto 140...
>>
>> I see that BUTTON is not a valid command in Extended Basic 1.1 in my coco1.
>>
>> Can someone give me a simple example how to do the equal of these two program
>> lines in the older Extended Basic?
>>
>> Thanks.
>>
>> Charlie
>>
>>
>>
>> --
>> Coco mailing list
>> Coco at maltedmedia.com
>> http://five.pairlist.net/mailman/listinfo/coco
>>
>>
>>
>> --
>> Coco mailing list
>> Coco at maltedmedia.com
>> http://five.pairlist.net/mailman/listinfo/coco



More information about the Coco mailing list