SuperBASIC

From Wikipedia, the free encyclopedia

Template:Short description Script error: No such module "about".

Page Module:Infobox/styles.css has no content.

SuperBASIC
[[Programmer|DeveloperTemplate:Pluralize from text]]Sinclair Research, Jan Jones
Initial release1984; 42 years ago (1984)
Template:Infobox software/simple
Operating systemQDOS
PlatformSinclair QL microcomputer
Typesecond-generation BASIC
LicenseProprietary
WebsiteScript error: No such module "WikidataIB".

Script error: No such module "Check for conflicting parameters".

SuperBASIC is an advanced variant of the BASIC programming language with many structured programming additions. It was developed at Sinclair Research by Jan Jones during the early 1980s.

Originally SuperBASIC was intended as the BASIC interpreter for a home computer code-named SuperSpectrum, then under development. This project was later cancelled; however, SuperBASIC was subsequently included in the ROM firmware of the Sinclair QL microcomputer (announced in January 1984), also serving as the command line interpreter for the QL's QDOS operating system.[1][2]

It was one of the first second-generation BASICs to be integrated into a microcomputer's operating system (unlike BBC BASIC which preceded it in 1981), making the OS user-extendable—as done by Linus Torvalds in his formative years.

Reception

BYTE in September 1984 approved of SuperBASIC's improvements over Sinclair BASIC but criticized its "very, very slow" performance on the Byte Sieve, writing that "With a 7.5-MHz 68008, you'd think it would take some effort to get a language to run that slowly". The magazine also noted that SuperBASIC's seven-digit precision made it unsuitable for business use ("you can represent numbers far larger than the number of quarks in the universe, but not the pennies on your balance sheet if your turnover exceeds £99,000").[3]

Advanced features

  • RESPR for resident procedures, e.g. to extend QDOS
  • choice of parameters passed to procedures
  • procedures return parameters as chosen
  • IF - THEN - ELSE - END IF
  • FOR - NEXT - EXIT - END FOR
  • REPeat - NEXT - EXIT - END REPeat
  • SELect ON - ON - REMAINDER - END SELect
  • arbitrarily RETurn from within procedures & functions
  • data type coercion between numeric and string variables
  • actual parameters passing data type to formal parameters
  • array operations: slicing, joining etc.
  • LOCal arrays & (string) variables
  • AUTOmatic line numbering
  • relative RESTORE & DATA

The function below illustrates the last eight of these features. After having RUN it, entering

      PRINT weekdays$(Iso("19631122",1))

will print FRI to the screen. Until cleared (e.g. by entering NEW), the function Page Template:Mono/styles.css has no content.Iso[4] will act like an extension to the operating system. Similarly, according to the QL User Guide, "many of the operating system commands are themselves defined as procedures."[5]

Example

AUTO 11,2

  DEFine FN Iso(S,O)
  LOCal y%,m%,d%,i$,n%,w%

  REM Step 0 - to isolate components of date-stamp S="YEARMoDa"
  LET y%=S(1TO 4) : m%=S(5TO 6) : d%=S(7TO 8)

  REM Step 1 - to initiate Lachman's Congruence[6]
  LET i$=m%*2.56+ 193 : S=S(1TO 6)- 3

  REM Step 2 - to compute the day-number within the week
  LET w%=(S(1TO 2)&"32"DIV 16+ S(1TO 4)DIV 4+ y%+ i$(2TO 3)+ d%)MOD 7
 
  REM Step 3 - to return result
         SELect ON O
                ON O= 5 : n%=i$(2TO 3)
                ON O= 4 : n%=y%
                ON O= 3 : n%=m%
                ON O= 2 : n%=d%
                ON O= 1 : n%=w%
                ON O= REMAINDER : n%=-1
         END SELect
  RETurn n%

  REM data statements
  DIM weekdays$(6,3)
  RESTORE 190
  FOR count=0 TO 6 : READ weekdays$(count)

Script error: No such module "key".

 100 DIM month$(12,9)
 110 RESTORE 
 120 REM QL User Guide's "Data Read Restore" example ii
 130 REM appropriately amended relative to example i
 140 FOR count=1 TO 12 : READ month$(count) 
 150 DATA "January","February","March"
 160 DATA "April","May","June"
 170 DATA "July","August","September"
 180 DATA "October","November","December"
 190 DATA "SUN","MON","TUE","WED","THU","FRI","SAT"
 199 END DEFine Iso

Bibliography

References

  1. ^ Page Module:Citation/CS1/styles.css has no content."Illustrating Super-BASIC on the Sinclair QL". Computing History. Retrieved 2023-02-06.
  2. ^ Page Module:Citation/CS1/styles.css has no content.Apostolo, Alberto. "Sinclair QL: mistakes, misfortune and so many regrets". RetroMagazineWorld. Retrieved 2023-02-06.
  3. ^ Page Module:Citation/CS1/styles.css has no content.Pountain, Dick (September 1984). "The Sinclair QL". BYTE. pp. 415–419. Retrieved 2025-04-10.
  4. ^ gopher://sdf.org/0/users/retroburrowers/TemporalRetrology/QL/JG
  5. ^ Page Module:Citation/CS1/styles.css has no content.Berry, Stephen (1984). QL User Guide (2nd ed.). Cambridge: Sinclair Research Ltd. Archived from the original on February 22, 2017.
  6. ^ Page Module:Citation/CS1/styles.css has no content."Motorola 68000", Wikipedia, 2023-01-11, retrieved 2023-02-06

Lua error in package.lua at line 80: module 'Module:Navbox/configuration' not found.