File INTEST.MB

Directory of image this file is from
This file as a plain text file


	       //ASSEMBLER FOR THE INTEL 8080 MICRO-COMPUTER
	       //*******************************************
	       /
	       //C.D.NABAVI   AUGUST 1974  S.E.L.  STUTTGART
	       /
	       /
	       /
XLIST	       /XLIST
A=7	       /A=7
B=0	       /B=0
C=1	       /C=1
D=2	       /D=2
E=3	       /E=3
H=4	       /H=4
L=5	       /L=5
M=6	       /M=6
	       /
	       /
	       /
	       /
	       /
	       /
	       /MACRO RET 1 311 MACEND
	       /MACRO RC 1 330 MACEND
	       /MACRO RNC 1 320 MACEND
	       /MACRO RZ 1 310 MACEND
	       /MACRO RNZ 1 300 MACEND
	       /MACRO RP 1 360 MACEND
	       /MACRO RM 1 370 MACEND
	       /MACRO RPE 1 350 MACEND
	       /MACRO RPO 1 340 MACEND
	       /
	       /
	       /MACRO HLT 1 166 MACEND
	       /MACRO CMA 1 57 MACEND
	       /MACRO STC 1 67 MACEND
	       /MACRO CMC 1 77 MACEND
	       /MACRO DAA 1 47 MACEND
	       /MACRO RLC 1 7 MACEND
	       /MACRO RRC 1 17 MACEND
	       /MACRO RAL 1 27 MACEND
	       /MACRO RAR 1 37 MACEND
	       /MACRO EI 1 373 MACEND
	       /MACRO DI 1 363 MACEND
	       /MACRO NOP 1 0 MACEND
	       /MACRO XCHG 1 353 MACEND
	       /MACRO XTHL 1 343 MACEND
	       /MACRO SPHL 1 371 MACEND
	       /MACRO PCHL 1 351 MACEND
	       /
	       /MACRO"PUSH B"2 305 MACEND
	       /MACRO"PUSH D"2 325 MACEND
	       /MACRO"PUSH H"2 345 MACEND
	       /MACRO"PUSH PSW"2 365 MACEND
	       /
	       /MACRO"POP B"2 301 MACEND
	       /MACRO"POP D"2 321 MACEND
	       /MACRO"POP H"2 341 MACEND
	       /MACRO"POP PSW"2 361 MACEND
	       /
	       /MACRO"INX B"2 3 MACEND
	       /MACRO"INX D"2 23 MACEND
	       /MACRO"INX H"2 43 MACEND
	       /MACRO"INX SP"2 63 MACEND
	       /
	       /MACRO"DAD B"2 11 MACEND
	       /MACRO"DAD D"2 31 MACEND
	       /MACRO"DAD H"2 51 MACEND
	       /MACRO"DAD SP"2 71 MACEND
	       /
	       /MACRO"STAX B"2 2 MACEND
	       /MACRO"STAX D"2 22 MACEND
	       /
	       /MACRO"LDAX B"2 12 MACEND
	       /MACRO"LDAX D"2 32 MACEND
	       /
	       /MACRO"DCX B"2 13 MACEND
	       /MACRO"DCX D"2 33 MACEND
	       /MACRO"DCX H"2 53 MACEND
	       /MACRO"DCX SP"2 73 MACEND
	       /
	       /MACRO"LXI B"3 1;#3&377;@3%400 MACEND
	       /MACRO"LXI D"3 21;#3&377;@3%400 MACEND
	       /MACRO"LXI H"3 41;#3&377;@3%400 MACEND
	       /MACRO"LXI SP"3 61;#3&377;@3%400 MACEND
	       /
	       /
	       /
	       /
	       /
	       /
	       /
	       /MACRO MOV 3 IFNZRO #2!#3&7770 <?> #2^10!100!#3 MACEND
	       /MACRO MVI 3 IFNZRO #2&7770 <?> #2^10!6;#3 MACEND
	       /
	       /MACRO INR 2 IFNZRO #2&7770 <?> #2^10!4 MACEND
	       /MACRO DCR 2 IFNZRO #2&7770 <?> #2^10!5 MACEND
	       /
	       /MACRO ADD 2 IFNZRO #2&7770 <?> #2!200 MACEND
	       /MACRO ADC 2 IFNZRO #2&7770 <?> #2!210 MACEND
	       /MACRO SUB 2 IFNZRO #2&7770 <?> #2!220 MACEND
	       /MACRO SBB 2 IFNZRO #2&7770 <?> #2!230 MACEND
	       /MACRO ANA 2 IFNZRO #2&7770 <?> #2!240 MACEND
	       /MACRO XRA 2 IFNZRO #2&7770 <?> #2!250 MACEND
	       /MACRO ORA 2 IFNZRO #2&7770 <?> #2!260 MACEND
	       /MACRO CMP 2 IFNZRO #2&7770 <?> #2!270 MACEND
	       /
	       /MACRO ADI 2 306;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO ACI 2 316;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO SUI 2 326;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO SBI 2 336;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO ANI 2 346;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO XRI 2 356;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO ORI 2 366;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO CPI 2 376;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO OUT 2 323;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO IN 2 333;IFNZRO #2&7400 <?> #2 MACEND
	       /MACRO RST 2 IFNZRO #2&7707 <?> #2!307 MACEND
	       /
	       /
	       /MACRO JMP 2 303;#2&377;@2%400 MACEND
	       /MACRO JC 2 332;#2&377;@2%400 MACEND
	       /MACRO JNC 2 322;#2&377;@2%400 MACEND
	       /MACRO JZ 2 312;#2&377;@2%400 MACEND
	       /MACRO JNZ 2 302;#2&377;@2%400 MACEND
	       /MACRO JP 2 362;#2&377;@2%400 MACEND
	       /MACRO JM 2 372;#2&377;@2%400 MACEND
	       /MACRO JPE 2 352;#2&377;@2%400 MACEND
	       /MACRO JPO 2 342;#2&377;@2%400 MACEND
	       /
	       /MACRO CALL 2 315;#2&377;@2%400 MACEND
	       /MACRO CC 2 334;#2&377;@2%400 MACEND
	       /MACRO CNC 2 324;#2&377;@2%400 MACEND
	       /MACRO CZ 2 314;#2&377;@2%400 MACEND
	       /MACRO CNZ 2 304;#2&377;@2%400 MACEND
	       /MACRO CP 2 364;#2&377;@2%400 MACEND
	       /MACRO CM 2 374;#2&377;@2%400 MACEND
	       /MACRO CPE 2 354;#2&377;@2%400 MACEND
	       /MACRO CPO 2 344;#2&377;@2%400 MACEND
	       /
	       /MACRO STA 2 62;#2&377;@2%400 MACEND
	       /MACRO LDA 2 72;#2&377;@2%400 MACEND
	       /MACRO SHLD 2 42;#2&377;@2%400 MACEND
	       /MACRO LHLD 2 52;#2&377;@2%400 MACEND
	       /
	       /MACRO DW 2 #2&377;@2%400 MACEND
	       /
	       /
	       /
	       /
XLIST	       /XLIST
	       /

FIELD 1	       /FIELD 1
START=200	       /START=200
	       /
*START	       /*START
	       /
PTEST1,	       /PTEST1,
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       /
	       //TEST 1
	       //******
	       /
	       //MOV,MVI,STA,LDA,STAX,LXI,SHLD,LHLD,XCHG
	       //PUSH,POP,XTHL,SPHL
	       //INR,INX,DCR,DCX,CMA
	       /
	       /
	       /
	       /
ITEST1,	IFNZRO A&7770 <?> A^10!6;373	       /ITEST1,	MVI A 373
	IFNZRO A&7770 <?> A^10!4	       /	INR A
	IFNZRO B!A&7770 <?> B^10!100!A	       /	MOV B A
	IFNZRO B&7770 <?> B^10!4	       /	INR B
	IFNZRO C!B&7770 <?> C^10!100!B	       /	MOV C B
	IFNZRO C&7770 <?> C^10!4	       /	INR C
	IFNZRO D!C&7770 <?> D^10!100!C	       /	MOV D C
	IFNZRO D&7770 <?> D^10!4	       /	INR D
	IFNZRO E!D&7770 <?> E^10!100!D	       /	MOV E D
	IFNZRO E&7770 <?> E^10!4	       /	INR E
	IFNZRO H!E&7770 <?> H^10!100!E	       /	MOV H E
	IFNZRO H&7770 <?> H^10!4	       /	INR H
	IFNZRO L!H&7770 <?> L^10!100!H	       /	MOV L H
	IFNZRO L&7770 <?> L^10!4	       /	INR L
	IFNZRO M!L&7770 <?> M^10!100!L				       /	MOV M L			/2>402
	IFNZRO L&7770 <?> L^10!4	       /	INR L
	       /
	IFNZRO M&7770 <?> M^10!6;123			       /	MVI M 123		/123>403
	72;402&377;004%004	       /	LDA 402
	62;404&377;004%004				       /	STA 404			/2>404
	IFNZRO C&7770 <?> C^10!6;5	       /	MVI C 5
	IFNZRO B&7770 <?> B^10!6;1	       /	MVI B 1
	IFNZRO E&7770 <?> E^10!6;6	       /	MVI E 6
	IFNZRO D&7770 <?> D^10!6;1	       /	MVI D 1
	IFNZRO A&7770 <?> A^10!6;321	       /	MVI A 321
	2				       /	STAX B			/321>405
	IFNZRO A&7770 <?> A^10!5	       /	DCR A
	22				       /	STAX D			/320>406
	1;123456&377;001234%004	       /	LXI B 123456
	21;52525&377;00525%004	       /	LXI D 52525
	41;37373&377;00373%004	       /	LXI H 37373
	42;407&377;004%004			       /	SHLD 407		/37373>(407)(410)
	353	       /	XCHG
	42;411&377;004%004			       /	SHLD 411		/52525>(411)(412)
	IFNZRO H!C&7770 <?> H^10!100!C	       /	MOV H C
	IFNZRO L!B&7770 <?> L^10!100!B	       /	MOV L B
	42;413&377;004%004			       /	SHLD 413		/247>413,056>414
	353	       /	XCHG
	42;415&377;004%004			       /	SHLD 415		/37373>(415)(416)
	52;403&377;004%004	       /	LHLD 403
	42;417&377;004%004			       /	SHLD 417		/2>417,123>420
	IFNZRO B&7770 <?> B^10!6;27	       /	MVI B 27
	IFNZRO C&7770 <?> C^10!6;0	       /	MVI C 0
	IFNZRO H&7770 <?> H^10!5	       /	DCR H
	67	       /	STC
	       /
LOOP1,	IFNZRO C&7770 <?> C^10!4	       /LOOP1,	INR C
	IFNZRO B&7770 <?> B^10!4	       /	INR B
	302;LOOP1&377;LOOP1%400	       /	JNZ LOOP1
	       /
	IFNZRO L&7770 <?> L^10!6;21	       /	MVI L 21
	IFNZRO M!C&7770 <?> M^10!100!C				       /	MOV M C			/-27>421
	61;402&377;004%004	       /	LXI SP 402
	365			       /	PUSH PSW		/320>401,127>400
	77	       /	CMC
	IFNZRO A&7770 <?> A^10!5	       /	DCR A
	365			       /	PUSH PSW		/317>377,206>376
	57	       /	CMA
	       /
	IFNZRO L!A&7770 <?> L^10!100!A	       /	MOV L A
	IFNZRO L&7770 <?> L^10!5	       /	DCR L
	IFNZRO H!L&7770 <?> H^10!100!L	       /	MOV H L
	IFNZRO H&7770 <?> H^10!5	       /	DCR H
	IFNZRO E!H&7770 <?> E^10!100!H	       /	MOV E H
	IFNZRO E&7770 <?> E^10!5	       /	DCR E
	IFNZRO D!E&7770 <?> D^10!100!E	       /	MOV D E
	IFNZRO D&7770 <?> D^10!5	       /	DCR D
	IFNZRO C!D&7770 <?> C^10!100!D	       /	MOV C D
	IFNZRO C&7770 <?> C^10!5	       /	DCR C
	IFNZRO B!C&7770 <?> B^10!100!C	       /	MOV B C
	IFNZRO B&7770 <?> B^10!5	       /	DCR B
	       /
	305				       /	PUSH B			/52>375,53>374
	325				       /	PUSH D			/54>373,55>372
	345				       /	PUSH H			/56>371,57>370
	       /
	361	       /	POP PSW
	301	       /	POP B
	321	       /	POP D
	341	       /	POP H
	       /
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	73	       /	DCX SP
	       /
	0	       /	NOP
	       /
	345				       /	PUSH H			/317>367,206>366
	325				       /	PUSH D			/ 52>365, 53>364
	305				       /	PUSH B			/ 54>363, 55>362
	365			       /	PUSH PSW		/ 56>361,  7>360
	365	       /	PUSH PSW
	71	       /	DAD SP
	343				       /	XTHL			/320>357,164>356
	IFNZRO L&7770 <?> L^10!6;376	       /	MVI L 376
	IFNZRO H&7770 <?> H^10!6;377	       /	MVI H 377
	71	       /	DAD SP
	61;0&377;0%004	       /	LXI SP 0
	371	       /	SPHL
	63	       /	INX SP
	63	       /	INX SP
	345				       /	PUSH H			/0>355,354>354
	IFNZRO H&7770 <?> H^10!6;20	       /	MVI H 20
	IFNZRO A&7770 <?> A^10!6;0	       /	MVI A 0
	       /
LOOP2,	3	       /LOOP2,	INX B
	23	       /	INX D
	53	       /	DCX H
	IFNZRO L&7770 <?> L!270	       /	CMP L
	302;LOOP2&377;LOOP2%400	       /	JNZ LOOP2
	       /
	IFNZRO H&7770 <?> H!270	       /	CMP H
	302;LOOP2&377;LOOP2%400	       /	JNZ LOOP2
	       /
	305				       /	PUSH B			/75>353,31>352
	325				       /	PUSH D			/73>351,27>350
	41;175703&377;001757%004	       /	LXI H 175703
	       /
LOOP3,	13	       /LOOP3,	DCX B
	33	       /	DCX D
	43	       /	INX H
	IFNZRO L&7770 <?> L!270	       /	CMP L
	302;LOOP3&377;LOOP3%400	       /	JNZ LOOP3
	       /
	IFNZRO H&7770 <?> H!270	       /	CMP H
	302;LOOP3&377;LOOP3%400	       /	JNZ LOOP3
	       /
	305				       /	PUSH B			/70>347,334>346
	325				       /	PUSH D			/66>345,332>344
	166	       /	HLT
IEND1,	       /IEND1,

FIELD 1	       /FIELD 1
	       /
*START+IEND1-ITEST1	       /*START+IEND1-ITEST1
	       /
PTEST2,	       /PTEST2,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       //TEST 2
	       //******
	       /
	       //ALL JUMP-INSTRUCTIONS,PCHL
	       /
	       /
ITEST2,	61;601&377;006%004	       /ITEST2,	LXI SP 601
	IFNZRO H&7770 <?> H^10!6;0	       /	MVI H 0
	IFNZRO L&7770 <?> L^10!6;0	       /	MVI L 0
	345	       /	PUSH H
	361	       /	POP PSW
	303;OVER1&377;OVER1%400	       /	JMP OVER1
	       /
	62;601&377;006%004				       /	STA 601			/166>601
OVER1,	62;602&377;006%004				       /OVER1,	STA 602			/0>602
	322;OVER2&377;OVER2%400	       /	JNC OVER2
	       /
	62;603&377;006%004				       /	STA 603			/166>603
OVER2,	62;604&377;006%004				       /OVER2,	STA 604			/0>604
	302;OVER3&377;OVER3%400	       /	JNZ OVER3
	       /
	62;605&377;006%004				       /	STA 605			/166>605
OVER3,	62;606&377;006%004				       /OVER3,	STA 606			/0>606
	362;OVER4&377;OVER4%400	       /	JP OVER4
	       /
	62;607&377;006%004				       /	STA 607			/166>607
OVER4,	62;610&377;006%004				       /OVER4,	STA 610			/0>610
	342;OVER5&377;OVER5%400	       /	JPO OVER5
	       /
	62;611&377;006%004				       /	STA 611			/166>611
OVER5,	62;612&377;006%004				       /OVER5,	STA 612			/0>612
	332;OVER6&377;OVER6%400	       /	JC OVER6
	       /
	62;613&377;006%004				       /	STA 613			/0>613
OVER6,	62;614&377;006%004				       /OVER6,	STA 614			/0>614
	312;OVER7&377;OVER7%400	       /	JZ OVER7
	       /
	62;615&377;006%004				       /	STA 615			/0>615
OVER7,	62;616&377;006%004				       /OVER7,	STA 616			/0>616
	372;OVER10&377;OVER10%400	       /	JM OVER10
	       /
	62;617&377;006%004				       /	STA 617			/0>617
OVER10,	62;620&377;006%004				       /OVER10,	STA 620			/0>620
	352;OVER11&377;OVER11%400	       /	JPE OVER11
	       /
	62;621&377;006%004				       /	STA 621			/0>621
OVER11,	62;622&377;006%004				       /OVER11,	STA 622			/0>622
	57	       /	CMA
	IFNZRO H!A&7770 <?> H^10!100!A	       /	MOV H A
	IFNZRO L!A&7770 <?> L^10!100!A	       /	MOV L A
	345	       /	PUSH H
	361	       /	POP PSW
	303;OVER12&377;OVER12%400	       /	JMP OVER12
	       /
	       /
	       /
	       /
	       /
	       /
	62;623&377;006%004				       /	STA 623			/166>623
OVER12,	62;624&377;006%004				       /OVER12,	STA 624			/377>624
	322;OVER13&377;OVER13%400	       /	JNC OVER13
	       /
	62;625&377;006%004				       /	STA 625			/377>625
OVER13,	62;626&377;006%004				       /OVER13,	STA 626			/377>626
	302;OVER14&377;OVER14%400	       /	JNZ OVER14
	       /
	62;627&377;006%004				       /	STA 627			/377>627
OVER14,	62;630&377;006%004				       /OVER14,	STA 630			/377>630
	362;OVER15&377;OVER15%400	       /	JP OVER15
	       /
	62;631&377;006%004				       /	STA 631			/377>631
OVER15,	62;632&377;006%004				       /OVER15,	STA 632			/377>632
	342;OVER16&377;OVER16%400	       /	JPO OVER16
	       /
	62;633&377;006%004				       /	STA 633			/377>633
OVER16,	62;634&377;006%004				       /OVER16,	STA 634			/377>634
	332;OVER17&377;OVER17%400	       /	JC OVER17
	       /
	62;635&377;006%004				       /	STA 635			/166>635
OVER17,	62;636&377;006%004				       /OVER17,	STA 636			/377>636
	312;OVER20&377;OVER20%400	       /	JZ OVER20
	       /
	62;637&377;006%004				       /	STA 637			/166>637
OVER20,	62;640&377;006%004				       /OVER20,	STA 640			/377>640
	372;OVER21&377;OVER21%400	       /	JM OVER21
	       /
	62;641&377;006%004				       /	STA 641			/166>641
OVER21,	62;642&377;006%004				       /OVER21,	STA 642			/377>642
	352;OVER22&377;OVER22%400	       /	JPE OVER22
	       /
	62;643&377;006%004				       /	STA 643			/166>643
OVER22,	62;644&377;006%004				       /OVER22,	STA 644			/377>644
	41;OVER23&377;OVER23%400	       /	LXI H OVER23
	351	       /	PCHL
	       /
	62;645&377;006%004				       /	STA 645			/166>645
OVER23,	62;646&377;006%004				       /OVER23,	STA 646			/377>646
	166	       /	HLT
	       /
IEND2,	       /IEND2,

FIELD 1	       /FIELD 1
	       /
*START+IEND1+IEND2-ITEST2	       /*START+IEND1+IEND2-ITEST2
PTEST3,	       /PTEST3,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       /
	       //TEST 3
	       //******
	       /
	       //ALL CALL-INSTRUCTIONS
	       /
	       /
	       /
ITEST3,	61;601&377;006%004	       /ITEST3,	LXI SP 601
	IFNZRO H&7770 <?> H^10!6;0	       /	MVI H 0
	IFNZRO L&7770 <?> L^10!6;0	       /	MVI L 0
	345	       /	PUSH H
	361	       /	POP PSW
	315;SUB1&377;SUB1%400	       /	CALL SUB1
	       /
	62;601&377;006%004				       /	STA 601			/166>601
SUB1,	62;602&377;006%004				       /SUB1,	STA 602			/0>602
	324;SUB2&377;SUB2%400	       /	CNC SUB2
	       /
	62;603&377;006%004				       /	STA 603			/166>603
SUB2,	62;604&377;006%004				       /SUB2,	STA 604			/0>604
	304;SUB3&377;SUB3%400	       /	CNZ SUB3
	       /
	62;605&377;006%004				       /	STA 605			/166>605
SUB3,	62;606&377;006%004				       /SUB3,	STA 606			/0>606
	364;SUB4&377;SUB4%400	       /	CP SUB4
	       /
	62;607&377;006%004				       /	STA 607			/166>607
SUB4,	62;610&377;006%004				       /SUB4,	STA 610			/0>610
	344;SUB5&377;SUB5%400	       /	CPO SUB5
	       /
	62;611&377;006%004				       /	STA 611			/166>611
SUB5,	62;612&377;006%004				       /SUB5,	STA 612			/0>612
	334;SUB6&377;SUB6%400	       /	CC SUB6
	       /
	62;613&377;006%004				       /	STA 613			/0>613
SUB6,	62;614&377;006%004				       /SUB6,	STA 614			/0>614
	314;SUB7&377;SUB7%400	       /	CZ SUB7
	       /
	62;615&377;006%004				       /	STA 615			/0>615
SUB7,	62;616&377;006%004				       /SUB7,	STA 616			/0>616
	374;SUB10&377;SUB10%400	       /	CM SUB10
	       /
	62;617&377;006%004				       /	STA 617			/0>617
SUB10,	62;620&377;006%004				       /SUB10,	STA 620			/0>620
	354;SUB11&377;SUB11%400	       /	CPE SUB11
	       /
	62;621&377;006%004				       /	STA 621			/0>621
SUB11,	62;622&377;006%004				       /SUB11,	STA 622			/0>622
	57	       /	CMA
	IFNZRO H!A&7770 <?> H^10!100!A	       /	MOV H A
	IFNZRO L!A&7770 <?> L^10!100!A	       /	MOV L A
	345	       /	PUSH H
	361	       /	POP PSW
	315;SUB12&377;SUB12%400	       /	CALL SUB12
	       /
	       /
	       /
	       /
	       /
	62;623&377;006%004				       /	STA 623			/166>623
SUB12,	62;624&377;006%004				       /SUB12,	STA 624			/377>624
	324;SUB13&377;SUB13%400	       /	CNC SUB13
	       /
	62;625&377;006%004				       /	STA 625			/377>625
SUB13,	62;626&377;006%004				       /SUB13,	STA 626			/377>626
	304;SUB14&377;SUB14%400	       /	CNZ SUB14
	       /
	62;627&377;006%004				       /	STA 627			/377>627
SUB14,	62;630&377;006%004				       /SUB14,	STA 630			/377>630
	364;SUB15&377;SUB15%400	       /	CP SUB15
	       /
	62;631&377;006%004				       /	STA 631			/377>631
SUB15,	62;632&377;006%004				       /SUB15,	STA 632			/377>632
	344;SUB16&377;SUB16%400	       /	CPO SUB16
	       /
	62;633&377;006%004				       /	STA 633			/377>633
SUB16,	62;634&377;006%004				       /SUB16,	STA 634			/377>634
	334;SUB17&377;SUB17%400	       /	CC SUB17
	       /
	62;635&377;006%004				       /	STA 635			/166>635
SUB17,	62;636&377;006%004				       /SUB17,	STA 636			/377>636
	314;SUB20&377;SUB20%400	       /	CZ SUB20
	       /
	62;637&377;006%004				       /	STA 637			/166>637
SUB20,	62;640&377;006%004				       /SUB20,	STA 640			/377>640
	374;SUB21&377;SUB21%400	       /	CM SUB21
	       /
	62;641&377;006%004				       /	STA 641			/166>641
SUB21,	62;642&377;006%004				       /SUB21,	STA 642			/377>642
	354;SUB22&377;SUB22%400	       /	CPE SUB22
	       /
	62;643&377;006%004				       /	STA 643			/166>643
SUB22,	62;644&377;006%004				       /SUB22,	STA 644			/377>644
	166	       /	HLT
IEND3,	       /IEND3,

FIELD 1	       /FIELD 1
	       /
	       /
*START+IEND1+IEND2+IEND3	       /*START+IEND1+IEND2+IEND3
	       /
PTEST4,	       /PTEST4,
	       /
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       /
	       /
	       //TEST 4
	       //******
	       /
	       //ALL RETURN-INSTRUCTIONS
	       /
	       /
	       /
	       /
ITEST4,	61;501&377;005%004	       /ITEST4,	LXI SP 501
	IFNZRO H&7770 <?> H^10!6;0	       /	MVI H 0
	IFNZRO L&7770 <?> L^10!6;0	       /	MVI L 0
	345	       /	PUSH H
	361	       /	POP PSW
	61;600-44&377;600-44%400	       /	LXI SP 600-44
	311	       /	RET
	       /
	62;601&377;006%004				       /	STA 601			/166>601
RTAD1,	62;602&377;006%004				       /RTAD1,	STA 602			/0>602
	320	       /	RNC
	       /
	62;603&377;006%004				       /	STA 603			/166>603
RTAD2,	62;604&377;006%004				       /RTAD2,	STA 604			/0>604
	300	       /	RNZ
	       /
	62;605&377;006%004				       /	STA 605			/166>605
RTAD3,	62;606&377;006%004				       /RTAD3,	STA 606			/0>606
	360	       /	RP
	       /
	62;607&377;006%004				       /	STA 607			/166>607
RTAD4,	62;610&377;006%004				       /RTAD4,	STA 610			/0>610
	340	       /	RPO
	       /
	62;611&377;006%004				       /	STA 611			/166>611
RTAD5,	62;612&377;006%004				       /RTAD5,	STA 612			/0>612
	330	       /	RC
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;613&377;006%004				       /	STA 613			/0>613
RTAD6,	62;614&377;006%004				       /RTAD6,	STA 614			/0>614
	310	       /	RZ
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;615&377;006%004				       /	STA 615			/0>615
RTAD7,	62;616&377;006%004				       /RTAD7,	STA 616			/0>616
	370	       /	RM
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;617&377;006%004				       /	STA 617			/0>617
RTAD10,	62;620&377;006%004				       /RTAD10,	STA 620			/0>620
	350	       /	RPE
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;621&377;006%004				       /	STA 621			/0>621
RTAD11,	62;622&377;006%004				       /RTAD11,	STA 622			/0>622
	57	       /	CMA
	IFNZRO H!A&7770 <?> H^10!100!A	       /	MOV H A
	IFNZRO L!A&7770 <?> L^10!100!A	       /	MOV L A
	345	       /	PUSH H
	361	       /	POP PSW
	311	       /	RET
	       /
	62;623&377;006%004				       /	STA 623			/166>623
RTAD12,	62;624&377;006%004				       /RTAD12,	STA 624			/377>624
	320	       /	RNC
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;625&377;006%004				       /	STA 625			/377>625
RTAD13,	62;626&377;006%004				       /RTAD13,	STA 626			/377>626
	300	       /	RNZ
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;627&377;006%004				       /	STA 627			/377>627
RTAD14,	62;630&377;006%004				       /RTAD14,	STA 630			/377>630
	360	       /	RP
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;631&377;006%004				       /	STA 631			/377>631
RTAD15,	62;632&377;006%004				       /RTAD15,	STA 632			/377>632
	340	       /	RPO
	63	       /	INX SP
	63	       /	INX SP
	       /
	62;633&377;006%004				       /	STA 633			/377>633
RTAD16,	62;634&377;006%004				       /RTAD16,	STA 634			/377>634
	330	       /	RC
	       /
	62;635&377;006%004				       /	STA 635			/166>635
RTAD17,	62;636&377;006%004				       /RTAD17,	STA 636			/377>636
	310	       /	RZ
	       /
	62;637&377;006%004				       /	STA 637			/166>637
RTAD20,	62;640&377;006%004				       /RTAD20,	STA 640			/377>640
	370	       /	RM
	       /
	62;641&377;006%004				       /	STA 641			/166>641
RTAD21,	62;642&377;006%004				       /RTAD21,	STA 642			/377>642
	350	       /	RPE
	       /
	62;643&377;006%004				       /	STA 643			/166>643
RTAD22,	62;644&377;006%004				       /RTAD22,	STA 644			/377>644
	166	       /	HLT
	       /
IEND4,	       /IEND4,
	       /
	       /
FIELD 1	       /FIELD 1
STR41=START+IEND1+IEND2+IEND3+IEND4	       /STR41=START+IEND1+IEND2+IEND3+IEND4
*STR41	       /*STR41
PT41,	       /PT41,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*600-44	       /*600-44
ENPUNCH	       /ENPUNCH
	       /
	       /
IT41,	RTAD1&377;RTAD1%400	       /IT41,	DW RTAD1
	RTAD2&377;RTAD2%400	       /	DW RTAD2
	RTAD3&377;RTAD3%400	       /	DW RTAD3
	RTAD4&377;RTAD4%400	       /	DW RTAD4
	RTAD5&377;RTAD5%400	       /	DW RTAD5
	RTAD6&377;RTAD6%400	       /	DW RTAD6
	RTAD7&377;RTAD7%400	       /	DW RTAD7
	RTAD10&377;RTAD10%400	       /	DW RTAD10
	RTAD11&377;RTAD11%400	       /	DW RTAD11
	RTAD12&377;RTAD12%400	       /	DW RTAD12
	RTAD13&377;RTAD13%400	       /	DW RTAD13
	RTAD14&377;RTAD14%400	       /	DW RTAD14
	RTAD15&377;RTAD15%400	       /	DW RTAD15
	RTAD16&377;RTAD16%400	       /	DW RTAD16
	RTAD17&377;RTAD17%400	       /	DW RTAD17
	RTAD20&377;RTAD20%400	       /	DW RTAD20
	RTAD21&377;RTAD21%400	       /	DW RTAD21
	RTAD22&377;RTAD22%400	       /	DW RTAD22
END41,	       /END41,

FIELD 1	       /FIELD 1
START5=STR41+END41-IT41	       /START5=STR41+END41-IT41
*START5	       /*START5
PTEST5,	       /PTEST5,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       //TEST 5
	       //******
	       /
	       //RST,EI,DI,NOP,HLT
	       /
	       /
ITEST5,	0			       /ITEST5,	NOP		/OR JMP CONT1,CONT2
	0	       /	NOP
	0	       /	NOP
	303;MAIN&377;MAIN%400	       /	JMP MAIN
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 0&7707 <?> 0!307	       /	RST 0
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 10&7707 <?> 10!307	       /	RST 10
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 20&7707 <?> 20!307	       /	RST 20
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 30&7707 <?> 30!307	       /	RST 30
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 40&7707 <?> 40!307	       /	RST 40
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 50&7707 <?> 50!307	       /	RST 50
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	166	       /	HLT
	       /
	IFNZRO 60&7707 <?> 60!307	       /	RST 60
	166	       /	HLT
	       /
MAIN,	61;601&377;006%004	       /MAIN,	LXI SP 601
	41;CONT1&377;CONT1%400	       /	LXI H CONT1
	42;4&377;0%004	       /	SHLD 4
	IFNZRO 70&7707 <?> 70!307	       /	RST 70
	166	       /	HLT
	       /
CONT1,	41;CONT2&377;CONT2%400	       /CONT1,	LXI H CONT2
	42;4&377;0%004	       /	SHLD 4
	373	       /	EI
IWAIT1,	303;IWAIT1&377;IWAIT1%400			       /IWAIT1,	JMP IWAIT1		/NO INTERRUPT EXPECTED AT FIRST
					       /				/EINGABE VON RST 70
CONT2,	41;END&377;END%400	       /CONT2,	LXI H END
	42;4&377;0%004	       /	SHLD 4
	373	       /	EI
	0	       /	NOP
	363	       /	DI
IWAIT2,	303;IWAIT2&377;IWAIT2%400	       /IWAIT2,	JMP IWAIT2
	166	       /	HLT
	       /
END,	166	       /END,	HLT
IEND5,	       /IEND5,

FIELD 1	       /FIELD 1
START6=START5+IEND5-ITEST5	       /START6=START5+IEND5-ITEST5
*START6	       /*START6
PTEST6,	       /PTEST6,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       //TEST 6
	       //******
	       /
	       //ALL ROTATE-INSTRUCTIONS
	       //DAD,STC,CMC
	       /
	       /
ITEST6,	67	       /ITEST6,	STC
	IFNZRO A&7770 <?> A^10!6;253	       /	MVI A 253
	27	       /	RAL
	62;601&377;006%004				       /	STA 601			/127>601
	37	       /	RAR
	62;602&377;006%004				       /	STA 602			/253>602
	77	       /	CMC
	27	       /	RAL
	62;603&377;006%004				       /	STA 603			/126>603
	37	       /	RAR
	62;604&377;006%004				       /	STA 604			/253>604
	61;601&377;006%004	       /	LXI SP 601
	322;ROUND1&377;ROUND1%400	       /	JNC ROUND1
	57	       /	CMA
	       /
ROUND1,	62;605&377;006%004				       /ROUND1,	STA 605			/253>605
	61;601&377;006%004	       /	LXI SP 601
	41;173000&377;001730%004	       /	LXI H 173000
	345	       /	PUSH H
	361	       /	POP PSW
	7	       /	RLC
	365			       /	PUSH PSW		/355>600,3>577
	57	       /	CMA
	7	       /	RLC
	365			       /	PUSH PSW		/ 44>576,2>575
	57	       /	CMA
	17	       /	RRC
	365			       /	PUSH PSW		/355>574,3>573
	57	       /	CMA
	17	       /	RRC
	365			       /	PUSH PSW		/ 11>572,2>571
	41;123456&377;001234%004	       /	LXI H 123456
	51	       /	DAD H
	345				       /	PUSH H			/116>570,134>567
	332;ROUND2&377;ROUND2%400	       /	JC ROUND2
	57	       /	CMA
	       /
ROUND2,	62;606&377;006%004				       /ROUND2,	STA 606			/11>606
	51	       /	DAD H
	345				       /	PUSH H			/234>566,270>565
	322;ROUND3&377;ROUND3%400	       /	JNC ROUND3
	57	       /	CMA
	       /
ROUND3,	62;607&377;006%004				       /ROUND3,	STA 607			/11>641S
	67	       /	STC
	77	       /	CMC
	1;120671&377;001206%004	       /	LXI B 120671
	11	       /	DAD B
	345				       /	PUSH H			/ 76>564,161>563
	332;ROUND4&377;ROUND4%400	       /	JC ROUND4
	57	       /	CMA
	       /
ROUND4,	62;610&377;006%004				       /ROUND4,	STA 610			/ 11>610
	11	       /	DAD B
	345				       /	PUSH H			/340>562, 52>561
	322;ROUND5&377;ROUND5%400	       /	JNC ROUND5
	57	       /	CMA
	       /
ROUND5,	62;611&377;006%004				       /ROUND5,	STA 611			/ 11>611
	21;037415&377;000374%004	       /	LXI D 037415
	41;170512&377;001705%004	       /	LXI H 170512
	31	       /	DAD D
	345				       /	PUSH H			/ 60>560,127>557
	332;ROUND6&377;ROUND6%400	       /	JC ROUND6
	57	       /	CMA
	       /
ROUND6,	62;612&377;006%004				       /ROUND6,	STA 612			/ 11>612
	31	       /	DAD D
	345				       /	PUSH H			/157>556,144>555
	322;ROUND7&377;ROUND7%400	       /	JNC ROUND7
	57	       /	CMA
	       /
ROUND7,	62;613&377;006%004				       /ROUND7,	STA 613			/ 11>613
	166	       /	HLT
IEND6,	       /IEND6,

FIELD 1	       /FIELD 1
START7=START6+IEND6	       /START7=START6+IEND6
*START7	       /*START7
PTEST7,	       /PTEST7,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       /
	       //TEST 7
	       //******
	       /
	       //ALL ARITHMETIC-INSTRUCTIONS
	       //DAA
	       /
	       /
	       /
ITEST7,	61;601&377;006%004	       /ITEST7,	LXI SP 601
	41;53126&377;00531%004	       /	LXI H 53126
	345	       /	PUSH H
	361	       /	POP PSW
	306;IFNZRO 122&7400 <?> 122	       /	ADI 122
	365			       /	PUSH PSW		/250>600, 202>577
	306;IFNZRO 130&7400 <?> 130	       /	ADI 130
	365			       /	PUSH PSW		/  0>576, 127>575
	345	       /	PUSH H
	361	       /	POP PSW
	       /
	IFNZRO C&7770 <?> C^10!6;122	       /	MVI C 122
	IFNZRO E&7770 <?> E^10!6;130	       /	MVI E 130
	IFNZRO C&7770 <?> C!200	       /	ADD C
	365			       /	PUSH PSW		/250>574, 202>573
	IFNZRO E&7770 <?> E!200	       /	ADD E
	365			       /	PUSH PSW		/0>572, 127>571
	345	       /	PUSH H
	361	       /	POP PSW
	316;IFNZRO 122&7400 <?> 122	       /	ACI 122
	365			       /	PUSH PSW		/250>570, 202>567
	316;IFNZRO 130&7400 <?> 130	       /	ACI 130
	365			       /	PUSH PSW		/0>566, 127>565
	345	       /	PUSH H
	361	       /	POP PSW
	       /
	IFNZRO B&7770 <?> B^10!6;122	       /	MVI B 122
	IFNZRO D&7770 <?> D^10!6;130	       /	MVI D 130
	IFNZRO B&7770 <?> B!210	       /	ADC B
	365			       /	PUSH PSW		/250>564, 202>563
	IFNZRO D&7770 <?> D!210	       /	ADC D
	365			       /	PUSH PSW		/0>562, 127>561
	41;13726&377;00137%004	       /	LXI H 13726
	345	       /	PUSH H
	361	       /	POP PSW
	326;IFNZRO 30&7400 <?> 30	       /	SUI 30
	365			       /	PUSH PSW		/377>560, 207>557
	326;IFNZRO 377&7400 <?> 377	       /	SUI 377
	365			       /	PUSH PSW		/0>556, 126>555
	345	       /	PUSH H
	361	       /	POP PSW
	       /
	IFNZRO C&7770 <?> C^10!6;30	       /	MVI C 30
	IFNZRO E&7770 <?> E^10!6;377	       /	MVI E 377
	IFNZRO C&7770 <?> C!220	       /	SUB C
	365			       /	PUSH PSW		/377>554, 207>553
	IFNZRO E&7770 <?> E!220	       /	SUB E
	365			       /	PUSH PSW		/0>552, 126>551
	345	       /	PUSH H
	361	       /	POP PSW
	336;IFNZRO 30&7400 <?> 30	       /	SBI 30
	365			       /	PUSH PSW		/377>550, 207>547
	336;IFNZRO 377&7400 <?> 377	       /	SBI 377
	365			       /	PUSH PSW		/377>546, 106>545
	345	       /	PUSH H
	361	       /	POP PSW
	       /
	IFNZRO B&7770 <?> B^10!6;30	       /	MVI B 30
	IFNZRO D&7770 <?> D^10!6;377	       /	MVI D 377
	IFNZRO B&7770 <?> B!230	       /	SBB B
	365			       /	PUSH PSW		/377>544, 207>543
	IFNZRO D&7770 <?> D!230	       /	SBB D
	365			       /	PUSH PSW		/377>542, 107>541
	       /
	IFNZRO H&7770 <?> H^10!6;127	       /	MVI H 127
	345	       /	PUSH H
	361	       /	POP PSW
	376;IFNZRO 127&7400 <?> 127	       /	CPI 127
	365			       /	PUSH PSW		/127>540, 126>537
	376;IFNZRO 130&7400 <?> 130	       /	CPI 130
	365			       /	PUSH PSW		/127>536, 207>535
	376;IFNZRO 126&7400 <?> 126	       /	CPI 126
	365			       /	PUSH PSW		/127>534, 22>533
	       /
	IFNZRO B&7770 <?> B^10!6;130	       /	MVI B 130
	IFNZRO B&7770 <?> B!270	       /	CMP B
	365			       /	PUSH PSW		/127>532, 207>531
	IFNZRO B&7770 <?> B^10!5	       /	DCR B
	IFNZRO B&7770 <?> B!270	       /	CMP B
	365			       /	PUSH PSW		/127>530, 126>527
	IFNZRO B&7770 <?> B^10!5	       /	DCR B
	IFNZRO B&7770 <?> B!270	       /	CMP B
	365			       /	PUSH PSW		/127>526, 22>525
	       /
	IFNZRO A&7770 <?> A^10!6;31			       /	MVI A 31		/19
	306;IFNZRO 50&7400 <?> 50				       /	ADI 50			/28
	47	       /	DAA
	365			       /	PUSH PSW		/107>524, 6>523
	306;IFNZRO 6&7400 <?> 6				       /	ADI 6			/6
	47	       /	DAA
	365			       /	PUSH PSW		/123>522, 26>521
	306;IFNZRO 101&7400 <?> 101				       /	ADI 101			/41
	47	       /	DAA
	365			       /	PUSH PSW		/224>520, 202>517
	306;IFNZRO 202&7400 <?> 202				       /	ADI 202			/82
	47	       /	DAA
	365			       /	PUSH PSW		/166>516, 3>515
	306;IFNZRO 103&7400 <?> 103				       /	ADI 103			/43
	47	       /	DAA
	365			       /	PUSH PSW		/31>514, 3>513
	166	       /	HLT
IEND7,	       /IEND7,

FIELD 1	       /FIELD 1
START8=START7+IEND7	       /START8=START7+IEND7
*START8	       /*START8
PTEST8,	       /PTEST8,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
	       /
	       //TEST 8
	       //******
	       /
	       //ALL LOGIC-INSTRUCTIONS
	       /
	       /
ITEST8,	61;601&377;006%004	       /ITEST8,	LXI SP 601
	41;125000&377;001250%004	       /	LXI H 125000
	345	       /	PUSH H
	361	       /	POP PSW
	346;IFNZRO 125&7400 <?> 125	       /	ANI 125
	365			       /	PUSH PSW		/0>600,126>577
	IFNZRO A&7770 <?> A^10!6;352	       /	MVI A 352
	346;IFNZRO 56&7400 <?> 56	       /	ANI 56
	365			       /	PUSH PSW		/52>576, 22>575
	IFNZRO A&7770 <?> A^10!6;252	       /	MVI A 252
	IFNZRO B&7770 <?> B^10!6;125	       /	MVI B 125
	IFNZRO D&7770 <?> D^10!6;56	       /	MVI D 56
	IFNZRO B&7770 <?> B!240	       /	ANA B
	365			       /	PUSH PSW		/0>574, 126>573
	IFNZRO A&7770 <?> A^10!6;352	       /	MVI A 352
	IFNZRO D&7770 <?> D!240	       /	ANA D
	365			       /	PUSH PSW		/52>572, 22>571
	345	       /	PUSH H
	361	       /	POP PSW
	366;IFNZRO 125&7400 <?> 125	       /	ORI 125
	365			       /	PUSH PSW		/377>570, 206>567
	IFNZRO A&7770 <?> A^10!6;352	       /	MVI A 352
	366;IFNZRO 156&7400 <?> 156	       /	ORI 156
	365			       /	PUSH PSW		/356>566, 206>565
	345	       /	PUSH H
	361	       /	POP PSW
	IFNZRO B&7770 <?> B^10!6;125	       /	MVI B 125
	IFNZRO E&7770 <?> E^10!6;156	       /	MVI E 156
	IFNZRO B&7770 <?> B!260	       /	ORA B
	365			       /	PUSH PSW		/377>564, 206>563
	IFNZRO A&7770 <?> A^10!6;352	       /	MVI A 352
	IFNZRO E&7770 <?> E!260	       /	ORA E
	365			       /	PUSH PSW		/356>562, 206>561
	345	       /	PUSH H
	361	       /	POP PSW
	356;IFNZRO 252&7400 <?> 252				       /	XRI 252			/CLA
	356;IFNZRO 37&7400 <?> 37	       /	XRI 37
	356;IFNZRO 230&7400 <?> 230	       /	XRI 230
	365			       /	PUSH PSW		/207>560, 206>557
	IFNZRO A&7770 <?> A!250				       /	XRA A			/CLA
	IFNZRO L&7770 <?> L^10!6;37	       /	MVI L 37
	IFNZRO H&7770 <?> H^10!6;116	       /	MVI H 116
	IFNZRO L&7770 <?> L!250	       /	XRA L
	IFNZRO H&7770 <?> H!250	       /	XRA H
	365			       /	PUSH PSW		/121>556, 2>555
	166	       /	HLT
IEND8,	       /IEND8,

FIELD 1	       /FIELD 1
START9=START8+IEND8	       /START9=START8+IEND8
*START9	       /*START9
PTEST9,	       /PTEST9,
	       /
NOPUNCH	       /NOPUNCH
FIELD 0	       /FIELD 0
*0	       /*0
ENPUNCH	       /ENPUNCH
ITEST9,	61;303&377;003%004	       /ITEST9,	LXI SP 303
	41;0&377;0%004	       /	LXI H 0
	345	       /	PUSH H
	361	       /	POP PSW
	333;IFNZRO 0&7400 <?> 0	       /	IN 0
	365			       /	PUSH PSW		/52>302,2>301
	IFNZRO A&7770 <?> A^10!6;252	       /	MVI A 252
	323;IFNZRO 300&7400 <?> 300				       /	OUT 300			/252>300
	166	       /	HLT
IEND9,	       /IEND9,


Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search