Dartmouth BASIC
Dartmouth BASIC is the original version of the BASIC programming language. It was designed by two professors at Dartmouth College, John G. Kemény and Thomas E. Kurtz. With the underlying Dartmouth Time Sharing System, it offered an interactive programming environment to all undergraduates as well as the larger university community.
Several versions were produced at Dartmouth, implemented by undergraduate students and operating as a compile and go system. The first version ran on 1 May 1964, and it was opened to general users in June. Upgrades followed, culminating in the seventh and final release in 1979. Dartmouth also introduced a dramatically updated version known as Structured BASIC in 1975, which added various structured programming concepts. SBASIC formed the basis of the ANSI-standard Standard BASIC efforts in the early 1980s.
Most dialects of BASIC trace their history to the Fourth Edition, and left out more esoteric additions like matrix math. In contrast to the Dartmouth compilers, most other BASICs were written as interpreters. This allowed them to run in the limited main memory of early microcomputers. Microsoft BASIC is one example, designed to run in 4 kB of memory. By the early 1980s, tens of millions of home computers were running some variant of the MS interpreter. It became the de facto standard for BASIC, which led to the abandonment of the ANSI SBASIC efforts. Kemény and Kurtz later left Dartmouth to develop and promote a version of SBASIC known as True BASIC.
Many early mainframe games trace their history to Dartmouth BASIC and the DTSS system. A selection of these were collected, in HP Time-Shared BASIC versions, in the People's Computer Company book What to do after you hit Return. Many of the original source listings in BASIC Computer Games and related works also trace their history to Dartmouth BASIC.
Development history
Earlier work
joined the mathematics department of Dartmouth College in 1953 and later became its department chairman. In 1956 he gained access to an IBM 704 via MIT's New England Regional Computer Center efforts. That year, he wrote the DARSIMCO language, which simplified the programming of mathematical operations. He was aided by Thomas E. Kurtz, who joined the department that year.DARSIMCO was forgotten when the first FORTRAN compiler was installed on the machine in 1957. The arrival of FORTRAN instilled an important lesson. Kurtz, having been indoctrinated that FORTRAN was slow, spent several months writing a program in 704 assembler which had taken up about an hour of CPU time to debug and still wasn't running. Giving up, he rewrote it in FORTRAN and had it running in five minutes. The lesson was that high-level languages could save time, regardless of their measured performance.
In 1959, the school received its first computer, the drum-based LGP-30. One student wrote a FORTRAN-inspired language called DART for the machine. This led to an effort to produce an ALGOL 58 compiler, turning to ALGOL 60 when that definition was finalized. Writing the compiler was difficult due to the very small memory size, 4 kB in modern terms, and was extremely slow, based on the drum speed of 30 rpm. Nevertheless, they were able to produce a functional cut-down version known as ALGOL 30.
Further development produced SCALP, the "Self-Contained Algol Processor", a one-pass compiler that was ready to run the compiled program as soon as the punch tape finished reading in the source. This compile-n-go style operation would later be used by BASIC.
In 1962, Kemény and student Sidney Marshall began experimenting with a new language, DOPE, for Dartmouth Oversimplified Programming Experiment. This used numbered lines to represent instructions, for instance, to add two numbers, DOPE used:
5 + A B C
Which meant "on line 5, perform an addition of the values in variables A and B and put the result in C". Although somewhat cryptic in layout, the basis for the future BASIC language can be seen. In addition to basic mathematical operations, the language included SQR, EXP, LOG, SIN and a simple branching construct.
Computing in liberal arts
Kemény and Kurtz agreed on the need for programming literacy among students outside the traditional STEM fields; only 25% of the students at Dartmouth took STEM-related courses, but some level of mathematics was used in almost every field. Moreover, as computers became more important in society, they wondered "How can sensible decisions about computing and its use be made by persons essentially ignorant of it?"Kemény later noted that "Our vision was that every student on campus should have access to a computer, and any faculty member should be able to use a computer in the classroom whenever appropriate. It was as simple as that." But doing so would be largely impossible given what they had to work with; the turnaround on a typical SCALP run was about 15 minutes, and the languages were far too difficult for non-STEM users to use for basic tasks.
It wasn't simply the complexity that was a problem, it was the entire concept of the batch process. Students would prepare their programs on punch cards or paper tape, submit them to the computer operators, and then at some future point receive their output, often to find there was an error and the entire process had to be repeated. As they later put it, "If it takes on the order of 1 day for one try, the student will either lose interest or forget what the problems were. At best, he will waste time standing around waiting for the day's results to appear."
In 1959, due largely to Kemény's reputation as an innovator in math teaching, the department won an Alfred P. Sloan Foundation award for $500,000 to build a new department building.
Developing the concept
During a 1961 visit to MIT, they were introduced to the PDP-1 and its recently completed experimental time-sharing operating system. John McCarthy asked Kurtz why they didn't use time sharing for their efforts to bring computing to the masses. Kurtz later told Kemény "we should do time sharing", to which Kemény replied "OK". The arrival of the Teletype Model 33 teleprinter using the newly introduced ASCII over telephone lines solved the problem of access; no longer would the programmers have to submit the programs on cards or paper tape. All that was needed was a new machine that was fast enough to host a time-sharing system, and a simple language for the programmers to use.When the topic of a simple language began to be considered seriously, Kemény immediately suggested writing a new one. Kurtz was more interested in a cut-down version of FORTRAN or ALGOL. But these languages had so many idiosyncrasies that Kurtz quickly came to agree with Kemény. Over time, four key elements emerged; the system would use time-sharing, a new language would be needed, to get users onto the system new courses would introduce programming as an adjunct to other subjects, and finally, the terminals would be open to all users.
Initial version
The project officially started in September 1963. The goal was to develop the language and operating system on an off-the-shelf computer. In early 1964, two grants from the National Science Foundation, one to develop the time-sharing system and another the language, along with educational discounts from General Electric led to the purchase of a GE-225 computer. This was paired with the much simpler DATANET-30 machine and a hard drive connected to both machines in order to share data.The system would work by having the DN-30 run the terminals and save the work to the disk. When the user typed
RUN, the GE-225 would read that file, compile it, run it, and pass back the results to be printed on the terminal. This combination of machines was later known as the GE-265, adding their model numbers. GE built about fifty additional examples of the GE-265, many for their service bureau business. GE referred to these as their Mark I time-sharing systems.In the summer of 1963, pending purchase of the computer, GE provided access to one of their GE-225s. Kemény began working on a prototype compiler. Students Michael Busch and John McGeachie began working on the operating system design that fall. Both the language and the OS were extensively modified during this period, although the basic goals remained the same and were published in a draft form that November.
The machine arrived in the last week of February 1964, was operational by mid-March, and officially handed over on 1 April. By that point, the operating system design was already well developed. Most of the student programmers working on the operating system did so for 50 hours a week, in addition to their normal course load. The language was developed in parallel on borrowed time on another 225 machine. The OS was completed in April, and the entire system running on three Model 33 terminals was ready by the end of the month. John Kemény and John McGeachie ran the first BASIC program on 1 May 1964 at 4 a.m. ET.
It is not completely clear what the first programs were. Many sources, including Dartmouth, claim it was this simple program:
PRINT 2 + 2
Over the next month the system was tested by having a numerical analysis class test programs on the system. During this period, the machine remained running properly for an average of five minutes. However, the problems were rapidly addressed, and in June it was decided to increase the number of terminals to eleven. It was around this time that a faster GE-235 replaced the 225. By the fall, 20 terminals were in use.
New system
One of the original goals of the program was to work programming into other coursework. This was a success, but it put considerable strain on the system and it became clear that it had no room for future growth.In 1965, the team approached GE for support with ongoing development. In September, Vice President Louis Rader offered the new GE-635, which ran approximately 10 times as fast and included two CPUs. Additionally, a second DN-30 would be added to handle more lines, enough for 150 simultaneous users. To house it, a larger facility would be needed than the basement of College Hall where the 265 was running. Peter Kiewit, Class of '22, along with additional support from the NSF, led to the construction of the Kiewit Computation Center, which opened in December 1966.
While waiting for this machine to arrive, in the summer and fall of 1966 a GE-635 at the Rome Air Development Center was used to develop MOLDS, the "Multiple User On-Line Debugging System". The GE-635 was operational in early 1967, and using MOLDS the new operating system was fully functional in September, at which time the GE-265 was sold off.
GE provided the machine for free for three years as part of a wider agreement under which Dartmouth would develop new versions of BASIC while GE used it to develop a new release of their version of the operating system. This collaboration proved to be a success; GE began deploying these machines as their Mark II time-sharing systems, and by the end of the decade they were one of the largest time-sharing vendors in the world.
When this "Phase I" system became operational, the Dartmouth team began development of "Phase II", the ideal operating system. This was installed in March 1969, and changed its name to the Dartmouth Time Sharing System shortly thereafter. When the three-year period was up, GE gifted the machine to the university. Although the teams remained in contact, and several good-faith attempts were made to continue the relationship, little further collaboration occurred and the partnership officially ended on 20 September 1972.
Expanding user base
A review in 1968 noted that 80% of the students and 70% of the faculty was making some use of the system. Hundreds of terminals were spread across the campus, from the hospital to the business school. 57% of the CPU time was used for coursework, 16% for research, and the remaining 27% for "recreational use"; Dartmouth actively encouraged users to play games as a way to get hands-on use and overcome fear of the computer.Beginning with another NFS grant, in 1967 Dartmouth also began placing terminals in off-campus locations, including high schools in the area. In terms of user counts, these terminals hosted 69% of the total users, although they used a smaller amount of computer time. By 1971 there were 79 remote terminals, as far away as New Jersey and Bangor, Maine. These were supported by multiplexer systems that allowed up to 12 terminals to be supported over a single voice-grade telephone line. Additionally, a number of these lines were available for dial-up use with a modem.
Influence
Time-sharing was a major area of research in the 1960s, with many in the computer industry predicting that computing power would become inexpensive and widespread. This was most famously stated by John McCarthy, who said "computing may someday be organized as a public utility just as the telephone system is a public utility."With BASIC, such services became far more accessible to end-users whose tasks would take too long to code for them to be suitable for solving on a computer. This led to a number of manufacturers who introduced computers specifically designed for this market of users who wanted to solve small or medium-scale tasks and were not as worried about outright performance. In particular, two machines aimed directly at this market became the "most widely used small time-sharing systems ever developed".
The HP 2000 ran HP Time-Shared BASIC, a combination of a BASIC and a time-share operating system almost identical to the DTSS setup. The system supported up to 32 simultaneous users, using a low-end HP 2100 CPU to run the terminals in the same fashion as the Datanet-30 of the original GE-265 setup, while the programs ran on a higher-end model of the same machine, typically differing in that it had more core memory. HP's BASIC used a semi-compiled "tokenized" format for storing programs, which improved loading times and meant "compiles" were zero-time.
Digital Equipment Corporation took a similar approach, offering their existing PDP-11 line with the new RSTS/E operating system and BASIC-PLUS. BASIC-PLUS more closely followed the Fifth Edition, including the
MAT commands, but was implemented as a pure interpreter as opposed to the Dartmouth compiler or HP's tokenized format. It also included a number of control structures following the JOSS model, like. Tymshare SUPER BASIC also supported JOSS-style structures and matrix math, but retained the original compile-and-go operation.Practically every vendor of the era offered some solution to this same problem, although they may not have been so closely similar to the original. When Kurtz began considering the formation of an ANSI standard for BASIC in 1973, he found that the number of time-sharing service bureaus with BASIC available was greater than any other language. Unfortunately, this success was also a problem; by that point, there were so many variations that a standard seemed impossible.
Games in BASIC
Kemény actively encouraged games on the DTSS platform, and considered it to be one of the major reasons for the success of the DTSS system. He was likely the author of an early mainframe game. Although Kemény did not take credit for it, he later referred to FTBALL by stating it "was written on Sunday after a certain Dartmouth-Princeton game in 1965 when Dartmouth won the Lambert trophy. It’s sort of a commemorative program". The game was an upset over heavily favored Princeton.As the system expanded, especially after the addition of string handling in BASIC, the DTSS system became a major platform for the development of many text-based games. In the early 1970s, the People's Computer Company began publishing these in their magazine, typically converted to the more widely available HP BASIC. Many of these listings were collected in their 1975 book, What to do after you hit return. Although these are published in HP BASIC form, the majority of them trace their history to either DTSS or the Lawrence Hall of Science in California where a similar machine was set up, known as DECISION.
A more famous collection is BASIC Computer Games of 1978, where about half of the programs in the book were either written at Dartmouth, including another by Kemény, Batnum, or more commonly, one of the many high schools that were connected to it after 1968. A particularly prolific high school was Lexington High School in Massachusetts but many other schools appear as well. A number of the programs do not list their original locations, but come from authors that were likely connected to the system through a school or public projects like Project SOLO.
Versions
First Edition
The original version, retroactively known as version one, supported the commandsLET, PRINT, END, FOR...NEXT, GOTO, GOSUB...RETURN, IF...THEN, DEF, READ, DATA, DIM, and REM. It included basic math instructions,,, and, as well as the up-arrow for exponents "...since on a teletype typewriter it is impossible to print superscripts." In modern varieties, the up-arrow is normally replaced by the "hat" character,. Exponents took the absolute value of the number before calculation, so to calculate, one had to use. There was a further problem in the exponent function that treated as as opposed to the correct order of operations, which was not corrected until the third release. The INT function always truncated towards zero.The language had a number of idiosyncrasies of its own. In contrast to later versions, the
LET command was required on all statements lacking another command, so was not valid in this version. The PRINT statement supported only the comma when printing multiple variables, defined as five "zones", or columns. The comma was not needed in the case where one was printing a prompt and single value, so was valid. A somewhat hidden feature was that all variables were capable of representing arrays of up to 10 elements without being declared that way using DIMAdditionally, due to the GE-235's word size being 20-bits and using a six-bit character code, the language enshrined the use of three-letter function names because that allowed the storage of three six-bit characters in a 20-bit word. This is why BASIC functions are three letters, like
INT or VAL, something that remained in the many varieties of the language long after they left the GE-235.Second Edition, CARDBASIC
The Second Edition of BASIC, although not referred to such at the time, only made minimal changes. Released in October 1964, it added the semicolon,, to thePRINT statement to leave no space between items, which allowed more numbers to be "packed" into a line of output than the existing comma separator which spaced the items out. This version also allowed arrays to begin as subscript 0 instead of 1. This was especially useful for representing polynomials.The October version also included a separate definition for CARDBASIC, which was simply a version of BASIC for use on card-based workflows. CARDBASIC was almost identical to the interactive version, with the exception being that it did not include the zero-based arrays. More important to the language's future, CARDBASIC added the
MAT commands that worked with numerical matrixes. CARDBASIC was not developed further, as the entire idea of BASIC had been to be interactive.Third Edition
The Third Edition, released in 1966 and the first to use the "edition" naming, was the first designed specifically with the intent of running on the new GE-635 computer which was due to arrive shortly. This version includes theMAT functions from CARDBASIC, although they now allow for a subscript of 0.The new
SGN function returned whether the enclosed variable was positive or negative, while RESTORE was added to "rewind" the position of READ/DATA. The exponentiation problem was fixed, so would be interpreted as. Additionally, the INT function was changed to be a true floor, as opposed to trim-toward-zero, which allowed rounding to be implemented with INTThe major change in this version was the new
INPUT statement, which allowed the user to type in numeric values, making the language truly interactive during execution for the first time; previously the only control one had during execution was to type STOP in the monitor. Additionally, the system now allowed, and encouraged, loops to be indented, a feature that was not seen on most other versions of BASIC.Fourth Edition
The Third Edition remained in use through the GE-235's lifetime into the fall of 1967. However, as plans were made to receive the GE-635, an experimental version was created on the 635 in the spring of 1967. This version was a partnership between GE and Dartmouth, with GE contributing a new operating system as well as a number of features of BASIC from their own Mark 1 BASIC efforts.This version, initially published as a supplement to the Third Edition, added the
RANDOMIZE command to "seed" the RND function, and the ON...GOTO "computed goto" that closely matched the similar feature in FORTRAN. This version also allowed ON...THEN, arguing that IF...THEN did not require the GOTO so the same format should be allowed here. The new TAB function allowed the printing to be moved to a given column, from 0 to 74. Another internal change was to once again change the MAT to be 1-based; one could use the 0th index, but it would normally be ignored by the various commands.Two major additions were made during the development. The first addition was string variables, along with changes to the
READ/DATA statements to allow strings to be stored in them and the INPUT statement to read them in interactively. One feature of the string system was that trailing spaces were deliberately ignored in comparisons, so that "YES" and "YES " were considered equal. This was later realized to be a grave error. This version also added the semicolon to PRINT statements to do "close packing" of output.The official Fourth Edition did not appear until 1968, which added several new features on top of the previous additions. This included the ability to define multi-line functions with the
DEF command, and the powerful CHANGE statement that treated strings as arrays of ASCII-like codes to allow per-character operations without having to loop over the string. This was also the only string manipulation function; to extract a single character or substring, one had to use CHANGE to convert it into an array of numbers, manipulate that array, and then convert it back. This was the reason MAT was 1-based again, as the length of the string was placed in location zero so it was normally ignored.Fifth Edition
The Fifth Edition, from late 1970, once again started as two supplements to the Fourth Edition, from February and April 1969.The major change was the introduction of file handling. Previously any pre-defined data that had to be used in the program had to be placed in the
DATA lines and then read in one-at-a-time using the READ command. This extension allowed files to be accessed and read in a similar fashion. The INPUT command could now be used to read a single item from a file, while PRINT would write one. For random access, the READ could now be positioned anywhere in the file with the RESET command, while WRITE would write at that location. The current location was returned by the LOC function, and the file length by LOF. One could also test if you were at the end of the file during sequential reads using the IF END THEN....Another major change was the ability for one BASIC program to call another using the
CHAIN command, and pass variables to it using the COMMON list. It was later realized that this basic concept had a number of problems, but it was nevertheless used to write some large programs.Numerous more minor changes were also added. Among these were two-dimensional string arrays, as opposed to one-dimensional in the previous version, as well as the ability to use the
DEF to define string-based functions rather than just mathematical. New system-oriented functions included CLK$, DAT$ to work with times and dates, TIM which returned the elapsed time, and USR$ which returned the user number, what would today be the username. New string functions included LEN, STR$, VAL, ASC, which are common in modern BASIC dialects. The as a short form for REM also appeared in this version.Sixth Edition
Work on the Sixth Edition began in the fall of 1969, before the Fifth Edition was finalized. In contrast to the previous versions, where the specification documents were based on whatever changes had been made to the compiler, for the new version a complete specification was written beforehand. This version was worked on by Kemény and Kurtz, as well as several former students who returned as faculty; Stephen Garland, John McGeachie, and Robert Hargraves. It was allowed considerable time to mature, with a beta version running for three months during the summer of 1971, before it was finally released on 21 September 1971. As a result of giving the design time to mature, it was, as Kurtz described, "probably the best-designed and most stable software system Dartmouth has ever written."One of the more major changes was the replacement of the earlier
CHAIN concept with the much better defined CALL, which operated in a fashion similar to GOSUB but referring to a function name rather than a line number. The functions were defined using SUB...SUBEND, and allowed arbitrary parameters to be passed in as a part of the call, rather than using the COMMON system. Another major change was to use file handles created with the FILE command, which is similar to the OPEN found in most modern BASICs. New string functions included the SEG$ to return substrings in a fashion similar to the MID$ found in MS-derived BASICs, the POS that returns the location of one string inside another, and the for concatenation. PRINT USING provided formatted output in a fashion somewhat similar to FORTRAN.The Sixth Edition was essentially the last version of the original BASIC concept. It remained unchanged for many years. Later versions were significantly different languages.
SBASIC
In 1976, Stephen Garland collected a number of structured programming additions to create Dartmouth Structured BASIC, or SBASIC. The primary goal was to replace the control structures based onIF...THEN and GOTO with a variety of block-oriented structures. It did this using a precompiler that took SBASIC source code, converted that to 6th Edition BASIC, and then compiled and ran that as normal. SBASIC also added a number of graphics features, based on the PLOT command that had been added by other programmers.Block structures were terminated by matching statements as was the case in ALGOL 68, as opposed to the generic block structures found in languages like Pascal or C. For instance, the
DO WHILE... spanned multiple lines until it ended with a LOOP. The DO loop could also be bottom exited by removing the WHILE or UNTIL and placing the conditional at the bottom on the LOOP. Infinite loops were supported using DO FOREVER or LOOP FOREVER."Original" Dartmouth BASIC did not allow statements after a
THEN, only a line number to branch to. SBASIC allowed any statement, so for instance IF X < 5 THEN X=X+1. This basic expansion to the IF...THEN was already widely supported by most variety of BASICs by this point, including microcomputer versions that were being released at this time. On top of this, SBASIC added block-oriented IF by placing the THEN on a separate line and then ending the block with CONTINUE. On top of this, SBASIC added the SELECT CASE mechanism that survives to this day in VB.net.SBASIC also added a number of graphics commands intended to be used with plotters. This required the
PLOTTER "plottername" to direct subsiquent commands to a selected device, and the WINDOW... to set up its parameters. From then on, PLOT X,Y would produce dots on the selected plotter, while adding the semicolon at the end of the statement, as used in PRINT, would leave the pen on the paper and produce a line, for instance PLOT 10,10;20,20.SBASIC formed the basis for ANSI BASIC, but that effort took so long that even Garland gave up on waiting for it to be approved, and in the early 1980s began teaching programming classes in Pascal instead.
Seventh Edition
Garland's SBASIC was written as a pre-compiler, itself in SBASIC source code. The system would read SBASIC source, write the corresponding 6th Edition code, and then compile that output. The Seventh Edition, released in 1978, was a version of SBASIC that was a stand-alone compiler of its own. It added a number of additions of its own. Most of the changes were further elaborations to the system for calling external programs and "overlays" that allowed a program to be broken up into parts. In this version,SUBs sharing a single file shared data between them, providing a modicum of data hiding within the group of routines, or what would today be known as a module.In addition, this edition added structured error handling and allowed arbitrary matrix math in
LET statements, so one could LET A = M*4 where M was a matrix variable and output another matrix into A with all the elements in M multiplied. Finally, another major update was the subroutines now use an activation record system which allowed recursion.ANSI BASIC, Eighth Edition
By the early 1970s, the number of BASIC implementations had grown to dozens, all of which had their own changes to the basic concept introduced in the original version. Most of these were based on the Fifth Edition, although they often lacked the MAT instructions and the ability to indent code. GE was one of these companies; they released their Mark II systems with the 5th edition rather than waiting for the 6th to arrive a few months later. BASIC-PLUS on the DEC platform was perhaps the closest implementation, including the MAT commands for instance, but then added a number of changes that were not backward-compatible.After the release of the 6th edition, Kurtz became involved in an effort to define a standard BASIC. An American National Standards Institute working group, X3J2, formed in January 1974, and a corresponding European Computer Manufacturers Association group, TC21, that September. The goal at that time was to produce two related standards. Minimal BASIC would be similar to the Second Edition, but adding strings, a standard to which practically every BASIC would already be able to conform. Standard BASIC would add more functionality to produce something more in keeping with the real BASIC varieties seen in the market.
The process was slow, and the first draft of Minimal BASIC was not published until January 1976, leading to it being officially adopted in December 1977 by ECMA, and 1979 by ANSI as X3.60-1978. Minimal BASIC was similar to the 3rd edition, including string variables, while lacking MAT and other advanced features. In contrast, Standard BASIC had many new features that did not exist in other BASICs, and many of these were poorly considered and the subject of some criticism. For instance, the standard included a line-continuation character, but chose the ampersand,, which was also used for string concatenation. Using these in a single line could lead to very confusing code.
By this time, the release of the first microcomputer systems in 1975 had quickly led to the introduction of Altair BASIC, the first version of what would soon be known as Microsoft BASIC. MS BASIC was patterned on BASIC-PLUS, and thus ultimately the Fifth Edition, but lacked indenting, MAT, and other features. It also added the
LEFT$ and RIGHT$ functions, breaking the three-letter convention. As the number of microcomputers grew, and turned into the home computer market in the late 1970s, MS BASIC became the de facto standard.With this rapid change in the market, the Standard BASIC effort slowed further and was not formally ratified until 1987 as X3.113-1987. By this time, there was no real purpose to the standards; not only was MS BASIC everywhere, but by the mid-1980s the use of BASIC was declining as shrinkwrap software took over from type-in programs. Both standards were eventually withdrawn.
In spite of the eventual failure of the ANSI efforts, the draft of Standard BASIC was implemented at Dartmouth as the Eighth Edition in 1982.
DTSS interface
DTSS implemented an early integrated development environment : an interactive command line interface. This provided a number of user and job control commands. For instance, an idle terminal could be connected to a user account by typingHELLO, and logged out again with BYE.Any line typed in by the user, and beginning with a line number, was added to the program, replacing any previously stored line with the same number; anything else was assumed to be a DTSS command and immediately executed. Lines which consisted solely of a line number weren't stored but did remove any previously stored line with the same number. This method of editing was necessary due to the use of teleprinters as the terminal units.
Each user account could have any number of BASIC programs stored offline, while administrator accounts could also leave programs in permanent storage. Any one of these was active at a given time for a given user account, and if no program had been loaded, a new program was assumed. Stored programs were accessed using commands that are today better known as parts of the BASIC language itself; for instance, the
LIST command instructed DTSS to print out the currently active program.List of commands
;HELLO : log into DTSS;
BYE : log off from DTSS;
BASIC : start BASIC mode;
NEW : name and begin writing a program;
OLD : retrieve a previously named program from permanent storage;
LIST : display the current program;
SAVE : save the current program in permanent storage;
UNSAVE : clear the current program from permanent storage;
CATALOG : display the names of programs in permanent storage;
SCRATCH : erase the current program without clearing its name;
RENAME : change the name of the current program without erasing it;
RUN : execute the current programs;
STOP : interrupt the currently running program;
FRI : Friden mode for teletypes with mechanical linefeeds;
NFR : exit Friden mode;
EXP : explain EXP EXP for list of commands that can be explained by the system;
REPLACE : save the current program using a name already in use for another fileThe commands were often believed to be part of the BASIC language by users, but, in fact, were part of the time sharing system and were also used when preparing ALGOL or FORTRAN programs via the DTSS terminals.
BASIC language
The first release implemented the following statement types, taking some of its operators and keywords from FORTRAN II and some from ALGOL 60. Overall, the language more closely follows the FORTRAN model, in that it generally has one statement per line of code, lacks ALGOL's "blocks" to group code and the use of GOTO to control program flow.From ALGOL it took the
FOR...TO...STEP style loops that replaced FORTRAN's unwieldy DO...CONTINUE statements. BASIC also simplified the IF...THEN construct to allow simple comparisons like IF X>5 THEN GOTO 20, as opposed to FORTRAN's IF 20,20,30. FORTRAN's style "computed IF" was reintroduced with the ON...GOTO command in later versions.Variable names were limited to A to Z, A0 to A9, B0 to B9, ..., Z0 to Z9, giving a maximum of 286 possible distinct variables. FORTRAN's odd system for setting up the variables I through N as integers and the rest as floating point was removed, and all variables were assumed to be floating point and dimensioned with up to 10 elements. The
DIM command was only required if the array held more than ten elements. Array names were restricted to A to Z only.List of BASIC statements
;DEF : define single line functions;
DIM : define the size of arrays;
END : define the end of the program;
STOP : stop a program before the textual end;
FOR / TO / STEP : define loops;
NEXT : mark the end of loops;
GOSUB : transfer control to simple subroutines;
RETURN : return control from simple subroutines;
GOTO : transfer control to another statement;
IF / THEN : decision making;
LET / = : assign formula results to a variable;
PRINT : output results;
DATA : store static data within the program;
READ : input data stored in DATA statements;
REM : comment It also implemented floating-point numeric variables and arithmetic.
List of operators
List of functions
;ABS : Absolute value;
ATN : Arctangent value ;
COS : Cosine value ;
EXP : Exponential value;
INT : Integer value;
LOG : Natural Logarithmic value;
RND : Random value;
SIN : Sine value ;
SQR : Square root value;
TAN : Tangent valueExamples
Early versions of BASIC did not have the ability to read and write external files. To represent lists of data that would normally be read from a file, BASIC included theDATA keyword, which could be followed by an arbitrarily long list of elements, ending only at the limit of the line length. The DATA was non-executable and was skipped if encountered. READ commands would consume the data one by one, keeping track of its location within the complete collection of DATA elements in an internal pointer. In version 3, a RESTORE command was added to reset the pointer to the first DATA command in a program.In this example, "the first three data values are read into X, Y, and Z respectively. The value -1 is read into N. The next 11 values,.1 through.3, are read into the 11 elements of array B."
15 READ X, Y, Z
20 READ N
24 FOR I=0 TO 10
25 READ B
26 NEXT I
40 DATA 4.2, 7.5, 25.1, -1,.1,.01,.001,.0001
45 DATA.2,.02,.002,.0002,.015,.025,.3,.03,.003
Unlike most subsequent BASICs, Dartmouth BASIC, from the Third Edition onwards, had a matrix keyword,
MAT, which could prefix a number of other commands to operate on entire arrays of data with a single command. In this example, from the 1968 manual, MAT INPUT V is used to input a series of variables. When the user enters nothing on a line, this process ends and the total number of elements is accessed in the NUM pseudovariable. The code then adds up all of the individual elements in the matrix and calculates the average. The Third Edition also added indentation, which is used here to clarify the loop structure.5 LET S = 0
10 MAT INPUT V
20 LET N = NUM
30 IF N = 0 THEN 99
40 FOR I = 1 TO N
45 LET S = S + V
50 NEXT I
60 PRINT S/N
70 GO TO 5
99 END