BASIC short start challenge

Author: Mik / Computer Asylum
Category: Christmas Challenge
System:   Oric 1/Atmos
Language: BASIC
Len source code: 99
Len exe file:    107
Len code only:   ?
Instructions:
Insert tape file (depends on emulator used)
    Type:
    CLOAD"BSHSC"
    PAPER0:INK7
    CLS:RUN
Description:
This is the algorithm that goes through all the points in the "star" rectangle and prints only the needed ones.
The code is short, but not very efficient due to the ABS function call for each point of the "star" grid.
Comments:
To time the execution speed add these lines to the begining and end of the program:
0T=DEEK(#276)
4?T-DEEK(#276)
This returns the hudred parts of a second that the code took to run, so to get the seconds, divide by 100.
My speed result is 8.42s