Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
BAM and the CIRCLE statement
#1
I'm going through this old BASIC book to sanity-check BAM's implementation of BASIC statements and functions.

From the Handbook of BASIC: for the IBM PC, XT, AT, PS/2, and compatibles (chapter starting on page 42), 1988
( https://archive.org/details/handbookofbasicf00schn ), I'm happy to find that the code samples work A-1 in BAM:


Code: (Select All)
again:

SCREEN 1 : CIRCLE (160, 100), 23
PRINT "SCREEN 1 : CIRCLE (160, 100), 23"

_delay 1.5

SCREEN 2 : CIRCLE (160, 100), 23
PRINT "SCREEN 2 : CIRCLE (160, 100), 23"

_delay 1.5

' NOTE: BAM requires a space where a parameter is omitted
SCREEN 1 : CIRCLE (160, 110),150,1, , ,.45
PRINT "SCREEN 1" : PRINT "CIRCLE (160, 110),150,1, , ,.45"

_delay 1.5

SCREEN 1 : CIRCLE (160, 120),70,2, , ,1.4
PRINT "SCREEN 1" : PRINT "CIRCLE (160, 120),70,2, , ,1.4"

_delay 1.5

SCREEN 1
CIRCLE (50, 160), 25, ,-.8,-5.5
CIRCLE (200, 160), 25
CIRCLE (200, 160),20, ,4, 5.5, .4
CIRCLE (192,152),1
CIRCLE (210,152),1

_delay 1.5

SCREEN 1
FOR I = 10 TO 70 STEP 5
    CIRCLE (200,120), I
NEXT I

_delay 1.5

SCREEN 1
CIRCLE (70, 125), 45,2,-1,6,2
CIRCLE (180,125), 35, ,0,3.14
CIRCLE (250,126), 30, ,-.0000001,-1.57

_delay 1.5

SCREEN 1
FOR I = .1 TO 2 STEP .3
CIRCLE (160,120),50, , , ,I
NEXT I


_delay 1.5

GOTO again
Reply


Messages In This Thread
BAM and the CIRCLE statement - by CharlieJV - 06-11-2023, 05:25 PM
RE: BAM and the CIRCLE statement - by grymmjack - 06-12-2023, 12:38 AM
RE: BAM and the CIRCLE statement - by CharlieJV - 06-12-2023, 01:02 AM
RE: BAM and the CIRCLE statement - by grymmjack - 06-12-2023, 06:41 AM
RE: BAM and the CIRCLE statement - by CharlieJV - 06-12-2023, 11:41 AM



Users browsing this thread: 1 Guest(s)