Skip to content

Instantly share code, notes, and snippets.

@BigEd
BigEd / EWoz 1.0
Created May 21, 2012 04:33
Extended Woz monitor for 6502 by fsafstrom after Steve Wozniak
EWoz 1.0
by fsafstrom » Mar Wed 14, 2007 12:23 pm
http://www.brielcomputers.com/phpBB3/viewtopic.php?f=9&t=197#p888
via http://jefftranter.blogspot.co.uk/2012/05/woz-mon.html
The EWoz 1.0 is just the good old Woz mon with a few improvements and extensions so to say.
It's using ACIA @ 19200 Baud.
It prints a small welcome message when started.
All key strokes are converted to uppercase.
@BigEd
BigEd / kb9.lbl
Created November 21, 2012 21:40
listing and labels from KB9 BASIC source (see http://www.pagetable.com/?p=46)
al 004225 .QT_BASIC
al 004216 .QT_BYTES_FREE
al 004192 .L4192
al 004157 .L4157
al 004183 .L4183
al 0041C6 .QT_WANT
al 004129 .L4129
al 004127 .L2829
al 004136 .L4136
al 004207 .QT_TERMINAL_WIDTH
%!IOPSC-1993 %%Creator: HAYAKAWA Takashi <h-takasi@is.titech.ac.jp>
/C/neg/d/mul/R/rlineto/E/exp/H{{cvx def}repeat}def/T/dup/g/gt/r/roll/J/ifelse 8
H/A/copy(z&v4QX&93r9AxYQOZomQalxS2w!!O&vMYa43d6r93rMYvx2dca!D&cjSnjSnjjS3o!v&6A
X&55SAxM1CD7AjYxTTd62rmxCnTdSST0g&12wECST!&!J0g&D1!&xM0!J0g!l&544dC2Ac96ra!m&3A
F&&vGoGSnCT0g&wDmlvGoS8wpn6wpS2wTCpS1Sd7ov7Uk7o4Qkdw!&Mvlx1S7oZES3w!J!J!Q&7185d
Z&lx1CS9d9nE4!k&X&MY7!&1!J!x&jdnjdS3odS!N&mmx1C2wEc!G&150Nx4!n&2o!j&43r!U&0777d
]&2AY2A776ddT4oS3oSnMVC00VV0RRR45E42063rNz&v7UX&UOzF!F!J![&44ETCnVn!a&1CDN!Y&0M
V1c&j2AYdjmMdjjd!o&1r!M){( )T 0 4 3 r put T(/)g{T(9)g{cvn}{cvi}J}{($)g{[}{]}J}J
cvx}forall/moveto/p/floor/w/div/S/add 29 H[{[{]setgray fill}for Y}for showpage
@BigEd
BigEd / gist:8323021
Created January 8, 2014 19:34
Klaus Dormann's 6502 testsuite assembled for load and execution at 0800 Will loop if there's a discrepancy. See https://github.com/Klaus2m5/6502_65C02_functional_tests
:20080000D8A2FF9AA9008D003FA246BD2E3B9513CA10F8A252BD753B9D083FCA10F7AD0005
:200820003FC900D0FEA9018D003FA0FE8898AA1003186902497F8DBD08A9004CBC08CACA07
:20084000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACA58
:20086000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACA38
:20088000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACA18
:2008A000CACACACACACACACACACACACACACACACACACACACACACACACACACACACAF03ECACA5E
:2008C000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACAD8
:2008E000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACAB8
:20090000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACACA97
:20092000CACACACACACACACACACACACACACACACACACACACACACACACACACACACACAF0034C96
@BigEd
BigEd / version1.asm
Created July 6, 2014 17:15
firmware for kim-1520 pen plotter (6500/1) via cbm-hackers
; 1520 ROM 01 disassembly
; 2014 Soci/Singular
RAM_SIZE = $40
ROM_START = $800
ROM_SIZE = $800
WIDTH = 480
HEIGHT = 999
@BigEd
BigEd / TomasuloSpeaks
Created June 23, 2015 18:22
Robert Tomasulo transcript
Transcript of the talk at https://www.youtube.com/watch?v=S6weTM1tNzQ
Thank you very much for that kind welcome!
What I intend to do with my time today
is divide it into two pieces
not necessarily equal.
The first piece will be a very cursory
examination of 20, 30 years of computer design
@BigEd
BigEd / sieve-c64
Last active September 30, 2015 07:56
100 MA=100:MP=20:T1=TIME:DIM NP(MA)
110 FOR I=2 TO 100:NP(I)=0:NEXT
120 D=2
130 IF D*D>MA GOTO 170
140 IF NP(D)=1 GOTO 160
150 FOR I=2*D TO MA STEP D:NP(I)=1:NEXT
160 D=D+1:GOTO 130
170 PRINT "CALCULATION TOOK";TIME-T1;" JIFFY TICKS":PRINT
180 PRINT"PRIMES:";:I=2:C=0
0d=d:IFd VDUd:p=POINT(64*POS,1E3-VPOS*32):RETURN ELSEMODE2:GCOL0,-9:CLG
1d=9:REPEATVDU30:REPEATGOSUBFALSE:IFPOS=15VDU28,5,VPOS,14;11,26:IF0ELSEIFp=0PRINT:UNTIL0ELSEUNTILVPOS=25
2b=ABSRND MOD7:k=0:VDU31,9,3
3REPEATg=9-INKEY6MOD3
4FORl=TRUE TO1:o=l ANDSGNo
5IFo=l COLOURb-15:VDUl EORg:k=k+(g=7AND9-6*l)
6IF0ELSEFORf=0TO11:d=f/3OR2EORd:GOSUBFALSE
7IF2^((f+k)MOD12)AND975AND&C2590EC/8^b VDU2080*ABSl;:o=o+p:IF0ELSENEXT,
8VDU20:UNTILo*LOGg:UNTIL0
1
00:00:02,636 --> 00:00:06,226
>> Why is what we did at
Dartmouth 50 years ago so great?
2
00:00:08,746 --> 00:00:13,666
Well, let me think about it a second.
3
@BigEd
BigEd / Better Browsing Bookmarklets.md
Last active February 16, 2016 11:22
Useful bookmarklets for better-looking browsing: remove nuisances and improve readability

Some bookmarklets for improving the appearance and usability of websites.

See also rdd.me aka readability.com who have a bookmarklet which usually reformats just the main text of a page into a readable format, and can also email or send to a Kindle.

blacktext - change text to black to improve contrast allgrey - change background colours to grey, which I find much more relaxing greenlinks - make hyperlinks dark green which shows up better zapit - delete an annoying element like a sidebar or header or footer greythis - make one element's background colour grey, in case allgrey missed it