LB Booster - Super Shapes Exploration Kit

LB Booster

General

Showcase (Moderator: Richard Russell)

Super Shapes Exploration Kit

« Previous Topic | Next Topic »

Pages: 1

Author

Topic: Super Shapes Exploration Kit (Read 370 times)

Rod
Full Member

member is offline

Gender:

Posts: 110

Re: Super Shapes Exploration Kit
« Reply #3 on: Mar 25^th, 2017, 11:05am »

This is a link to a normal .zip version of the file.

http://gamebin.webs.com/Liberty/LB%20SuperShapes.zip

Andy is a long time contributor to out BASIC communities.
Not sure why .7zip is so problematic Win10 does not like the format and it means downloading an app, the first I tried didn't work and I don't really want my pc full of apps. .zip is but a right click away, sendto, compressed zip folder. Easy in Win10.

Logged

Richard Russell
Administrator

member is offline

Posts: 1348

Re: Super Shapes Exploration Kit
« Reply #4 on: Mar 26^th, 2017, 4:25pm »

on Mar 25^th, 2017, 11:05am, Rod wrote:

This is a link to a normal .zip version of the file. http://gamebin.webs.com/Liberty/LB%20SuperShapes.zip

Great, thanks.

There seems to be a problem with the program in that there's no trapclose command anywhere! If you click on the Close button it appears to close (in that the window disappears) but in fact it's still running.

For LBB users there's a worthwhile speed-up that can be achieved. Make the following changes to the ssr subroutine:

Change this Code:

        If phi = 0 Then
            #h$ "Set ";nx;" ";ny
        Else
            #h$ "Goto ";nx;" ";ny
        End If

to this Code:

        If phi = 0 Then
            g$ = g$ + "Set ";nx;" ";ny;";"
        Else
            g$ = g$ + "Goto ";nx;" ";ny;";"
        End If

and add this between the Next and the End Sub:

Code:

    #h$ g$

This builds the plot commands in a temporary string and sends them 'all in one go' which is faster in LBB. The modification doesn't affect compatibility with LB4.

Richard.

Logged

Pages: 1


« Previous Topic \| Next Topic »