Manuals / Apple / Home Audio / Speaker

Apple II manual Nxtadd TYA, Space Comm

Models: II

1 257

Download 257 pages 49.17 Kb

Page 149

0542	E261				;*****	G COMMAND-RESTART PROCESSOR *****
0543	E261	20	37	E8	GO	JSR PSL1		;"/"
0544	E264	20	85	E7		JSR GCNT		;GET COUNT
0545	E267	20	F0	E9		JSR	CRLF
0546	E26A 4C		86	E2		JMP	GOBK1	;RESUME EXECUTION
0547	E26D AD		0E	A4	GOBK	LDA	REGF	;DISPLAY REGISTERS ?
0548	E270	F0	06			BEQ	GOBK0	;NO,BRANCH
0549	E272	20	32	E2		JSR	REG1	;SHOW THE SIX REG
0550	E275	20	24	EA		JSR	CRCK	;<CR>
0551	E278	20	07	E9	GOBK0	JSR	RCHEK	;SEE IF HE WANTS TO INTERRUPT
0552	E27B AD		0F	A4		LDA	DISFLG	;DISASSEMBLE CURRENT INSTR ?
0553	E27E F0		06			BEQ	GOBK1	;NO,BRANCH
0554	E280	20	6C	F4		JSR	DISASM	;DISASM THIS INSTRUCTION
0555	E283	20	13	EA		JSR	CRLOW
0556	E286	AE	24	A4	GOBK1	LDX SAVS		;RESTORE SAVED REGS FOR RTI
0557	E289	9A				TXS
0558	E28A AC		23	A4		LDY	SAVY
0559	E28D AE		22	A4		LDX	SAVX
0560	E290	AD	26	A4		LDA	SAVPC+1
0561	E293	48				PHA		;PUT PC ON STACK
0562	E294	AD	25	A4		LDA	SAVPC
0563	E297	48				PHA
0564	E298	AD	20	A4		LDA SAVPS		;STATUS ALSO
0565	E29B 48					PHA
0566	E29C AD		21	A4		LDA	SAVA
0567	E29F 40					RTI		;AND AWAY WE GO...
0568	E2A0
0569	E2A0				;*** / COMMAND-ALTER MEMORY ***
0570	E2A0 20		3E	E8	CHNGG	JSR	BLANK
0571	E2A3 20		DB E2			JSR	WRITAZ	;WRITE ADDR
0572	E2A6 20		3E	E8	CHNG1	JSR	BLANK
0573	E2A9 20		5D	EA		JSR	RD2	;GET VALUE
0574	E2AC 90		0A			BCC	CH2	;ISN'T SKIP OR DONE
0575	E2AE C9		20			CMP	#' '
0576	E2B0 D0		13			BNE	CH3	;NOT BLANK SO MUST BE DONE
0577	E2B2				;SKIP THIS		LOCATION
0578	E2B2 20		3E	E8		JSR	BLANK
0579	E2B5 4C		C0	E2		JMP	CH4
0580	E2B8				;IS ALTER
0581	E2B8 20		78	EB	CH2	JSR SADDR		;STORE ENTERED VALUE INTO MEMORY
0582	E2BB F0		03			BEQ CH4		;NO ERROR IN STORE
0583	E2BD 4C		33	EB		JMP MEMERR		;MEMORY WRITE ERROR
0584	E2C0 C8				CH4	INY
0585	E2C1 C0		04			CPY	#4
0586	E2C3 D0		E1			BNE	CHNG1	;GO AGAIN
0587	E2C5				;HAVE DONE		LINE OR HAVE <CR>
0588	E2C5 20		CD E2		CH3	JSR	NXTADD	;UPDATE THE ADDRESS
0589	E2C8 A9		0D			LDA	#CR	;CLEAR DISPL
0590	E2CA 4C		E9	FE		JMP PATC10		;ONLY ONE <CR> & BACK TO MONITOR
0591	E2CD
0592	E2CD 98				NXTADD TYA			;ADD Y TO ADDR+1,ADDR
0593	E2CE 18					CLC
0594	E2CF 6D		1C	A4		ADC	ADDR
0595	E2D2 8D		1C	A4		STA	ADDR
0596	E2D5 90		03			BCC	NXTA1
0597	E2D7 EE		1D	A4		INC	ADDR+1
0598	E2DA 60				NXTA1	RTS
0599	E2DB
0600	E2DB				;WRITE	CURRENT VALUE OF ADDR
0601	E2DB				;PART OF /		& SPACE COMM
0602	E2DB A0		00		WRITAZ	LDY	#0
0603	E2DD B9		1D	A4	WRITAD	LDA	ADDR+1,Y

Image 149

Apple II manual Nxtadd TYA, Space Comm

Contents

Apple II Original ROM Information Qjjj Data0005A0 FDA9A920 EDFDA98D 4CEDFDA9 8D4CEDFD Page Page Page JI@ Page 001AE0 E8EEE7E8 Efefeeef Eeefeeee Efeeeeee 001AA0 F3FFE8E1 E8E8EFEB FFFFE0FF Ffefeeef001AC0 FFFFE1E1 EFEEE7E8 EEE7F3FB FBEEE1EF 001DB0 9CDD9CDE DD9EC3DD Cfcacdcb 00479AAD 001FB0 Ffffffff FFFF2071 E14CBFEF 2003EEA9 Page FA60FFFF DDBAF9F0 0DBDBAF902E61FBD JJJ 60FFFFFF .JJAEAEA8AD Page Page Return Page LOC0 System Monitor CopyrightLOC1 BaslMask INY NO, INC Index X-COORD LDY PCH PRMN1 LDA FMT1 DFB Format Above EOR STA A3H FAE2 A2 FB Tabv STA Vtabs to ROW in A-REG STA Bash BCC Clreol Clear to END of Line NXTA4 INC A4L Incr 2-BYTE A4 STA BASL,Y Replace Flashing Screen Fdad A5 3C LT2 LDA A2L,X Copy A2 2 Bytes to Ioprt LDA A2L SET RAM IN/OUT Vectors BCC RD3 Loop Until Done STA A3H,X DFB LIST-1 FFF3 CC BRTBL,X SaveLSR Prepare Carry for BC, BNC Stat LDA R0L JSR STAT2 Push LOW PC Byte VIA R12 CMP LDA IN,YBNE Nomove JSRDCR MloopBNZ Mloop RTNBNC INRBNZ BM1Load Indirect ExampleStore Indirect Load DOUBLE-BYTE IndirectStore POP Indirect Store DOUBLE-BYTE IndirectPOP Indirect POP DOUBLE-BYTE Indirect ACCSubtract BF A0 SET $A0BF CompareLOOP1 SUB BNC LOOP1Decrement Return to 6502 ModeLOOP2 BNZ LOOP2Branch if Carry SET Branch if no CarryBranch if Plus LOOP3 SUBBranch if not Minus ONE Branch if Minus ONEBreak Return from Sweet 16 SubroutineSTA IND JMP LDA #ADRHSTA IND+1 LDA OPTBL,X Page Page Sweet 16 Introduction Page Source Print Dbload Sweet REM Ctrl D DSPInput Enter String a $ , a $ NVAPrint Print Goto Poke 776 , a REM Poke DestinationCall -605 Return REM XAM8 in Monitor SweetBaum MINI-ASSEMBLERMneml MnemrSBC PCL Form ADDR-PC-2 JSR Cout Position FORM7 STX A1H Save Index CLC ORGSTA BNENorm LDA EXP1 ZERO? Shift Dividend Left Floating Point Representation LOW Floating Point PackageHigh LOW EXP Mantissa StoredFloating Point Representation Examples Number Exponent MantissaFloating Point Subroutine Descriptions Page Page Page Page STY STY Init MANT1 LDYCalling Sequence HIGH-ORDERPage Page Page Page Page Page Fsub SeeeeeeeMmmmmmmm ORG SET Base page Adresses STA X2,X Common LOG of MANT/EXP1 Result in MANT/EXP1 Ovflw BRK Overflow 1EBB STA X2,X Load EXP/MANT2 with Z 1EBD DEX 1EBE BPL LF3 Right Shift MANT1 or Swap with MANT2 on Carry YES,RETURN with MANT1 NormalizedCMP AddendNormx BCC Norm If EXEN, Normalize PRODUCT, Else Complement LDA STA Errata for Rankins Floating Point RoutinesLDX Load X for High Byte of Exponent Fadd LOGFsub FmulPage Mantissa MOD 9/76 Load X for Later M2MHL Contin 1EAD LFA LDA Z,X L2E DCM Normx RTLOG1Mdend Object Code Dump Page Hsbdry TapdelToutfl LstcomUrcvec Outvec=UBRKVC =UIRQVCADC TAXStocom STA ORABPL HASHUS+2 Restore Except A,F STX BEQCPX JMPChksad PHP Exwrap RTSOutxah PHA TXANibasc and #$0F Nibble in a to Ascii in a BCS INST1 RTI Ldbyte JSR Inbyte Verify MEM E1PARM JMP STD2 MORED2 LDY JSR Brtt INC Ercnt UP to FF MEM3EX CLC SBC P3L BNE Exitgk Ksconf LDA Txtmov LDA BNE INRT2 Outone Newdev LDA Dftxfr LDXLDA Toutfl 8BFF 0D Msfirst LOADT2 BufadhDdrdig STA Mode BNE Lcerr Last Char not Kgettr LDA H8DFF BCC PACKT3 DUMPT1 TXA DumptDMPT1A LDA DUMPT4 LDYOutbth LDX Outcht STX Register Name PatchHS Tape Boundary Udrah Rockwell InternationalUddra NowlnLength OldlenMovad TMASK1 =MOVADChecksum CurposTabuff TABUF2Write Edge Detect Control not Used Because KB EQS CRBCFD2A0A0A0A0 DB TO,EQSSEI Disable Interrupt RS6 JSR Crlow Clear Display E1AC Have Valid Command Space Comm Nxtadd TYALOAD1A LDA ForLOADK5 LDX JMP LOADK5 Next E46A EE INC Bkflg SET FLG OUTCK1 PHA Outcks LDADUMPT1 LDA Dumpta LDXE5EA TOGTA1 LDA TOGTA2 LDA BCC JD3 MSG Whereo LDY CPY ANY OtherSTA Outflg Outall PHA Output PHAROL Priflg Restore FLG Wrax JSR Numa EAA3 CA DEX Memerr JSR STA STIY+2 Dehalf LDA EC5E 4A LSR Only ROW Debkey LDX Onekey LDAED3B GET a Char from Tape Subroutine Edba LSR Cpiy Make Room for MSB Outtty PHA OUTDD1 PHA OUTD1A CPXOUTD2A TXA LDA First Chip Select Prndot LDA LDA #PRTIME/256 Start T2 for 1.7 Msec BIT Imask See if DOT is SET Newcol LDA NEW Print ROWBkcksm LDA Ckbuff LDAOUTTA2 LDX OUTTA1 PHAZero Leftmost Column F2E1 3E7E7F3E7F7FCOL0DB BGYU76HN Getfmt TAX RtmodeMNNDX1 LSR MNNDX2 LSRPRADR4 DEX PRADR2 LDAPLA BPL PCADJ4 AIM Text Editor LDA END+1 CMP with END AF E7 JMP KEP RUB COMMAND-FIND String JMP CHN1 See if WE RAN Past END of Buffer Limit BEQ REP2 SBC Oldlen GOGO1 RTS Startm JSR ROM TableFB46 8A9AAABACADA Rdaddr LDY IMMED1 LDX Tryjmp LDAConvrt LDA OPCMP1 LDABrnchc JMP Compbr LDX FORMD2 LDXBrcomp LDA Forwrd LDA Backwd LDACuread TXA MATCH1 JMPPATCH4 LDX CURPO2 Dont do Anything if 8D PATC15 JSR Crlf Decode Command ADDS1A AddblkBkcksm BrcompCRA Goerr Namo E8CF NAMO1 RD2 EA5D RD1 E6AC AIM 65 Microcomputer Monitor Program ListingIntroduction Table of ContentsAIM 65 Microcomputer Basic Language Reference Manual Entering Basic Installing Basic in the AIM ROM Installation ProcedureMemory SIZE? WIDTH?Reentering Basic Exiting BasicBasic Cursor Printer ControlCHR$ Getting Started with Basic Basic Command SETASC Indirect Commands Direct and Indirect Commands Direct CommandsOperating on Programs and Lines Listing a ProgramReplacing a Line Deleting a LineDeleting a Program List Printing DataNumber Output Format Print ONE Half Equals 1/2Number Format Variable Names Variables Assigning Variables with AN Input StatementInput R Reserved Words PSTG$Print A, A*2 LET Z=7 Print Z, Z-A Remarks Program Using RelationsRelational Tests Input BSquare Root Program LoopingAN Improved Square Root Program Print NsqrnPrint Nsqrn Next N Another Square Root ProgramCOUNT-BACKWARD Program Some Other Looping OperationsPrint I,J Next Next J Print What is the NumberMatrix Operations Sort ProgramInput N Print BAD GUESS, TRY Again RestorePrint Must be Integer Stopping a Program$=ROCKWELL R6500 Print A$ Rockwell R6500 StringsLEN Function Print LENA$,LENMICROCOMPUTERMID$ Function RIGHT$ FunctionPrint C$ Basic FOR-ROCKWELL-R6500 VAL and Strs Functions Print B$ Basic for Rockwell R6500CHR$ Function Data AIM 65,DOGName Example PURPOSE/USE DIM Additional String ConsiderationsInput Input X$ Print Print X$ESC Operators Symbol Sample StatementCntl Print Print X/1.3Relational Operators Symbol Sample Statement PURPOSE/USENegation Operator Argument Result Not Not If not Q3 thenPrint Intruder Alert CommandsAlert Statement SYNTAX/FUNCTION Example ClearStatement SYNTAX/FUNCTION List Statement SYNTAX/FUNCTION FREStatement SYNTAX/FUNCTION Load Statement SYNTAX/FUNCTION NEWStatement SYNTAX/FUNCTION Example Save Statement SYNTAX/FUNCTION Example RUNProgram Statements Statement SYNTAX/FUNCTION Example DEFStatement SYNTAX/FUNCTION For Statement SYNTAX/FUNCTION DIMStatement SYNTAX/FUNCTION END Statement SYNTAX/FUNCTION Goto Statement SYNTAX/FUNCTION GosubStatement SYNTAX/FUNCTION IF...GOTO Statement SYNTAX/FUNCTION IF...THENStatement SYNTAX/FUNCTION LET If X0 then Print ERROR, X Negative Goto ExampleStatement SYNTAX/FUNCTION Next Statement SYNTAX/FUNCTION ON...GOSUBSymbol SYNTAX/FUNCTION Wait Statement SYNTAX/FUNCTION RestoreExample Restore Return Statement SYNTAX/FUNCTION ReturnStatement SYNTAX/FUNCTION POS Statement SYNTAX/FUNCTION InputStatement SYNTAX/FUNCTION Print Print Value ISAStatement SYNTAX/FUNCTION SPC Statement SYNTAX/FUNCTION ReadStatement SYNTAX/FUNCTION TAB String Functions Statement SYNTAX/FUNCTION ASCStatement SYNTAX/FUNCTION LEN Statement SYNTAX/FUNCTION LEFT$Statement SYNTAX/FUNCTION MID$ Statement SYNTAX/FUNCTION RIGHT$Statement SYNTAX/FUNCTION ATN Arithmetic Functions Statement SYNTAX/FUNCTION ABSStatement SYNTAX/FUNCTION COS Statement SYNTAX/FUNCTION EXPPrint Sgnx Statement SYNTAX/FUNCTION Example SGNStatement SYNTAX/FUNCTION Example SIN Print SinxInverse Hyperbolic Secant Error Messages?XX Error PRINTX,Y,Z TAB, SPCSpace Hints Speed Hints Storage Allocation InformationConverting Basic Programs not Written for AIM 65 Basic This is Probably the Most Important Speed HintOLD AIM OLDAscii Character Codes Decimal Assembly Language SubroutinesNUL SOH$AE Address ContentInputnumbern PrintxStoring AIM 65 Basic Programs on Cassette Recording on Cassette Using the Basic Save CommandRUN NUMBER? OUT=T F= Cassette Operations Using the AIM 65 EditorOUT=T F=FNAME T= IN=Entered by Alter Memory M ATN ImplementationOF9C 0FACSaving ATN Object Code on Cassette WIDTH? Bytes Free AIM 65 Basic