[A83] Re: Aurora for 83+? Concept #1 in BASIC


[Prev][Next][Index][Thread]

[A83] Re: Aurora for 83+? Concept #1 in BASIC




Hi,

during class I made a few things:

prgmAWINDOW
:RecallGDB 0
:Axesoff
:PlotsOff
:ClrDraw
:5->L     ;Left
:10->U    ;Under
:40->T    ;Top
:60->R    ;Right
:"Window"->Str1
:prgmZWINDOW
:Text(30,7,"Hi guys"

prgmZWINDOW
:Line(L,T,R,T)
:Line(L,T,L,U)
:Line(R,T,R,U)
:Line(L,U,R,U)
:Line(L+2,U-1,R+2,U-1)
:Line(L+2,U-2,R+2,U-2)
:Line(R+1,T-2,R+2,U-2)
:Line(R+2,T-2,R+2,U-2)
:Line(L,T-7,R,T-7)
:Text(-T+62+1,L+1,Str1
:For(A,T-1,T-6,-1
:For(B,L+1,R-1)
:Pt-Change(B,A)
:End
:End

Whew. Hopefully I typed it all right...
Quite a time ago, I also made a 4-button program, in BASIC, which detected
clicks on all 4 buttons and did the right thing. This was very slow, but can
probably be done in ASM, so it'll be fast.
I think I can do it.
Didn't the carry flag say wheter the variable was smaller/greater than a
certain number?

Thanks all,

-- 
      Ronald Teune

Sent through GMX FreeMail - http://www.gmx.net





References: