[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: