Misplaced Pages

Southampton BASIC System

Article snapshot taken from Wikipedia with creative commons attribution-sharealike license. Give it a read and then ask your questions in the chat. We can research this topic together.
(Redirected from SOBS)
This article relies largely or entirely on a single source. Relevant discussion may be found on the talk page. Please help improve this article by introducing citations to additional sources.
Find sources: "Southampton BASIC System" – news · newspapers · books · scholar · JSTOR (December 2023)
See also: SOB (disambiguation)

Southampton BASIC System (SOBS) was a dialect of the BASIC programming language developed for and used on ICT 1900 series computers in the late 1960s and early 1970s; it was implemented as an incremental BASIC interpreter under the MINIMOP operating system at the University of Southampton and also ran under MAXIMOP.

It was operated from a Teletype terminal, though CRT terminals could also be used.

Language characteristics

In common with many early implementations of BASIC, SOBS needed lines to have line numbers, both to allow a user to add new lines to the program in the desired place and also as targets for GOTO and GOSUB statements. A RENUMBER facility was available to allow for sections of the code to be renumbered, by default in increments of 10, to allow more space in the middle of a program.

Other than line numbers, all numeric values were represented internally as floating point.

Statements

The language had relatively few statements by comparison with modern programming languages:

Statement Purpose
DATA Stored data for READing into variables at runtime
DIM var(size)... Dimension an array. One-, two- and three-dimensional arrays were supported.
END Halt execution of the program.
FOR var=start TO end Perform a set of statements repeatedly for varying values of var
GOSUB line Call a subroutine at a given line number; flow would return to the next statement when a RETURN was executed.
GOTO line Unconditional branch to a given line number.
IF expr THEN line Conditionally branch. The THEN and ELSE parts could only give line numbers to go to.
INPUT var Prompt the user for input data
LET var=expr Assign a value to a variable. Unlike many modern dialects of BASIC, LET was not an optional word.
NEXT var Perform the next iteration of a FOR loop.
PRINT Output to the Teletype
READ var... Read data from DATA statements into variables
REM Short for REMark, this allowed for a comment to be placed on a line
RESTORE Reset the READ pointer in order to re-read DATA
RETURN Return to the line following a GOSUB.

Note in particular the lack of a WHILE-like statement; FOR was the only looping construct available to programmers.

Variables

Variable names for numeric values were either a single letter, or a single letter followed by a single numeric digit, thus allowing for 286 discreet variables in total. Strings were supported; variable names for them had the same restriction but were followed by a pound (£) symbol.

Functions

A limited number of numeric functions were provided, all of which took one numeric parameter:

Function Function( x {\displaystyle x} ) returned
SIN sin x {\displaystyle \sin x}
COS cos x {\displaystyle \cos x}
ATN arctan x {\displaystyle \arctan x}
SQR x {\displaystyle {\sqrt {x}}}
LOG log x {\displaystyle \log x}
EXP e x {\displaystyle e^{x}}
INT The largest integer not greater than x {\displaystyle x}
SGN −1, 0, or 1, depending on whether x {\displaystyle x} was less than, equal to, or greater than zero
ABS x {\displaystyle -x} if x {\displaystyle x} was negative, otherwise x {\displaystyle x}

Support for strings was more limited, with only one function, LEN, which returned the length of the string parameter. Sub-strings were supported with square brackets, so referred to the sub-string of the string from the 2nd character to the 3rd character inclusive, so

10 LET A£ = "FOO"
20 PRINT A£

would print OO

This syntax was also supported on the left-hand side of an assignment, so

10 LET A£ = "FOO"
20 LET A£ = "BAR"
30 PRINT A£

would print FBARO

Arrays

Support for handling arrays of data was relatively strong, with MAT statements able to read an entire array from DATA statements, and perform useful matrix operations such as matrix addition, matrix subtraction, matrix multiplication, and finding the inverse matrix for a square matrix.

Example:

10 DIM A(3,3)
20 MAT READ A
30 DATA 1,1,2,1,0,2,0,2,1
40 DIM B(3,3)
50 MAT READ B
60 DATA 0,0,1,0,1,0,1,0,0
70 DIM C(3,3),D(3,3)
80 MAT C=A*B
90 MAT D=INV(C)
100 MAT PRINT D,
A is read from the first DATA statement ( 1 1 2 1 0 2 0 2 1 ) {\displaystyle {\begin{pmatrix}1&1&2\\1&0&2\\0&2&1\end{pmatrix}}}
B is read from the second DATA statement ( 0 0 1 0 1 0 1 0 0 ) {\displaystyle {\begin{pmatrix}0&0&1\\0&1&0\\1&0&0\end{pmatrix}}}
C is calculated by multiplying A and B ( 2 1 1 2 0 1 1 2 0 ) {\displaystyle {\begin{pmatrix}2&1&1\\2&0&1\\1&2&0\end{pmatrix}}}
D is calculated as the inverse of C ( 2 2 1 1 1 0 4 3 2 ) {\displaystyle {\begin{pmatrix}2&2&1\\1&-1&0\\4&-3&-2\end{pmatrix}}}

The output would be 2 2 1 1 -1 0 4 -3 -2

Debugging

This section needs expansion. You can help by adding to it. (May 2009)

SOBS had primitive debugging capabilities, limited mostly to the TRACE statement. TRACE ON would cause the interpreter to print each line number as it was executed.

References

  1. Rees, M.J.; Oppenheimer, A.W. (21 January 1977). "SOBS – an incremental BASIC system". Software: Practice and Experience. 7 (5). Wiley InterScience: 631–643. doi:10.1002/spe.4380070508. S2CID 33989728. Archived from the original on 5 January 2013. Retrieved 18 May 2009.
Dialects of the BASIC programming language (list)
Classic
Microsoft
Texas Instruments
Hewlett-Packard
Locomotive Software
Microcomputers
Minicomputers
Time-sharing computers
Other
Extenders
Procedure-
oriented
Proprietary
Free and
open source
With object
extensions
Proprietary
Free and
open source
RAD
designers
Proprietary
Free and
open source
Defunct
Categories: