mirror of
https://github.com/pkimpel/retro-b5500.git
synced 2026-04-18 18:07:13 +00:00
Correct line-ending differences between Windows and Linux.
Also minor updates to README.md and index.html.
This commit is contained in:
76
.gitattributes
vendored
76
.gitattributes
vendored
@@ -1,33 +1,43 @@
|
||||
# Set the default behavior, in case people don't have core.autocrlf set.
|
||||
* text=auto
|
||||
|
||||
# Explicitly declare text files you want to always be normalized and converted
|
||||
# to native line endings on checkout.
|
||||
*.html text
|
||||
*.css text
|
||||
*.js text
|
||||
*.md text
|
||||
*.txt text
|
||||
*.lst text
|
||||
*.svg text
|
||||
*.card text
|
||||
*.tape text
|
||||
*.pt text
|
||||
*.bacg text
|
||||
*.baca text
|
||||
*.cmd text
|
||||
*.bat text
|
||||
*.wsf text
|
||||
*.vbs text
|
||||
|
||||
# Denote all files that are truly binary and should not be modified.
|
||||
*.png binary
|
||||
*.gif binary
|
||||
*.jpg binary
|
||||
*.ttf binary
|
||||
*.woff binary
|
||||
*.pdf binary
|
||||
*.doc binary
|
||||
*.docx binary
|
||||
*.xls binary
|
||||
*.xlsx binary
|
||||
# Set the default behavior, in case people don't have core.autocrlf set.
|
||||
* text=auto
|
||||
|
||||
# Explicitly declare text files you want to always be normalized and converted
|
||||
# to native line endings on checkout.
|
||||
*.BAS text
|
||||
*.bat text
|
||||
*.card text
|
||||
*.cmd text
|
||||
*.css text
|
||||
*.html text
|
||||
*.js text
|
||||
*.lst text
|
||||
*.md text
|
||||
*.pt text
|
||||
*.svg text
|
||||
*.tape text
|
||||
*.txt text
|
||||
*.vbs text
|
||||
*.wsf text
|
||||
*.*_m text
|
||||
|
||||
.gitignore
|
||||
.gitattributes
|
||||
|
||||
# Denote all files that are truly binary and should not be modified.
|
||||
*.bcd binary
|
||||
*.cod binary
|
||||
*.DISK binary
|
||||
*.doc binary
|
||||
*.docx binary
|
||||
*.gif binary
|
||||
*.jpg binary
|
||||
*.jpeg binary
|
||||
*.pdf binary
|
||||
*.png binary
|
||||
*.ppt binary
|
||||
*.ttf binary
|
||||
*.woff binary
|
||||
*.xls binary
|
||||
*.xlsx binary
|
||||
*.zip binary
|
||||
*.7z binary
|
||||
|
||||
72
README.md
72
README.md
@@ -1,36 +1,36 @@
|
||||
The Burroughs B5500 was an innovative computer system. Released first as the B5000 in 1962 and then, with minor improvements and a new disk subsystem, re-released as the B5500 in 1964, its design was a radical departure from other commercial systems of the day. Many of the concepts that it embodied were being worked on and implemented by others around the same time, but it is difficult to think of another system that pulled so many new concepts together and made them work so well in a commercially-successful product:
|
||||
|
||||
* Stack- and descriptor-oriented instruction set
|
||||
* Variable-length memory segments
|
||||
* Hardware bounds checking
|
||||
* Unified integer/floating-point numeric format
|
||||
* Designed for and programmed exclusively in higher-level languages
|
||||
* Designed for and managed by a sophisticated operating system, the Master Control Program, or **MCP**
|
||||
* Multi-programming (multiple tasks sharing the same processor)
|
||||
* Multi-processing (multiple physical processors sharing common memory and I/O)
|
||||
* Automatic memory allocation and address relocation
|
||||
* Automatic memory segment overlay (what we now call virtual memory)
|
||||
* Use of labeled file media and automatic assignment of labeled file media to requesting programs (what we now call automatic volume recognition)
|
||||
|
||||
The B5500 was the foundation for the Burroughs B6000/7000/A Series, which are still produced and sold today as Unisys ClearPath MCP systems.
|
||||
|
||||
The main goal of this project is creation of a web browser-based emulator for the B5500. A second goal is reconstruction of the source and object code for the system.
|
||||
|
||||
A complete software release (Mark XIII, 1971) is presently available from the hosting site below under liberal terms of a Unisys educational/hobbyist license.
|
||||
|
||||
The contents of this project are licensed under the [MIT License](http://www.opensource.org/licenses/mit-license.php).
|
||||
|
||||
|
||||
| Related Sites | URL |
|
||||
| ------------- | ----- |
|
||||
| Getting Started | http://www.phkimpel.us/B5500/webSite/HelpMenu.html |
|
||||
| Project Blog | http://retro-b5500.blogspot.com/ |
|
||||
| Web/email Forum | http://groups.google.com/group/retro-b5500 |
|
||||
| Emulator hosting site | http://www.phkimpel.us/B5500/ |
|
||||
| Burroughs Mark XIII Software Release | http://www.phkimpel.us/B5500/webSite/SoftwareRequest.html |
|
||||
| B5500 at retroComputingTasmania | http://www.retrocomputingtasmania.com/home/projects/burroughs-b5500 |
|
||||
| Documents at bitsavers.org | http://bitsavers.org/pdf/burroughs/B5000_5500_5700/ |
|
||||
| Release Downloads | https://drive.google.com/folderview?id=0BxqKm7v4xBswM29qUkxPTkVfYzg&usp=sharing |
|
||||
|
||||
|
||||
This project was originally hosted on Google Code at https://code.google.com/p/retro-b5500 and moved to GitHub in June 2015.
|
||||
The Burroughs B5500 was an innovative computer system. Released first as the B5000 in 1962 and then, with minor improvements and a new disk subsystem, re-released as the B5500 in 1964, its design was a radical departure from other commercial systems of the day. Many of the concepts that it embodied were being worked on and implemented by others around the same time, but it is difficult to think of another system that pulled so many new concepts together and made them work so well in a commercially-successful product:
|
||||
|
||||
* Stack- and descriptor-oriented instruction set
|
||||
* Variable-length memory segments
|
||||
* Hardware bounds checking
|
||||
* Unified integer/floating-point numeric format
|
||||
* Designed for and programmed exclusively in higher-level languages
|
||||
* Designed for and managed by a sophisticated operating system, the Master Control Program, or **MCP**
|
||||
* Multi-programming (multiple tasks sharing the same processor)
|
||||
* Multi-processing (multiple physical processors sharing common memory and I/O)
|
||||
* Automatic memory allocation and address relocation
|
||||
* Automatic memory segment overlay (what we now call virtual memory)
|
||||
* Use of labeled file media and automatic assignment of labeled file media to requesting programs (what we now call automatic volume recognition)
|
||||
|
||||
The B5500 was the foundation for the Burroughs B6000/7000/A Series, which are still produced and sold today as Unisys ClearPath MCP systems.
|
||||
|
||||
The main goal of this project is creation of a web browser-based emulator for the B5500. A second goal is reconstruction of the source and object code for the system.
|
||||
|
||||
A complete software release (Mark XIII, 1971) is presently available from the hosting site below under liberal terms of a Unisys educational/hobbyist license.
|
||||
|
||||
The contents of this project are licensed under the [MIT License](http://www.opensource.org/licenses/mit-license.php).
|
||||
|
||||
|
||||
| Related Sites | URL |
|
||||
| ------------- | ----- |
|
||||
| Getting Started | http://www.phkimpel.us/B5500/webSite/HelpMenu.html |
|
||||
| Project Blog | http://retro-b5500.blogspot.com/ |
|
||||
| Web/email Forum | http://groups.google.com/group/retro-b5500 |
|
||||
| Emulator hosting site | http://www.phkimpel.us/B5500/ |
|
||||
| Burroughs Mark XIII Software Release | http://www.phkimpel.us/B5500/webSite/SoftwareRequest.html |
|
||||
| B5500 at retroComputingTasmania | http://www.retrocomputingtasmania.com/home/projects/burroughs-b5500 |
|
||||
| Documents at bitsavers.org | http://bitsavers.org/pdf/burroughs/B5000_5500_5700/ |
|
||||
| Release Downloads | https://drive.google.com/folderview?id=0BxqKm7v4xBswM29qUkxPTkVfYzg&usp=sharing |
|
||||
|
||||
|
||||
This project was originally hosted on Google Code at https://code.google.com/p/retro-b5500 and moved to GitHub in June 2015.
|
||||
|
||||
151
index.html
151
index.html
@@ -1,75 +1,78 @@
|
||||
<!DOCTYPE html>
|
||||
<head>
|
||||
<title>retro-B5500 Emulator Hosting Site</title>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
|
||||
<meta name="Author" content="Nigel Williams & Paul Kimpel">
|
||||
<meta http-equiv="Content-Script-Type" content="text/javascript">
|
||||
<meta http-equiv="Content-Style-Type" content="text/css">
|
||||
<link id=defaultStyleSheet rel=stylesheet type="text/css" href="./webSite/website.css">
|
||||
</head>
|
||||
|
||||
<body>
|
||||
<a href="./index.html" title="Click to return to the Home Page">
|
||||
<img id=retroButton src="./webUI/resources/A-CONTROL.png" alt="retro A-CONTROL logo">
|
||||
</a>
|
||||
|
||||
<h1><img src="./webUI/resources/retro-B5500-Logo.png" alt="retro logo">
|
||||
<hr>
|
||||
Burroughs B5500 Emulator Hosting Site
|
||||
</h1>
|
||||
|
||||
<p>This site hosts the current version of the retro-B5500 emulator, an implementation of the legendary Burroughs B5500 that runs in a web browser.</p>
|
||||
|
||||
<p class=center>
|
||||
<img src="./webSite/b5500.jpg" alt="Typical B5500 installation">
|
||||
</p>
|
||||
|
||||
<h2>Main Links</h2>
|
||||
|
||||
<ul>
|
||||
<li><a href="./webUI/B5500Console.html">B5500 Home Page</a>
|
||||
<br>The home page from which you can start the emulator and open the B5500 Operations Console. <i>Please read the
|
||||
<a href="https://github.com/pkimpel/retro-b5500/wiki/WebUIGettingStarted">Getting Started</a> wiki page before opening the home page.</i>
|
||||
|
||||
<li><a href="./webSite/HelpMenu.html">Help & Getting Started</a>
|
||||
<br>A menu of information resources to assist you in setting up and operating the emulator.
|
||||
|
||||
<li><a href="https://github.com/pkimpel/retro-b5500/">Open Source Project</a>
|
||||
<br>Source code, documentation, and other developer resources for the retro-B5500 emulator project at GitHub.
|
||||
|
||||
<li><a href="http://retro-b5500.blogspot.com/">Project Blog</a>
|
||||
<br>The retro-B5500 project blog.
|
||||
|
||||
<li><a href="http://groups.google.com/group/retro-b5500/">Project Forum</a>
|
||||
<br>The retro-B5500 project forum. The forum is open to everyone, but you must register first.
|
||||
|
||||
<li><a href="./webSite/UtilityMenu.html">Emulator Utilities</a>
|
||||
<br>A set of utilities that run in your web browser for setting up and inspecting the emulator environment.
|
||||
|
||||
<li><a href="https://drive.google.com/folderview?id=0BxqKm7v4xBswM29qUkxPTkVfYzg&usp=sharing">Releases</a>
|
||||
<br>Recent releases of the emulator files, packaged as one <code>.zip</code> file per release.
|
||||
|
||||
<li><a href="./webSite/SoftwareRequest.html">B5500 System Software</a>
|
||||
<br>Tape images and decoded ASCII files of B5500 system software for the Mark XIII (1971) software release. You must download at least the SYSTEM tape image in order to set up the emulator in your browser.
|
||||
|
||||
<li><a href="http://bitsavers.org/pdf/burroughs/B5000_5500_5700/">Burroughs Documents at bitsavers.org</a>
|
||||
<br>A collection of scanned copies of original Burroughs manuals and other reference materials for the B5500 system.
|
||||
</ul>
|
||||
|
||||
|
||||
<hr>
|
||||
<p class="center smaller">Like this? Check out the
|
||||
<a href="http://www.phkimpel.us/ElectroData-205/">ElectroData/Burroughs Datatron 205 Emulator</a>.
|
||||
</p>
|
||||
|
||||
<p>
|
||||
<div id=footerDiv>
|
||||
Copyright (c) 2013, Nigel Williams and Paul Kimpel • Licensed under the
|
||||
<a href="LICENSE.txt">MIT License</a>
|
||||
</div>
|
||||
<div id=lastModDiv>Revised
|
||||
2017-05-28
|
||||
</div>
|
||||
|
||||
</body>
|
||||
<!DOCTYPE html>
|
||||
<head>
|
||||
<title>retro-B5500 Emulator Hosting Site</title>
|
||||
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
|
||||
<meta name="Author" content="Nigel Williams & Paul Kimpel">
|
||||
<meta http-equiv="Content-Script-Type" content="text/javascript">
|
||||
<meta http-equiv="Content-Style-Type" content="text/css">
|
||||
<link id=defaultStyleSheet rel=stylesheet type="text/css" href="./webSite/website.css">
|
||||
</head>
|
||||
|
||||
<body>
|
||||
<a href="./index.html" title="Click to return to the Home Page">
|
||||
<img id=retroButton src="./webUI/resources/A-CONTROL.png" alt="retro A-CONTROL logo">
|
||||
</a>
|
||||
|
||||
<h1><img src="./webUI/resources/retro-B5500-Logo.png" alt="retro logo">
|
||||
<hr>
|
||||
Burroughs B5500 Emulator Hosting Site
|
||||
</h1>
|
||||
|
||||
<p>This site hosts the current version of the retro-B5500 emulator, an implementation of the legendary Burroughs B5500 that runs in a web browser.</p>
|
||||
|
||||
<p class=center>
|
||||
<img src="./webSite/b5500.jpg" alt="Typical B5500 installation">
|
||||
</p>
|
||||
|
||||
<h2>Main Links</h2>
|
||||
|
||||
<ul>
|
||||
<li><a href="./webUI/B5500Console.html">B5500 Home Page</a>
|
||||
<br>The home page from which you can start the emulator and open the B5500 Operations Console. <i>Please read the
|
||||
<a href="https://github.com/pkimpel/retro-b5500/wiki/WebUIGettingStarted">Getting Started</a> wiki page before opening the home page.</i>
|
||||
|
||||
<li><a href="./webSite/HelpMenu.html">Help & Getting Started</a>
|
||||
<br>A menu of information resources to assist you in setting up and operating the emulator.
|
||||
|
||||
<li><a href="https://github.com/pkimpel/retro-b5500/">Open Source Project</a>
|
||||
<br>Source code, documentation, and other developer resources for the retro-B5500 emulator project at GitHub.
|
||||
|
||||
<li><a href="http://retro-b5500.blogspot.com/">Project Blog</a>
|
||||
<br>The retro-B5500 project blog.
|
||||
|
||||
<li><a href="http://groups.google.com/group/retro-b5500/">Project Forum</a>
|
||||
<br>The retro-B5500 project forum. The forum is open to everyone, but you must register first.
|
||||
|
||||
<li><a href="./webSite/UtilityMenu.html">Emulator Utilities</a>
|
||||
<br>A set of utilities that run in your web browser for setting up and inspecting the emulator environment.
|
||||
|
||||
<li><a href="https://github.com/retro-software/B5500-software">B5500 Software Collection</a>
|
||||
<br>A collection of B5500 source code, including version 13 of the CUBE Library from 1971.
|
||||
|
||||
<li><a href="./webSite/SoftwareRequest.html">B5500 System Software</a>
|
||||
<br>Tape images and decoded ASCII files of B5500 system software for the Mark XIII (1971) software release. You must download at least the SYSTEM tape image in order to set up the emulator in your browser.
|
||||
|
||||
<li><a href="http://bitsavers.org/pdf/burroughs/B5000_5500_5700/">Burroughs Documents at bitsavers.org</a>
|
||||
<br>A collection of scanned copies of original Burroughs manuals and other reference materials for the B5500 system. This project would not have been possible without the availability of these documents.
|
||||
</ul>
|
||||
|
||||
|
||||
<hr>
|
||||
<p class="center smaller">Like this? Check out the
|
||||
<a href="http://www.phkimpel.us/ElectroData-205/">ElectroData/Burroughs Datatron 205</a>
|
||||
and
|
||||
<a href="http://www.phkimpel.us/Burroughs-220/">Burroughs 220</a>
|
||||
emulators.
|
||||
</p>
|
||||
|
||||
<p> </p>
|
||||
<div id=footerDiv>
|
||||
Copyright (c) 2013, Nigel Williams and Paul Kimpel • Licensed under the
|
||||
<a href="LICENSE.txt">MIT License</a>
|
||||
</div>
|
||||
<div id=lastModDiv>Revised
|
||||
2018-12-30
|
||||
</div>
|
||||
|
||||
</body>
|
||||
</html>
|
||||
@@ -1,242 +1,242 @@
|
||||
PROGRAM
|
||||
BLOCK
|
||||
BLOKHEAD
|
||||
BLOKBODY
|
||||
LABDEF
|
||||
STAT
|
||||
STAT-
|
||||
EXPR
|
||||
EXPR-
|
||||
IFCLAUSE
|
||||
TRUEPART
|
||||
CATENA
|
||||
DISJ
|
||||
DISJHEAD
|
||||
CONJ
|
||||
CONJ-
|
||||
CONJHEAD
|
||||
NEGATION
|
||||
RELATION
|
||||
CHOICE
|
||||
CHOICE-
|
||||
SUM
|
||||
SUM-
|
||||
TERM
|
||||
TERM-
|
||||
FACTOR
|
||||
FACTOR-
|
||||
PRIMARY
|
||||
PROCDEF
|
||||
PROCHEAD
|
||||
LIST*
|
||||
LISTHEAD
|
||||
REFERENC
|
||||
NUMBER
|
||||
REAL*
|
||||
INTEGER*
|
||||
INTEGER-
|
||||
DIGIT
|
||||
LOGVAL
|
||||
VAR
|
||||
VAR-
|
||||
VARDECL
|
||||
FORDECL
|
||||
LABDECL
|
||||
*
|
||||
0
|
||||
1
|
||||
2
|
||||
3
|
||||
4
|
||||
5
|
||||
6
|
||||
7
|
||||
8
|
||||
9
|
||||
,
|
||||
.
|
||||
;
|
||||
:
|
||||
@
|
||||
NEW
|
||||
FORMAL
|
||||
LABEL
|
||||
IDENT*
|
||||
[
|
||||
]
|
||||
BEGIN
|
||||
END
|
||||
(
|
||||
)
|
||||
LQ
|
||||
RQ
|
||||
GOTO
|
||||
OUT
|
||||
~
|
||||
IF
|
||||
THEN
|
||||
ELSE
|
||||
&
|
||||
OR
|
||||
AND
|
||||
NOT
|
||||
=
|
||||
!
|
||||
<
|
||||
{
|
||||
}
|
||||
>
|
||||
MIN
|
||||
MAX
|
||||
+
|
||||
-
|
||||
|
|
||||
/
|
||||
%
|
||||
MOD
|
||||
*
|
||||
ABS
|
||||
LENGTH
|
||||
INTEGER
|
||||
REAL
|
||||
LOGICAL
|
||||
LIST
|
||||
TAIL
|
||||
IN
|
||||
ISB
|
||||
ISN
|
||||
ISR
|
||||
ISL
|
||||
ISLI
|
||||
ISY
|
||||
ISP
|
||||
ISU
|
||||
SYMBOL*
|
||||
UNDEFINE
|
||||
TEN
|
||||
#
|
||||
TRUE
|
||||
FALSE
|
||||
$
|
||||
*
|
||||
VARDECL NEW IDENT* 001
|
||||
FORDECL FORMAL IDENT* 002
|
||||
LABDECL LABEL IDENT* 003
|
||||
VAR- IDENT* 004
|
||||
VAR- VAR- [ EXPR ] 005
|
||||
VAR- VAR- . 006
|
||||
VAR VAR- 007
|
||||
LOGVAL TRUE 010
|
||||
LOGVAL FALSE 011
|
||||
DIGIT 0 012
|
||||
DIGIT 1 013
|
||||
DIGIT 2 014
|
||||
DIGIT 3 015
|
||||
DIGIT 4 016
|
||||
DIGIT 5 017
|
||||
DIGIT 6 020
|
||||
DIGIT 7 021
|
||||
DIGIT 8 022
|
||||
DIGIT 9 023
|
||||
INTEGER- DIGIT 024
|
||||
INTEGER- INTEGER- DIGIT 025
|
||||
INTEGER* INTEGER- 026
|
||||
REAL* INTEGER* . INTEGER* 027
|
||||
REAL* INTEGER* 030
|
||||
NUMBER REAL* 031
|
||||
NUMBER REAL* TEN INTEGER* 032
|
||||
NUMBER REAL* TEN # INTEGER* 033
|
||||
NUMBER TEN INTEGER* 034
|
||||
NUMBER TEN # INTEGER* 035
|
||||
REFERENC @ VAR 036
|
||||
LISTHEAD LISTHEAD EXPR , 037
|
||||
LISTHEAD ( 040
|
||||
LIST* LISTHEAD EXPR ) 041
|
||||
LIST* LISTHEAD ) 042
|
||||
PROCHEAD PROCHEAD FORDECL ; 043
|
||||
PROCHEAD LQ 044
|
||||
PROCDEF PROCHEAD EXPR RQ 045
|
||||
PRIMARY VAR 046
|
||||
PRIMARY VAR LIST* 047
|
||||
PRIMARY LOGVAL 050
|
||||
PRIMARY NUMBER 051
|
||||
PRIMARY SYMBOL* 052
|
||||
PRIMARY REFERENC 053
|
||||
PRIMARY LIST* 054
|
||||
PRIMARY TAIL PRIMARY 055
|
||||
PRIMARY PROCDEF 056
|
||||
PRIMARY UNDEFINE 057
|
||||
PRIMARY [ EXPR ] 060
|
||||
PRIMARY IN 061
|
||||
PRIMARY ISB VAR 062
|
||||
PRIMARY ISN VAR 063
|
||||
PRIMARY ISR VAR 064
|
||||
PRIMARY ISL VAR 065
|
||||
PRIMARY ISLI VAR 066
|
||||
PRIMARY ISY VAR 067
|
||||
PRIMARY ISP VAR 070
|
||||
PRIMARY ISU VAR 071
|
||||
PRIMARY ABS PRIMARY 072
|
||||
PRIMARY LENGTH VAR 073
|
||||
PRIMARY INTEGER PRIMARY 074
|
||||
PRIMARY REAL PRIMARY 075
|
||||
PRIMARY LOGICAL PRIMARY 076
|
||||
PRIMARY LIST PRIMARY 077
|
||||
FACTOR- PRIMARY 100
|
||||
FACTOR- FACTOR- * PRIMARY 101
|
||||
FACTOR FACTOR- 102
|
||||
TERM- FACTOR 103
|
||||
TERM- TERM- | FACTOR 104
|
||||
TERM- TERM- / FACTOR 105
|
||||
TERM- TERM- % FACTOR 106
|
||||
TERM- TERM- MOD FACTOR 107
|
||||
TERM TERM- 110
|
||||
SUM- TERM 111
|
||||
SUM- + TERM 112
|
||||
SUM- - TERM 113
|
||||
SUM- SUM- + TERM 114
|
||||
SUM- SUM- - TERM 115
|
||||
SUM SUM- 116
|
||||
CHOICE- SUM 117
|
||||
CHOICE- CHOICE- MIN SUM 120
|
||||
CHOICE- CHOICE- MAX SUM 121
|
||||
CHOICE CHOICE- 122
|
||||
RELATION CHOICE 123
|
||||
RELATION CHOICE = CHOICE 124
|
||||
RELATION CHOICE ! CHOICE 125
|
||||
RELATION CHOICE < CHOICE 126
|
||||
RELATION CHOICE { CHOICE 127
|
||||
RELATION CHOICE } CHOICE 130
|
||||
RELATION CHOICE > CHOICE 131
|
||||
NEGATION RELATION 132
|
||||
NEGATION NOT RELATION 133
|
||||
CONJHEAD NEGATION AND 134
|
||||
CONJ- CONJHEAD CONJ- 135
|
||||
CONJ- NEGATION 136
|
||||
CONJ CONJ- 137
|
||||
DISJHEAD CONJ OR 140
|
||||
DISJ DISJHEAD DISJ 141
|
||||
DISJ CONJ 142
|
||||
CATENA CATENA & PRIMARY 143
|
||||
CATENA DISJ 144
|
||||
TRUEPART EXPR ELSE 145
|
||||
IFCLAUSE IF EXPR THEN 146
|
||||
EXPR- BLOCK 147
|
||||
EXPR- IFCLAUSE TRUEPART EXPR- 150
|
||||
EXPR- VAR ~ EXPR- 151
|
||||
EXPR- GOTO PRIMARY 152
|
||||
EXPR- OUT EXPR- 153
|
||||
EXPR- CATENA 154
|
||||
EXPR EXPR- 155
|
||||
STAT- LABDEF STAT- 156
|
||||
STAT- EXPR 157
|
||||
STAT STAT- 160
|
||||
LABDEF IDENT* : 161
|
||||
BLOKHEAD BEGIN 162
|
||||
BLOKHEAD BLOKHEAD VARDECL ; 163
|
||||
BLOKHEAD BLOKHEAD LABDECL ; 164
|
||||
BLOKBODY BLOKHEAD 165
|
||||
BLOKBODY BLOKBODY STAT ; 166
|
||||
BLOCK BLOKBODY STAT END 167
|
||||
PROGRAM $ BLOCK $ 170
|
||||
*
|
||||
PROGRAM
|
||||
BLOCK
|
||||
BLOKHEAD
|
||||
BLOKBODY
|
||||
LABDEF
|
||||
STAT
|
||||
STAT-
|
||||
EXPR
|
||||
EXPR-
|
||||
IFCLAUSE
|
||||
TRUEPART
|
||||
CATENA
|
||||
DISJ
|
||||
DISJHEAD
|
||||
CONJ
|
||||
CONJ-
|
||||
CONJHEAD
|
||||
NEGATION
|
||||
RELATION
|
||||
CHOICE
|
||||
CHOICE-
|
||||
SUM
|
||||
SUM-
|
||||
TERM
|
||||
TERM-
|
||||
FACTOR
|
||||
FACTOR-
|
||||
PRIMARY
|
||||
PROCDEF
|
||||
PROCHEAD
|
||||
LIST*
|
||||
LISTHEAD
|
||||
REFERENC
|
||||
NUMBER
|
||||
REAL*
|
||||
INTEGER*
|
||||
INTEGER-
|
||||
DIGIT
|
||||
LOGVAL
|
||||
VAR
|
||||
VAR-
|
||||
VARDECL
|
||||
FORDECL
|
||||
LABDECL
|
||||
*
|
||||
0
|
||||
1
|
||||
2
|
||||
3
|
||||
4
|
||||
5
|
||||
6
|
||||
7
|
||||
8
|
||||
9
|
||||
,
|
||||
.
|
||||
;
|
||||
:
|
||||
@
|
||||
NEW
|
||||
FORMAL
|
||||
LABEL
|
||||
IDENT*
|
||||
[
|
||||
]
|
||||
BEGIN
|
||||
END
|
||||
(
|
||||
)
|
||||
LQ
|
||||
RQ
|
||||
GOTO
|
||||
OUT
|
||||
~
|
||||
IF
|
||||
THEN
|
||||
ELSE
|
||||
&
|
||||
OR
|
||||
AND
|
||||
NOT
|
||||
=
|
||||
!
|
||||
<
|
||||
{
|
||||
}
|
||||
>
|
||||
MIN
|
||||
MAX
|
||||
+
|
||||
-
|
||||
|
|
||||
/
|
||||
%
|
||||
MOD
|
||||
*
|
||||
ABS
|
||||
LENGTH
|
||||
INTEGER
|
||||
REAL
|
||||
LOGICAL
|
||||
LIST
|
||||
TAIL
|
||||
IN
|
||||
ISB
|
||||
ISN
|
||||
ISR
|
||||
ISL
|
||||
ISLI
|
||||
ISY
|
||||
ISP
|
||||
ISU
|
||||
SYMBOL*
|
||||
UNDEFINE
|
||||
TEN
|
||||
#
|
||||
TRUE
|
||||
FALSE
|
||||
$
|
||||
*
|
||||
VARDECL NEW IDENT* 001
|
||||
FORDECL FORMAL IDENT* 002
|
||||
LABDECL LABEL IDENT* 003
|
||||
VAR- IDENT* 004
|
||||
VAR- VAR- [ EXPR ] 005
|
||||
VAR- VAR- . 006
|
||||
VAR VAR- 007
|
||||
LOGVAL TRUE 010
|
||||
LOGVAL FALSE 011
|
||||
DIGIT 0 012
|
||||
DIGIT 1 013
|
||||
DIGIT 2 014
|
||||
DIGIT 3 015
|
||||
DIGIT 4 016
|
||||
DIGIT 5 017
|
||||
DIGIT 6 020
|
||||
DIGIT 7 021
|
||||
DIGIT 8 022
|
||||
DIGIT 9 023
|
||||
INTEGER- DIGIT 024
|
||||
INTEGER- INTEGER- DIGIT 025
|
||||
INTEGER* INTEGER- 026
|
||||
REAL* INTEGER* . INTEGER* 027
|
||||
REAL* INTEGER* 030
|
||||
NUMBER REAL* 031
|
||||
NUMBER REAL* TEN INTEGER* 032
|
||||
NUMBER REAL* TEN # INTEGER* 033
|
||||
NUMBER TEN INTEGER* 034
|
||||
NUMBER TEN # INTEGER* 035
|
||||
REFERENC @ VAR 036
|
||||
LISTHEAD LISTHEAD EXPR , 037
|
||||
LISTHEAD ( 040
|
||||
LIST* LISTHEAD EXPR ) 041
|
||||
LIST* LISTHEAD ) 042
|
||||
PROCHEAD PROCHEAD FORDECL ; 043
|
||||
PROCHEAD LQ 044
|
||||
PROCDEF PROCHEAD EXPR RQ 045
|
||||
PRIMARY VAR 046
|
||||
PRIMARY VAR LIST* 047
|
||||
PRIMARY LOGVAL 050
|
||||
PRIMARY NUMBER 051
|
||||
PRIMARY SYMBOL* 052
|
||||
PRIMARY REFERENC 053
|
||||
PRIMARY LIST* 054
|
||||
PRIMARY TAIL PRIMARY 055
|
||||
PRIMARY PROCDEF 056
|
||||
PRIMARY UNDEFINE 057
|
||||
PRIMARY [ EXPR ] 060
|
||||
PRIMARY IN 061
|
||||
PRIMARY ISB VAR 062
|
||||
PRIMARY ISN VAR 063
|
||||
PRIMARY ISR VAR 064
|
||||
PRIMARY ISL VAR 065
|
||||
PRIMARY ISLI VAR 066
|
||||
PRIMARY ISY VAR 067
|
||||
PRIMARY ISP VAR 070
|
||||
PRIMARY ISU VAR 071
|
||||
PRIMARY ABS PRIMARY 072
|
||||
PRIMARY LENGTH VAR 073
|
||||
PRIMARY INTEGER PRIMARY 074
|
||||
PRIMARY REAL PRIMARY 075
|
||||
PRIMARY LOGICAL PRIMARY 076
|
||||
PRIMARY LIST PRIMARY 077
|
||||
FACTOR- PRIMARY 100
|
||||
FACTOR- FACTOR- * PRIMARY 101
|
||||
FACTOR FACTOR- 102
|
||||
TERM- FACTOR 103
|
||||
TERM- TERM- | FACTOR 104
|
||||
TERM- TERM- / FACTOR 105
|
||||
TERM- TERM- % FACTOR 106
|
||||
TERM- TERM- MOD FACTOR 107
|
||||
TERM TERM- 110
|
||||
SUM- TERM 111
|
||||
SUM- + TERM 112
|
||||
SUM- - TERM 113
|
||||
SUM- SUM- + TERM 114
|
||||
SUM- SUM- - TERM 115
|
||||
SUM SUM- 116
|
||||
CHOICE- SUM 117
|
||||
CHOICE- CHOICE- MIN SUM 120
|
||||
CHOICE- CHOICE- MAX SUM 121
|
||||
CHOICE CHOICE- 122
|
||||
RELATION CHOICE 123
|
||||
RELATION CHOICE = CHOICE 124
|
||||
RELATION CHOICE ! CHOICE 125
|
||||
RELATION CHOICE < CHOICE 126
|
||||
RELATION CHOICE { CHOICE 127
|
||||
RELATION CHOICE } CHOICE 130
|
||||
RELATION CHOICE > CHOICE 131
|
||||
NEGATION RELATION 132
|
||||
NEGATION NOT RELATION 133
|
||||
CONJHEAD NEGATION AND 134
|
||||
CONJ- CONJHEAD CONJ- 135
|
||||
CONJ- NEGATION 136
|
||||
CONJ CONJ- 137
|
||||
DISJHEAD CONJ OR 140
|
||||
DISJ DISJHEAD DISJ 141
|
||||
DISJ CONJ 142
|
||||
CATENA CATENA & PRIMARY 143
|
||||
CATENA DISJ 144
|
||||
TRUEPART EXPR ELSE 145
|
||||
IFCLAUSE IF EXPR THEN 146
|
||||
EXPR- BLOCK 147
|
||||
EXPR- IFCLAUSE TRUEPART EXPR- 150
|
||||
EXPR- VAR ~ EXPR- 151
|
||||
EXPR- GOTO PRIMARY 152
|
||||
EXPR- OUT EXPR- 153
|
||||
EXPR- CATENA 154
|
||||
EXPR EXPR- 155
|
||||
STAT- LABDEF STAT- 156
|
||||
STAT- EXPR 157
|
||||
STAT STAT- 160
|
||||
LABDEF IDENT* : 161
|
||||
BLOKHEAD BEGIN 162
|
||||
BLOKHEAD BLOKHEAD VARDECL ; 163
|
||||
BLOKHEAD BLOKHEAD LABDECL ; 164
|
||||
BLOKBODY BLOKHEAD 165
|
||||
BLOKBODY BLOKBODY STAT ; 166
|
||||
BLOCK BLOKBODY STAT END 167
|
||||
PROGRAM $ BLOCK $ 170
|
||||
*
|
||||
|
||||
@@ -1,24 +1,24 @@
|
||||
|
||||
BEGIN NEW FOR; NEW MAKE; NEW T; NEW A;
|
||||
FOR ~ LQ FORMAL CV; FORMAL LB; FORMAL STEP; FORMAL UB; FORMAL S;
|
||||
BEGIN
|
||||
LABEL L; LABEL K;
|
||||
CV ~ LB;
|
||||
K: IF CV { UB THEN S ELSE GOTO L;
|
||||
CV ~ CV + STEP;
|
||||
GOTO K;
|
||||
L: 0
|
||||
END RQ;
|
||||
|
||||
MAKE ~ LQ FORMAL B; FORMAL X;
|
||||
BEGIN NEW T; NEW I; NEW F; NEW L;
|
||||
L ~ B; T ~ LIST L[1];
|
||||
F ~ IF LENGTH L ! 1 THEN MAKE(TAIL L, X) ELSE X;
|
||||
FOR (@I, 1, 1, L[1], LQ T[I] ~ F RQ);
|
||||
T
|
||||
END RQ;
|
||||
|
||||
A ~ ();
|
||||
FOR (@T, 1, 1, 4, LQ BEGIN A ~ A & (T); OUT MAKE(@A,T) END RQ)
|
||||
END $
|
||||
DUMP
|
||||
|
||||
BEGIN NEW FOR; NEW MAKE; NEW T; NEW A;
|
||||
FOR ~ LQ FORMAL CV; FORMAL LB; FORMAL STEP; FORMAL UB; FORMAL S;
|
||||
BEGIN
|
||||
LABEL L; LABEL K;
|
||||
CV ~ LB;
|
||||
K: IF CV { UB THEN S ELSE GOTO L;
|
||||
CV ~ CV + STEP;
|
||||
GOTO K;
|
||||
L: 0
|
||||
END RQ;
|
||||
|
||||
MAKE ~ LQ FORMAL B; FORMAL X;
|
||||
BEGIN NEW T; NEW I; NEW F; NEW L;
|
||||
L ~ B; T ~ LIST L[1];
|
||||
F ~ IF LENGTH L ! 1 THEN MAKE(TAIL L, X) ELSE X;
|
||||
FOR (@I, 1, 1, L[1], LQ T[I] ~ F RQ);
|
||||
T
|
||||
END RQ;
|
||||
|
||||
A ~ ();
|
||||
FOR (@T, 1, 1, 4, LQ BEGIN A ~ A & (T); OUT MAKE(@A,T) END RQ)
|
||||
END $
|
||||
DUMP
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -1,71 +1,71 @@
|
||||
14M90+KI$|#0|00MM)290+JI"000000D4*342L05000V10JI18JI0)0)000S0QKI000W0HKI000,08KI000]=/1V082I08JI0417+E0M16+E[)|/EV+EBV+E}V+E?V*)*/}V000M16+E:)B/1VB),/4V4J1>50JI
|
||||
000000008YSI8D4A008T008E2900SI+A001J ]0008/I8F080?/I0?8]0+/I8F040 +A2(8]01000160
|
||||
000000000U+A2(8T0Y+A2(4A0!+A2(001J B009>0Q/I831J0Y8,8E4A0 /I0)0)0U/I080001000170
|
||||
000000001|0|0000000040001|00|8002B8W104(000009A 00000000000000000000000001000200
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000210
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000220
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000230
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000240
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000250
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000260
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000270
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000300
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000310
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000320
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000330
|
||||
00000000Q00000000000000000000000000000000000000000000000000000000000000001000340
|
||||
000000000000000000000000000000000000000000000000Q <0003WQ +0004DQ 50004M01000350
|
||||
00000000= 200082= 60005-= &0005+= ?0004R= C0004V= 800058= 60005S= F0005Y01000360
|
||||
00000000= :0006>= 70006[= N0006K= H00077= L0007~] B0000B90+A0D1J831J"!S)01000370
|
||||
00000000#/#V8-4A8-+A001J8|4A8K#O0)118M4A8O#O0)11831J]|S)#/#V8 4A400?AJ4J01000400
|
||||
000000009;041?KI000000+64J00@20)8$Z)3/5V@60)9>0R8$08118Q8A1!2E0DAI041+SI01000410
|
||||
00000000000K000000000Q008-+A041J8$Z)3/5V8?4A4J8>?O0)?$0)9>K)CN00ME282I0401000420
|
||||
000000008{+A?;0)|:8I001:ME8:088{+A088]8:001:ME4:0?8{+A?S0)8:001:ME4:1:1+01000430
|
||||
000000002I4J8>?W0)?,0)9>0R8$08118Q8A1!2E18AI005|1I4J049F4J8>?O0)009>0R0401000440
|
||||
000000003 KI0)0)0}"5|00000006Q000LABEL 0FILE000000K000000000Q008$8;008]01000450
|
||||
000000008:001:ME8$04118;048]8:001:ME4:1:0DBI8$8;0 ME0?2I4J08968$08118Q8A01000460
|
||||
00000000|02E0MAI4J8$04119F4J8>>20)009>0R4J9S0M8;04311YH104118+4A040DSI0)01000470
|
||||
000000000}"5|0004J8>}>0)009>0R4J9B8$04118Q8A8B2E0+AI4J8>}B0)009>0R8#1M2I01000500
|
||||
000000004J0?8"0H8%MJ}>D! TO DEFAULT ADDRESS=2*8W1!0~9}8#104J0?964J8U+A1001000510
|
||||
00000000MJ2*D510000?AJ0008AJ>8/I0}"5|000000K00000000BI004J041{4A1{0008M901000520
|
||||
00000000290?JI0)J)#N00ME0 1I1 0UMJ142*35102&JI0)0S1?JI0)0W1&JI0)0,1-JI0)01000530
|
||||
000000000]1!JI0)R|00PY204J8410MJ2*14+$!5!50R10D900000000000000000000000001000540
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000550
|
||||
0000000000000000000000000000000000000000DISK FAILURE~000TAPE FAILURE~00001000560
|
||||
00000000NO MCP FILE~0000MCP FILE LOADED~NOT IN DIRCTORY~LOADER ON DISK~ 01000570
|
||||
00000000CRA FAILURE~ 00000000000000000MCP 0DISK 0SYSTEM 0000000001000600
|
||||
0000000000000000000000Y>Y#2:Y84AY@M94J92|84A|#Y61:4:|?4A|>K)CN004E0+BI|>01000610
|
||||
00000000N)8N1:08BI4JY#|@9#1:0&AI|#|44A|62(DISK~ 0000/#|44A4J8K|6009>0R8O01000620
|
||||
00000000831J8K831J+A8E4A4J8O|604=)|/1V009>0R0)8K4J8OMJ3*8I8>3$S$ /1N1K0R01000630
|
||||
000000000R3J100U2I|#0411|84A|#0D2E3H1I4J00964J?08KMJ2B8%104(0)0)1;413 0001000640
|
||||
0000000000040+SI4J8> F .9>L)#N08AI|60411|48AY62E0+AI4(0)0001|0000000600001000650
|
||||
000000000000Y6Q)@N004E082I042(Y6M)9N4-2IY63)DN0-BI041&KI4J8> K O9>0RY74J01000660
|
||||
0000000000Y# <9>8E8AM)9N004E3Y2I|#0411|88A0D2E0&AI2+KI0)0003|0000000600001000670
|
||||
000000000418KI0)Y74J00Y# O9>8E8AM)9N004E1|2I|#0411|88A0D2E0DAI4JY63)DN0Q01000700
|
||||
00000000ME0?2I0H0?KIY#9)?N96|62(000020004J08Y6418%001J B009>0RY60?ME0D1I01000710
|
||||
000000004(0)0)0)7|000000004J0M8T|7MJ2*4I146>4$333$1~2N1U1P12130R0R10|62(01000720
|
||||
00000000008<0?2I4J0D964J048T0M8S8)CN4J9.8 +A1JMJ3*2L0510DI|):N0DBI4J8 +A01000730
|
||||
00000000001J # >9>0R0UKI2|#0|00000003000008T0 8E4A008S008E4)4/-V004E3M1I01000740
|
||||
000000008K|44A8 +A6!1J8|4A048&4A8K831J048E4A4J9B|68|4A4(0)004J8$0+8"MJ2*01000750
|
||||
000000001>"$ D2N1I2P0O1P0R/D3N1I?{FP=D2N6{BP7$ D3N1!0 @P/D3N1!0 6P=D3N1!01000760
|
||||
000000000 1P1"0R4:108Q4A4(8T0 8E4J9KY60|2I088"0+8]8E4A0YKI008"0+8]8E4A4J01000770
|
||||
000000009K048"0+8]8E4A4(00008T008E4A4J8 +A001J S009>0R088S|4JA0)0)0)|60+01001000
|
||||
00000000110?KI8B10118+4A044Y2I4J8C8 +AMJ2*8W104J8 +A001J >009>0R0038KI0)01001010
|
||||
000000001|00|8001|00K000(!8F318S4 8:001:ME0?2I4J0+96(!8F318S008]8:001:ME01001020
|
||||
000000000 2I<08F318S048]8:001:4E0-2I8F08118D8A1 2E0-AI5HJI0?8".!8F0!413101001030
|
||||
000000008S8E8A00ME888A0D2I0?8" B8E4A4J0?8]0Y8%MJ2B8W104(000009A DI|):N4+01001040
|
||||
000000002I8 +A001J8Q4A4J8 +A001J ]/29>0R008T+A008:001:ME04BI4J9<4J9K0+8]01001050
|
||||
00000000 S8:001:ME0?2I4J009O0+8] $8:001:ME0?2I4J049ODI|):N00ME0+8] <8:0001001060
|
||||
000000001:ME2:4+1I4J9$4(2|#0|000000030000FILE 0TAPE 0STOP 0-8{0?8]01001070
|
||||
000000008E4A0D8{+E+AMI8E4A4J8B1 8F3108H1118-+AMJ2B8W104J8-+A001J/<009>0R01001100
|
||||
00000000008T208E4A048T008E4A4J8 +A001J/B/B9>0R048S4)8N8D4A0-8F0D41118D4A01001110
|
||||
00000000008T008E4A4J8 +A001J ]009>0R8F08118T0?8]8E4A8F04118T048]8E4A8F8T01001120
|
||||
00000000008]8E4A4J8 +A001J B009>0R8K831J0Y8,8E4A4(0)0)0)1|<108001|0|000001001130
|
||||
00000000000040001|00|800009WKI|62(4A0D8{0000000000000000000000000000000001001140
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001150
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001160
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001170
|
||||
00000000=000000#04*)H/}VY6044A4("000000:2*14"$"50R004J0O4J70100S0|JI000001000011
|
||||
TAPE = SYSTEM
|
||||
FILE = MCP/DISK
|
||||
STOP
|
||||
14M90+KI$|#0|00MM)290+JI"000000D4*342L05000V10JI18JI0)0)000S0QKI000W0HKI000,08KI000]=/1V082I08JI0417+E0M16+E[)|/EV+EBV+E}V+E?V*)*/}V000M16+E:)B/1VB),/4V4J1>50JI
|
||||
000000008YSI8D4A008T008E2900SI+A001J ]0008/I8F080?/I0?8]0+/I8F040 +A2(8]01000160
|
||||
000000000U+A2(8T0Y+A2(4A0!+A2(001J B009>0Q/I831J0Y8,8E4A0 /I0)0)0U/I080001000170
|
||||
000000001|0|0000000040001|00|8002B8W104(000009A 00000000000000000000000001000200
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000210
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000220
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000230
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000240
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000250
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000260
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000270
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000300
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000310
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000320
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000330
|
||||
00000000Q00000000000000000000000000000000000000000000000000000000000000001000340
|
||||
000000000000000000000000000000000000000000000000Q <0003WQ +0004DQ 50004M01000350
|
||||
00000000= 200082= 60005-= &0005+= ?0004R= C0004V= 800058= 60005S= F0005Y01000360
|
||||
00000000= :0006>= 70006[= N0006K= H00077= L0007~] B0000B90+A0D1J831J"!S)01000370
|
||||
00000000#/#V8-4A8-+A001J8|4A8K#O0)118M4A8O#O0)11831J]|S)#/#V8 4A400?AJ4J01000400
|
||||
000000009;041?KI000000+64J00@20)8$Z)3/5V@60)9>0R8$08118Q8A1!2E0DAI041+SI01000410
|
||||
00000000000K000000000Q008-+A041J8$Z)3/5V8?4A4J8>?O0)?$0)9>K)CN00ME282I0401000420
|
||||
000000008{+A?;0)|:8I001:ME8:088{+A088]8:001:ME4:0?8{+A?S0)8:001:ME4:1:1+01000430
|
||||
000000002I4J8>?W0)?,0)9>0R8$08118Q8A1!2E18AI005|1I4J049F4J8>?O0)009>0R0401000440
|
||||
000000003 KI0)0)0}"5|00000006Q000LABEL 0FILE000000K000000000Q008$8;008]01000450
|
||||
000000008:001:ME8$04118;048]8:001:ME4:1:0DBI8$8;0 ME0?2I4J08968$08118Q8A01000460
|
||||
00000000|02E0MAI4J8$04119F4J8>>20)009>0R4J9S0M8;04311YH104118+4A040DSI0)01000470
|
||||
000000000}"5|0004J8>}>0)009>0R4J9B8$04118Q8A8B2E0+AI4J8>}B0)009>0R8#1M2I01000500
|
||||
000000004J0?8"0H8%MJ}>D! TO DEFAULT ADDRESS=2*8W1!0~9}8#104J0?964J8U+A1001000510
|
||||
00000000MJ2*D510000?AJ0008AJ>8/I0}"5|000000K00000000BI004J041{4A1{0008M901000520
|
||||
00000000290?JI0)J)#N00ME0 1I1 0UMJ142*35102&JI0)0S1?JI0)0W1&JI0)0,1-JI0)01000530
|
||||
000000000]1!JI0)R|00PY204J8410MJ2*14+$!5!50R10D900000000000000000000000001000540
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001000550
|
||||
0000000000000000000000000000000000000000DISK FAILURE~000TAPE FAILURE~00001000560
|
||||
00000000NO MCP FILE~0000MCP FILE LOADED~NOT IN DIRCTORY~LOADER ON DISK~ 01000570
|
||||
00000000CRA FAILURE~ 00000000000000000MCP 0DISK 0SYSTEM 0000000001000600
|
||||
0000000000000000000000Y>Y#2:Y84AY@M94J92|84A|#Y61:4:|?4A|>K)CN004E0+BI|>01000610
|
||||
00000000N)8N1:08BI4JY#|@9#1:0&AI|#|44A|62(DISK~ 0000/#|44A4J8K|6009>0R8O01000620
|
||||
00000000831J8K831J+A8E4A4J8O|604=)|/1V009>0R0)8K4J8OMJ3*8I8>3$S$ /1N1K0R01000630
|
||||
000000000R3J100U2I|#0411|84A|#0D2E3H1I4J00964J?08KMJ2B8%104(0)0)1;413 0001000640
|
||||
0000000000040+SI4J8> F .9>L)#N08AI|60411|48AY62E0+AI4(0)0001|0000000600001000650
|
||||
000000000000Y6Q)@N004E082I042(Y6M)9N4-2IY63)DN0-BI041&KI4J8> K O9>0RY74J01000660
|
||||
0000000000Y# <9>8E8AM)9N004E3Y2I|#0411|88A0D2E0&AI2+KI0)0003|0000000600001000670
|
||||
000000000418KI0)Y74J00Y# O9>8E8AM)9N004E1|2I|#0411|88A0D2E0DAI4JY63)DN0Q01000700
|
||||
00000000ME0?2I0H0?KIY#9)?N96|62(000020004J08Y6418%001J B009>0RY60?ME0D1I01000710
|
||||
000000004(0)0)0)7|000000004J0M8T|7MJ2*4I146>4$333$1~2N1U1P12130R0R10|62(01000720
|
||||
00000000008<0?2I4J0D964J048T0M8S8)CN4J9.8 +A1JMJ3*2L0510DI|):N0DBI4J8 +A01000730
|
||||
00000000001J # >9>0R0UKI2|#0|00000003000008T0 8E4A008S008E4)4/-V004E3M1I01000740
|
||||
000000008K|44A8 +A6!1J8|4A048&4A8K831J048E4A4J9B|68|4A4(0)004J8$0+8"MJ2*01000750
|
||||
000000001>"$ D2N1I2P0O1P0R/D3N1I?{FP=D2N6{BP7$ D3N1!0 @P/D3N1!0 6P=D3N1!01000760
|
||||
000000000 1P1"0R4:108Q4A4(8T0 8E4J9KY60|2I088"0+8]8E4A0YKI008"0+8]8E4A4J01000770
|
||||
000000009K048"0+8]8E4A4(00008T008E4A4J8 +A001J S009>0R088S|4JA0)0)0)|60+01001000
|
||||
00000000110?KI8B10118+4A044Y2I4J8C8 +AMJ2*8W104J8 +A001J >009>0R0038KI0)01001010
|
||||
000000001|00|8001|00K000(!8F318S4 8:001:ME0?2I4J0+96(!8F318S008]8:001:ME01001020
|
||||
000000000 2I<08F318S048]8:001:4E0-2I8F08118D8A1 2E0-AI5HJI0?8".!8F0!413101001030
|
||||
000000008S8E8A00ME888A0D2I0?8" B8E4A4J0?8]0Y8%MJ2B8W104(000009A DI|):N4+01001040
|
||||
000000002I8 +A001J8Q4A4J8 +A001J ]/29>0R008T+A008:001:ME04BI4J9<4J9K0+8]01001050
|
||||
00000000 S8:001:ME0?2I4J009O0+8] $8:001:ME0?2I4J049ODI|):N00ME0+8] <8:0001001060
|
||||
000000001:ME2:4+1I4J9$4(2|#0|000000030000FILE 0TAPE 0STOP 0-8{0?8]01001070
|
||||
000000008E4A0D8{+E+AMI8E4A4J8B1 8F3108H1118-+AMJ2B8W104J8-+A001J/<009>0R01001100
|
||||
00000000008T208E4A048T008E4A4J8 +A001J/B/B9>0R048S4)8N8D4A0-8F0D41118D4A01001110
|
||||
00000000008T008E4A4J8 +A001J ]009>0R8F08118T0?8]8E4A8F04118T048]8E4A8F8T01001120
|
||||
00000000008]8E4A4J8 +A001J B009>0R8K831J0Y8,8E4A4(0)0)0)1|<108001|0|000001001130
|
||||
00000000000040001|00|800009WKI|62(4A0D8{0000000000000000000000000000000001001140
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001150
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001160
|
||||
00000000000000000000000000000000000000000000000000000000000000000000000001001170
|
||||
00000000=000000#04*)H/}VY6044A4("000000:2*14"$"50R004J0O4J70100S0|JI000001000011
|
||||
TAPE = SYSTEM
|
||||
FILE = MCP/DISK
|
||||
STOP
|
||||
|
||||
@@ -1,97 +1,97 @@
|
||||
Fonts are (c) Bitstream (see below). DejaVu changes are in public domain.
|
||||
Glyphs imported from Arev fonts are (c) Tavmjong Bah (see below)
|
||||
|
||||
Bitstream Vera Fonts Copyright
|
||||
------------------------------
|
||||
|
||||
Copyright (c) 2003 by Bitstream, Inc. All Rights Reserved. Bitstream Vera is
|
||||
a trademark of Bitstream, Inc.
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
of the fonts accompanying this license ("Fonts") and associated
|
||||
documentation files (the "Font Software"), to reproduce and distribute the
|
||||
Font Software, including without limitation the rights to use, copy, merge,
|
||||
publish, distribute, and/or sell copies of the Font Software, and to permit
|
||||
persons to whom the Font Software is furnished to do so, subject to the
|
||||
following conditions:
|
||||
|
||||
The above copyright and trademark notices and this permission notice shall
|
||||
be included in all copies of one or more of the Font Software typefaces.
|
||||
|
||||
The Font Software may be modified, altered, or added to, and in particular
|
||||
the designs of glyphs or characters in the Fonts may be modified and
|
||||
additional glyphs or characters may be added to the Fonts, only if the fonts
|
||||
are renamed to names not containing either the words "Bitstream" or the word
|
||||
"Vera".
|
||||
|
||||
This License becomes null and void to the extent applicable to Fonts or Font
|
||||
Software that has been modified and is distributed under the "Bitstream
|
||||
Vera" names.
|
||||
|
||||
The Font Software may be sold as part of a larger software package but no
|
||||
copy of one or more of the Font Software typefaces may be sold by itself.
|
||||
|
||||
THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
||||
OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF COPYRIGHT, PATENT,
|
||||
TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL BITSTREAM OR THE GNOME
|
||||
FOUNDATION BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, INCLUDING
|
||||
ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL DAMAGES,
|
||||
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
|
||||
THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM OTHER DEALINGS IN THE
|
||||
FONT SOFTWARE.
|
||||
|
||||
Except as contained in this notice, the names of Gnome, the Gnome
|
||||
Foundation, and Bitstream Inc., shall not be used in advertising or
|
||||
otherwise to promote the sale, use or other dealings in this Font Software
|
||||
without prior written authorization from the Gnome Foundation or Bitstream
|
||||
Inc., respectively. For further information, contact: fonts at gnome dot
|
||||
org.
|
||||
|
||||
Arev Fonts Copyright
|
||||
------------------------------
|
||||
|
||||
Copyright (c) 2006 by Tavmjong Bah. All Rights Reserved.
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining
|
||||
a copy of the fonts accompanying this license ("Fonts") and
|
||||
associated documentation files (the "Font Software"), to reproduce
|
||||
and distribute the modifications to the Bitstream Vera Font Software,
|
||||
including without limitation the rights to use, copy, merge, publish,
|
||||
distribute, and/or sell copies of the Font Software, and to permit
|
||||
persons to whom the Font Software is furnished to do so, subject to
|
||||
the following conditions:
|
||||
|
||||
The above copyright and trademark notices and this permission notice
|
||||
shall be included in all copies of one or more of the Font Software
|
||||
typefaces.
|
||||
|
||||
The Font Software may be modified, altered, or added to, and in
|
||||
particular the designs of glyphs or characters in the Fonts may be
|
||||
modified and additional glyphs or characters may be added to the
|
||||
Fonts, only if the fonts are renamed to names not containing either
|
||||
the words "Tavmjong Bah" or the word "Arev".
|
||||
|
||||
This License becomes null and void to the extent applicable to Fonts
|
||||
or Font Software that has been modified and is distributed under the
|
||||
"Tavmjong Bah Arev" names.
|
||||
|
||||
The Font Software may be sold as part of a larger software package but
|
||||
no copy of one or more of the Font Software typefaces may be sold by
|
||||
itself.
|
||||
|
||||
THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF
|
||||
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
|
||||
OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL
|
||||
TAVMJONG BAH BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
||||
INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL
|
||||
DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM
|
||||
OTHER DEALINGS IN THE FONT SOFTWARE.
|
||||
|
||||
Except as contained in this notice, the name of Tavmjong Bah shall not
|
||||
be used in advertising or otherwise to promote the sale, use or other
|
||||
dealings in this Font Software without prior written authorization
|
||||
from Tavmjong Bah. For further information, contact: tavmjong @ free
|
||||
Fonts are (c) Bitstream (see below). DejaVu changes are in public domain.
|
||||
Glyphs imported from Arev fonts are (c) Tavmjong Bah (see below)
|
||||
|
||||
Bitstream Vera Fonts Copyright
|
||||
------------------------------
|
||||
|
||||
Copyright (c) 2003 by Bitstream, Inc. All Rights Reserved. Bitstream Vera is
|
||||
a trademark of Bitstream, Inc.
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining a copy
|
||||
of the fonts accompanying this license ("Fonts") and associated
|
||||
documentation files (the "Font Software"), to reproduce and distribute the
|
||||
Font Software, including without limitation the rights to use, copy, merge,
|
||||
publish, distribute, and/or sell copies of the Font Software, and to permit
|
||||
persons to whom the Font Software is furnished to do so, subject to the
|
||||
following conditions:
|
||||
|
||||
The above copyright and trademark notices and this permission notice shall
|
||||
be included in all copies of one or more of the Font Software typefaces.
|
||||
|
||||
The Font Software may be modified, altered, or added to, and in particular
|
||||
the designs of glyphs or characters in the Fonts may be modified and
|
||||
additional glyphs or characters may be added to the Fonts, only if the fonts
|
||||
are renamed to names not containing either the words "Bitstream" or the word
|
||||
"Vera".
|
||||
|
||||
This License becomes null and void to the extent applicable to Fonts or Font
|
||||
Software that has been modified and is distributed under the "Bitstream
|
||||
Vera" names.
|
||||
|
||||
The Font Software may be sold as part of a larger software package but no
|
||||
copy of one or more of the Font Software typefaces may be sold by itself.
|
||||
|
||||
THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
||||
OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF COPYRIGHT, PATENT,
|
||||
TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL BITSTREAM OR THE GNOME
|
||||
FOUNDATION BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, INCLUDING
|
||||
ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL DAMAGES,
|
||||
WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF
|
||||
THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM OTHER DEALINGS IN THE
|
||||
FONT SOFTWARE.
|
||||
|
||||
Except as contained in this notice, the names of Gnome, the Gnome
|
||||
Foundation, and Bitstream Inc., shall not be used in advertising or
|
||||
otherwise to promote the sale, use or other dealings in this Font Software
|
||||
without prior written authorization from the Gnome Foundation or Bitstream
|
||||
Inc., respectively. For further information, contact: fonts at gnome dot
|
||||
org.
|
||||
|
||||
Arev Fonts Copyright
|
||||
------------------------------
|
||||
|
||||
Copyright (c) 2006 by Tavmjong Bah. All Rights Reserved.
|
||||
|
||||
Permission is hereby granted, free of charge, to any person obtaining
|
||||
a copy of the fonts accompanying this license ("Fonts") and
|
||||
associated documentation files (the "Font Software"), to reproduce
|
||||
and distribute the modifications to the Bitstream Vera Font Software,
|
||||
including without limitation the rights to use, copy, merge, publish,
|
||||
distribute, and/or sell copies of the Font Software, and to permit
|
||||
persons to whom the Font Software is furnished to do so, subject to
|
||||
the following conditions:
|
||||
|
||||
The above copyright and trademark notices and this permission notice
|
||||
shall be included in all copies of one or more of the Font Software
|
||||
typefaces.
|
||||
|
||||
The Font Software may be modified, altered, or added to, and in
|
||||
particular the designs of glyphs or characters in the Fonts may be
|
||||
modified and additional glyphs or characters may be added to the
|
||||
Fonts, only if the fonts are renamed to names not containing either
|
||||
the words "Tavmjong Bah" or the word "Arev".
|
||||
|
||||
This License becomes null and void to the extent applicable to Fonts
|
||||
or Font Software that has been modified and is distributed under the
|
||||
"Tavmjong Bah Arev" names.
|
||||
|
||||
The Font Software may be sold as part of a larger software package but
|
||||
no copy of one or more of the Font Software typefaces may be sold by
|
||||
itself.
|
||||
|
||||
THE FONT SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
||||
EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO ANY WARRANTIES OF
|
||||
MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT
|
||||
OF COPYRIGHT, PATENT, TRADEMARK, OR OTHER RIGHT. IN NO EVENT SHALL
|
||||
TAVMJONG BAH BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
|
||||
INCLUDING ANY GENERAL, SPECIAL, INDIRECT, INCIDENTAL, OR CONSEQUENTIAL
|
||||
DAMAGES, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
||||
FROM, OUT OF THE USE OR INABILITY TO USE THE FONT SOFTWARE OR FROM
|
||||
OTHER DEALINGS IN THE FONT SOFTWARE.
|
||||
|
||||
Except as contained in this notice, the name of Tavmjong Bah shall not
|
||||
be used in advertising or otherwise to promote the sale, use or other
|
||||
dealings in this Font Software without prior written authorization
|
||||
from Tavmjong Bah. For further information, contact: tavmjong @ free
|
||||
. fr.
|
||||
Reference in New Issue
Block a user