View ddt4.txt
103B
C
100G
lu2+1) 654300 ~ el I/ 70 ~ h P
hlu2+1) 430000 ~ l I/ 7065 ~ he P
elu2+1) 0 ~ I/ 706543 ~ hel P
llu2+1) 463300 ~ o, I/ 43 ~ l P
llu2+1) 330000 ~ , I/ 4346 ~ lo P
olu2+1) 0 B
P
View ddt3.txt
Simulation stopped, PC: 006023 (SZF1 I)
sim> att ptr hello.sym
sim> cont
T
100/ lac i ptr
lup+1/ cli
lu2/ rcl 77
lu2+1/ tyo
lu2+2/ sza
lu2+3/ jmp lu2
View ddt2.txt
Simulation stopped, PC: 006024 (JMP 6023)
sim> att ptr hello.rim
sim> cont
Y
100/ lac i 112
101/ cli
102/ rcl 77
103/ tyo
104/ sza
105/ jmp 102
View ddt1.txt
C:\Users\jblang\Retro\DEC\PDP1>pdp1
PDP-1 simulator V4.0-0 Beta git commit id: ea898b24
sim> load ddt-loader.rim
sim> run
100/ 0
101/ 0
102/ 0
103/ 0
View hello.txt
C:\Users\jblang\Retro\DEC\PDP1>macro1 -s hello.mac
hello - pass 1
hello - pass 2
C:\Users\jblang\Retro\DEC\PDP1>pdp1
PDP-1 simulator V4.0-0 Beta git commit id: ea898b24
sim> att ptr hello.rim
sim> boot ptr
hello, world
View debooze.c
#include <stdio.h>
#include <stdint.h>
#include <stdlib.h>
#include <sys/stat.h>
#define MEMSIZ 64*1024
#define GETLOC 0x20
uint16_t get, put;
uint8_t cur, mem[MEMSIZ];
View a_mind_is_born.asm
; A Mind is Born by Linus Akesson
; https://linusakesson.net/scene/a-mind-is-born/index.php
; transcribed to 64tass and further commented by J.B. Langston
; important locations after program is copied to zero page
vmptr = $cb ; video matrix
clock = $13 ; global clock lsb - indicates position within bar
clock_msb = $20 ; global clock msb - indicates bar of song
script = $21 ; poke table
View hello.mac
hello
/ above: title line - was punched in human readable letters on paper tape
/ below: location specifier - told assembler what address to assemble to
100/
lup, lac i ptr / load ac from address stored in pointer
cli / clear io register
lu2, rcl 6s / rotate combined ac + io reg 6 bits to the left
/ left 6 bits in ac move into right 6 bits of io reg
tyo / type out character in 6 right-most bits of io reg
sza / skip next instr if accumulator is zero
View monitorc000.tas
;
; **** ZP FIELDS ****
;
f24 = $24
RESHO = $26
FRETOP = $33
CAS1 = $C0
CURCMD = $C1
CURCMDH = $C2
;
View micromon.asm
; kernal locations
CHRGET = $73 ; subroutine: get next basic text character
STATUS = $90 ; kernal i/o status word
STKEY = $91 ; flag: was stop key pressed
DFLTO = $9A ; default output device
MSGFLG = $9D ; flag: kernal message control
SAL = $AC ; pointer: starting address of load/screen scrolling
TAPE1 = $B2 ; pointer: start of tape buffer
FNLEN = $B7 ; length of current filename