-
<pre>
Intel 4004 microprocessor historical materialsThe work licensed under this license is limited to the following:
4004 schematic
(PDF 6.28MB)4004 mask layout files
* 4004002 (JPG 225KB)
* 4004008 (JPG 64KB)
* 4004013 (JPG 153KB)
* 4004018 (JPG 57KB)
* 4004023 (JPG 168KB)
* 4004029 (JPG 170KB)4004 manual MSC4 (1974)
(PDF 29.4MB)4004 datasheet (1987)
(PDF 3MB)
</pre> -
About this document …</a>
</h1>
<strong>Recursive Functions of Symbolic Expressions and
Their Computation by Machine, Part I</strong><p>
This document was generated using the
<a href="http://www.latex2html.org/"><strong>LaTeX</strong>2<tt>HTML</tt></a> translator Version 2002-2-1 (1.70)</p><p>
Copyright © 1993, 1994, 1995, 1996,
<a href="http://cbl.leeds.ac.uk/nikos/personal.html">Nikos Drakos</a>,
Computer Based Learning Unit, University of Leeds.
<br>
Copyright © 1997, 1998, 1999,
<a href="http://www.maths.mq.edu.au/%7Eross/">Ross Moore</a>,
Mathematics Department, Macquarie University, Sydney.
</p><p>
The command line arguments were: <br>
<strong>latex2html</strong> <tt><a name="tex2html10" href="../recursive.tex">recursive.tex</a></tt>
</p><p>The translation was initiated by John McCarthy on 2006-08-13
<br> </p><hr>
<address>
<i>John McCarthy <br>
2006-08-13</i> -
Established in 1992 in the state of Maine, USA, Control Engineering rapidly gained a reputation for the ability to design, build, reverse engineer, and repair electronic circuits. In 1996 we were commissioned by The Hinckley Company to design and manufacture the Jetstick™ for their famous "Picnic Boat™". Since then, we have designed systems for numerous companies and individual owners, installing our controls on boats from 16 feet to ship class (200 feet). In the summer of 2007, we relocated to our current location in Palm Coast, Florida.<br>Control Engineering manufactures most control circuits in our on-site facility.
-
<b>Matt St. Cyr</b><br>38 Upper Minot Rd.<br>Pownal, ME 04069<br>
Phone: (207) 688-3000<br><a href="mailto:iron@cumberlandironworks.com">iron@cumberlandironworks.com</a>
<br />
<strong>Cumberland Ironworks</strong> creates high quality stainless and aluminum fixtures for the yacht and boat building industry. Cumberland Ironworks has developed several of its own unique products that have gained recent popularity in yachting circles as well as mastering the more traditional aspects of yacht metal crafting.Cumberland Ironworks founder, Matt St.Cyr is a professional mariner and has a lifetime of experience in the boating market. Matt's eye for detail constantly targets customer satisfaction bringing Cumberland Ironworks to the vanguard of marine fabrication.
Archive for May, 2009
links for 2009-05-30
May 31, 2009links for 2009-05-25
May 26, 2009-
<pre>
; ————————-
; Last updated: 13-DEC-2004
; ————————-
;
; Work in progress.
; This file will cross-assemble an original version of the "Improved"
; ZX81 ROM. The file can be modified to change the behaviour of the ROM
; when used in emulators although there is no spare space available.
;
; The documentation is incomplete and if you can find a copy
; of "The Complete Spectrum ROM Disassembly" then many routines
; such as POINTERS and most of the mathematical routines are
; similar and often identical.
;
; I've used the labels from the above book in this file and also
; some from the more elusive Complete ZX81 ROM Disassembly
; by the same publishers, Melbourne House.</pre>
-
<pre>
This tutorial will demonstrate the following development process:Write C programs in AVR Studio.
Compile them into a .hex file using the AVR-GCC compiler (which integrates into AVR Studio).
Simulate the target AVR chip and debug the code within AVR Studio.
Program the actual chip using the AVRISP mkII USB device, which is attached to our target chip with a special 6-pin cable.
Once programmed, the chip runs the program in your circuit.
</pre> -
via How To Create Your Own Community Website For Free http://www.smashingapps.com/2009/05/25/how-to-create-your-own-community-website-for-free.html
-
via http://www.borowitzreport.com/
links for 2009-05-24
May 25, 2009-
<pre>
michael@ubuntu:/host/Documents and Settings/Michael/My Documents/Downloads/android-sdk-linux_x86-1.5_r2/tools$ ./android create avd -t 2 -n android15
Android 1.5 is a basic Android platform.
Do you wish to create a custom hardware profile [no]
Created AVD 'android15' based on Android 1.5michael@ubuntu:/host/Documents and Settings/Michael/My Documents/Downloads/android-sdk-linux_x86-1.5_r2/tools$ ./emulator -avd android15
</pre> -
<p>Snowe has said she supports a national reform based on regulating insurance markets to increase competition while ensuring consumer protections. The primary alternative under consideration — a single-payer, government-run plan similar to Medicare — “is no panacea and should be a last resort,” according to a recent statement from Snowe’s office.</p>
<p>Rosemary Gladstone thinks the nation’s employer-based private insurance coverage system has proven a failure. She thinks a single-payer system is a better idea, and that people should be required to have insurance of one sort or another.</p>
<p>She worries that the Dirigo program, in danger of losing its funding, will collapse.</p>
<p>For now, though, she’s just glad to have coverage.</p>
<p>“I love having health insurance,” she said. “It gives me more motivation to take care of myself, and it provides an extra layer of stability.”</p>
links for 2009-05-22
May 23, 2009-
I thought this was a way for my files to stay there forever.
-
<pre>
Navigator:+ AVR main
+ Frutt home
+ Contact meSubjects
o Assembler
o DisAssembler
o man avrdis
o Gigaweb
o NGW 100
o Opcodes
o Yomal
o VAX 01
o VAX 02Okapi
o Design
o ControlAssembler
o EBNF
o aa001Achatz
o ICSP dongleService
+ Downloads
+ Achatz.nl
</pre> -
<pre>
(define db (quote (
((content)(tags))
((here is an example of content) (example content))
((an entry is a list containing two lists. The first list is the content. The second list is tags) (explanation tags))
)))(define get-content (lambda (entry) (car entry)))
(define get-tags (lambda (entry) (cadr entry)))
(define subset? (lambda (keys lat)
(cond ((null? keys) #t)
((memq (car keys) lat) (subset? (cdr keys) lat))
(#t #f))))(define tag-query (lambda (tags db)
(cond ((null? db) '())
((subset? tags (get-tags (car db))) (cons (car db) (tag-query tags (cdr db))))
(#t (tag-query tags (cdr db))))))
</pre>
links for 2009-05-20
May 21, 2009-
<script src="http://www.gmodules.com/ig/ifr?url=http://www.google.com/ig/modules/time-series-line.xml&up__table_query_url=https%3A%2F%2Fspreadsheets.google.com%2Fccc%3Fkey%3DrJbjbzbm0IOnhwsjd5HHIUQ%26hl&up_title=Sine%20Function&up__table_query_refresh_interval=300&up_scale=fixed&up_values_suffix=&up_annotations_width=25&up_display_zoom_buttons=1&up_display_exact_values=0&up_display_annotations_filter=0&up_display_legend_inNewline=0&synd=open&w=600&h=200&title=__MSG_default_title__&lang=all&country=ALL&border=%23ffffff%7C3px%2C1px+solid+%23999999&output=js"></script>
<ul>
<li><a href="http://tbaoebshgeq225lhq2bam0m0a5mf6u0b.open.gmodules.com/ig/creator?synd=open&url=http%3A%2F%2Fwww.google.com%2Fig%2Fmodules%2Ftime-series-line.xml&lang=en">Add this gadget to your web page</a></li>
<li><a href="https://spreadsheets.google.com/ccc?key=rJbjbzbm0IOnhwsjd5HHIUQ">Here's the data</a></li>
</ul> -
<pre>
(defun eval. (e a)
(cond
((atom e) (assoc. e a))
((atom (car e))
(cond
((eq (car e) 'quote) (cadr e))
((eq (car e) 'atom) (atom (eval. (cadr e) a)))
((eq (car e) 'eq) (eq (eval. (cadr e) a)
(eval. (caddr e) a)))
((eq (car e) 'car) (car (eval. (cadr e) a)))
((eq (car e) 'cdr) (cdr (eval. (cadr e) a)))
((eq (car e) 'cons) (cons (eval. (cadr e) a)
(eval. (caddr e) a)))
((eq (car e) 'cond) (evcon. (cdr e) a))
('t (eval. (cons (assoc. (car e) a)
(cdr e))
a))))
((eq (caar e) 'label)
(eval. (cons (caddar e) (cdr e))
(cons (list (cadar e) (car e)) a)))
((eq (caar e) 'lambda)
(eval. (caddar e)
(append. (pair. (cadar e) (evlis. (cdr e) a))
a)))))
</pre>
<ul>
<li>http://www.paulgraham.com/rootsoflisp.html</li>
</ul> -
<h1>Welcome to Microwind and Dsch information page</h1>
<p class="basic"><a name="top"></a><a href="#mw">About Microwind</a> | <a href="#dsch">About Dsch</a> | <a href="#contact">Contact</a> | <a href="#faq">FAQ</a> | <a href="docs.html">Manuals</a> | <a href="#mwedit">Layout Editor</a> | <a href="#mw2d">2D process view</a> |<a href="#mw3d"> 3D views of the IC</a> | <a href="#mwsimu">Analog simulation</a> | <a href="#mwmos">Tutorial on MOS devices</a> | <a href="#atoms">View of atoms</a> | <a href="#90nm">90 nm process</a> | <a href="#65nm">65 nm process</a> | <a href="#45nm">45 nm process</a> | <a href="book.html">books</a> | <a href="docs.html#an">application notes</a> | <a href="docs.html#ppt">power point slides</a></p>
links for 2009-05-19
May 20, 2009-
<p>…with a laser pointer, 3 AA batteries, a small audio transformer, a solar cell and a amplified speaker.</p>
links for 2009-05-17
May 18, 2009-
Thorough & concise description & examples of a subset of an AVR 8-bit http://tinyurl.com/avr-example<pre>
% /home/cs1721/bin/emu /home/cs1721/public_html/05s2/emu/examples/iota.hex
Emu Reference Implementation v0.?
> program
0000: e000 LDI R16,0
0001: e081 LDI R24,1
0002: 2fa0 MOV R26,R16
0003: e7f0 LDI R31,112
0004: e0e0 LDI R30,0
0005: 9509 ICALL
0006: e011 LDI R17,1
0007: 0f01 ADD R16,R17
0008: e614 LDI R17,100
0009: 1b10 SUB R17,R16
000a: f7b1 BRBC 1,-10
000b: e080 LDI R24,0
000c: e7f0 LDI R31,112
000d: e0e0 LDI R30,0
000e: 9509 ICALL
> registers
PC=0000 SP=1100 SR=[C=0,Z=0,N=0,V=0]
r00-r0f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
r10-r1f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
> step
0000: e000 LDI R16,0
PC=0001 SP=1100 SR=[C=0,Z=0,N=0,V=0]
r00-r0f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
r10-r1f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
> run
0
1
…
8
9
> restart
> run
0
1
…
9
> registers
PC=000f SP=1100 SR=[C=0,Z=1,N=0,V=0]
r00-r0f 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
r10-r1f 0a 00 00 00 00 00 00 00 00 00 09 00 00 00 00 70
</pre> -
<blockquote>
<p>For something even smaller, download <a href="miniPicoLisp.tgz">miniPicoLisp.tgz</a>. It is a <i>minimal</i> version,
without support for databases, UTF-8, bignums, IPC, networking and other
system-dependent functions. A kind of "pure" Pico Lisp (not "pure Lisp"!). It
supports the full Pico Lisp language, but runs faster, and uses even less memory
space. It should also not be restricted to Unix. In addition, it compiles and
runs also on 64-bit systems.</p><p><a href="mailto:jon.kleiser@usit.uio.no">Jon Kleiser</a> wrote an OpenGL
library <a href="http://folk.uio.no/jkleiser/pico/gl.tgz">gl.tgz</a>, and a <a href="http://folk.uio.no/jkleiser/pico/china.tgz">Chinese Checkers</a> program
running on top of it.</p>
</blockquote>
links for 2009-05-16
May 17, 2009-
Writing AVR Programs Write the program in C, then translate to AVR. http://tinyurl.com/avr-assembler<p>
<font face="utopia,times"><font size="6">Example: sum of first 4 integers.<tt><pre>sum = 0;
for (i = 1; i <= 4; ++i)
sum += i*i;
</pre></tt>
can be translated to
<tt><pre>sum = 0;
i = 1;
loop:
if (i == 5) goto end;;
sum = sum + i;
i = i + 1;
goto loop;
end:
</pre></tt>
can be translated to
<tt><pre>; sum in R16
; i in R17
; R18,R19 used for temporary values
LDI R16, 0
LDI R17, 1
LDI R18, 5
SUB R18, R17
BRBS 1, 22
ADD R16, R17
LDI R19, 1
ADD R17, R19
JMP 2
SLEEP
</pre></tt>
</font></font></p> -
<pre>
(define (eval exp env)
(cond ((self-evaluating? exp) exp)
((variable? exp) (lookup-variable-value exp env))
((quoted? exp) (text-of-quotation exp))
((assignment? exp) (eval-assignment exp env))
((definition? exp) (eval-definition exp env))
((if? exp) (eval-if exp env))
((lambda? exp)
(make-procedure (lambda-parameters exp)
(lambda-body exp)
env))
((begin? exp)
(eval-sequence (begin-actions exp) env))
((cond? exp) (eval (cond->if exp) env))
((application? exp)
(apply (eval (operator exp) env)
(list-of-values (operands exp) env)))
(else
(error "Unknown expression type — EVAL" exp))))
</pre>
<ul>
<li>http://mitpress.mit.edu/sicp/full-text/book/book-Z-H-26.html</li>
</ul> -
<xmp>
// Regular Expressionsfunction main()
{
var re = /(w+)(s+)(w+)/;
var out = input.match(re);
for(i = 0;i < out.length;i++) {
print(i + " = [" + out[i] + "]n");
}
}
</xmp>
<blockquote>
<ul>
<li>There is a pseudo-function called "print()" (not part of javaScript) that allows data to be placed in the output window. See examples for its use.</li>
</ul>
</blockquote> -
<blockquote>
We want to write a function that generates accumulators– a
function that takes a number n, and
returns a function that takes another number i and
returns n incremented by i.
</blockquote>
<h3>JavaScript</h3>
<xmp>
function foo(n) {
return function (i) {
return n += i } }
</xmp>
<h3>Scheme</h3>
<xmp>
(define (foo n)
(lambda (i) (set! n (+ n i)) n))
</xmp>
<h2>Try</h2>
<h3><a href="http://www.arachnoid.com/javascript/interactiveJavaScript.html">JavaScript</a></h3>
<xmp>
function main() {
function foo (n) {
return function (i) {
return n += i } } ;
a = foo(5);
print(a(1));
print("n");
print(a(4));
}</xmp>
<h3><a href="http://www.bluishcoder.co.nz/jsscheme/">Scheme</a></h3>
<xmp>
(define (foo n)
(lambda (i) (set! n (+ n i)) n))
(define a (foo 5))
(a 1)
(a 4)
</xmp>
<ul>
<li>via Paul Graham's <a href="http://www.paulgraham.com/icad.html">Revenge of the Nerds</a></li>
</ul>
links for 2009-05-15
May 16, 2009-
<blockquote><i>(I wrote this article to help myself understand exactly
what McCarthy discovered. You don't need to know this stuff
to program in Lisp, but it should be helpful to
anyone who wants to
understand the essence of Lisp– both in the sense of its
origins and its semantic core. The fact that it has such a core
is one of Lisp's distinguishing features, and the reason why,
unlike other languages, Lisp has dialects.)</i><br><br>In 1960, <a href="http://www-formal.stanford.edu/jmc/index.html">John
McCarthy</a> published a remarkable paper in
which he did for programming something like what Euclid did for
geometry. He showed how, given a handful of simple
operators and a notation for functions, you can
build a whole programming language.
He called this language Lisp, for "List Processing,"
because one of his key ideas was to use a simple
data structure called a <i>list</i> for both
code and data.<br><br>
</blockquote>
links for 2009-05-14
May 15, 2009-
Test post via OnlyWire
-
http://mshook.googlepages.com/d4m.htm?/mshook/14 may 2009 a
-
<ul>
<li>This demo is a BASIC program that draws a circle and then a sine funtion.</li>
<li><a href="http://www.vavasour.ca/jeff/ts1000/library.html">Library</a> – There are also game and miscellaneous other programs</li>
<li>http://tinyurl.com/demozx81</li>
<li>http://www.vavasour.ca/jeff/ts1000/index.html</li>
</ul> -
<p>Most comments removed</p>
<pre>
;….
; An Assembly Listing of the Operating System of the ZX81 ROM
#define DEFB .BYTE ; TASM cross-assembler definitions
#define DEFW .WORD
#define EQU .EQU;…
;** Part 1. RESTART ROUTINES AND TABLES **
;…;
; THE 'START'
;
; All Z80 chips start at location zero.
; At start-up the Interrupt Mode is 0, ZX computers use Interrupt Mode 1.
; Interrupts are disabled .;; START
L0000: OUT ($FD),A ; Turn off the NMI generator if this ROM is
; running in ZX81 hardware. This does nothing
; if this ROM is running within an upgraded
; ZX80.
LD BC,$7FFF ; Set BC to the top of possible RAM.
; The higher unpopulated addresses are used for
; video generation.
JP L03CB ; Jump forward to RAM-CHECK.
</pre>
