Apple II manual Norm LDA EXP1 ZERO?

Page 66

F461: 26 F9

 

ROL

M1

 

F463: A5 F8

NORM

LDA

X1

EXP1 ZERO?

F465: D0 EE

 

BNE

NORM1

NO, CONTINUE NORMALIZING.

F467: 60

 

RTS1

RTS

 

RETURN.

F468: 20 A4 F4

FSUB

JSR

FCOMPL

CMPL MANT1,CLEARS CARRY UNLESS 0

F46B: 20 7B F4

SWPALGN

JSR

ALGNSWP

RIGHT SHIFT MANT1 OR SWAP WITH

F46E: A5 F4

FADD

LDA

X2

 

F470: C5 F8

 

CMP

X1

COMPARE EXP1 WITH EXP2.

F472: D0 F7

 

BNE

SWPALGN

IF #,SWAP ADDENDS OR ALIGN MANTS.

F474: 20 25 F4

 

JSR

ADD

ADD ALIGNED MANTISSAS.

F477: 50

EA

ADDEND

BVC

NORM

NO OVERFLOW, NORMALIZE RESULT.

F479: 70

05

 

BVS

RTLOG

OV: SHIFT M1 RIGHT, CARRY INTO SIGN

F47B: 90

C4

ALGNSWP

BCC

SWAP

SWAP IF CARRY CLEAR,

*ELSE SHIFT RIGHT ARITH.

F47D: A5 F9

RTAR

LDA

M1

SIGN OF MANT1 INTO CARRY FOR

F47F: 0A

 

ASL

 

RIGHT ARITH SHIFT.

F480: E6 F8

RTLOG

INC

X1

INCR X1 TO ADJUST FOR RIGHT SHIFT

F482: F0 75

 

BEQ

OVFL

EXP1 OUT OF RANGE.

F484: A2 FA

RTLOG1

LDX

#$FA

INDEX FOR 6:BYTE RIGHT SHIFT.

F486: 76 FF

ROR1

ROR

E+3,X

 

F488: E8

 

INX

 

NEXT BYTE OF SHIFT.

F489: D0 FB

 

BNE

ROR1

LOOP UNTIL DONE.

F48B: 60

 

RTS

 

RETURN.

F48C: 20 32 F4

FMUL

JSR

MD1

ABS VAL OF MANT1, MANT2

F48F: 65 F8

 

ADC

X1

ADD EXP1 TO EXP2 FOR PRODUCT EXP

F491: 20 E2 F4

 

JSR

MD2

CHECK PROD. EXP AND PREP. FOR MUL

F494: 18

 

CLC

 

CLEAR CARRY FOR FIRST BIT.

F495: 20 84 F4

MUL1

JSR

RTLOG1

M1 AND E RIGHT (PROD AND MPLIER)

F498: 90 03

 

BCC

MUL2

IF CARRY CLEAR, SKIP PARTIAL PROD

F49A: 20 25 F4

 

JSR

ADD

ADD MULTIPLICAND TO PRODUCT.

F49D: 88

MUL2

DEY

 

NEXT MUL ITERATION.

F49E: 10 F5

 

BPL

MUL1

LOOP UNTIL DONE.

F4A0: 46 F3

MDEND

LSR

SIGN

TEST SIGN LSB.

F4A2: 90 BF

NORMX

BCC

NORM

IF EVEN,NORMALIZE PROD,ELSE COMP

F4A4: 38

FCOMPL

SEC

 

SET CARRY FOR SUBTRACT.

F4A5: A2 03

 

LDX

#$3

INDEX FOR 3 BYTE SUBTRACT.

F4A7: A9 00

COMPL1

LDA

#$0

CLEAR A.

F4A9: F5 F8

 

SBC

X1,X

SUBTRACT BYTE OF EXP1.

F4AB: 95 F8

 

STA

X1,X

RESTORE IT.

F4AD: CA

 

DEX

 

NEXT MORE SIGNIFICANT BYTE.

F4AE: D0 F7

 

BNE

COMPL1

LOOP UNTIL DONE.

F4B0: F0 C5

 

BEQ

ADDEND

NORMALIZE (OR SHIFT RT IF OVFL).

F4B2: 20 32 F4

FDIV

JSR

MD1

TAKE ABS VAL OF MANT1, MANT2.

F4B5: E5 F8

 

SBC

X1

SUBTRACT EXP1 FROM EXP2.

F4B7: 20 E2 F4

 

JSR

MD2

SAVE AS QUOTIENT EXP.

F4BA: 38

DIV1

SEC

 

SET CARRY FOR SUBTRACT.

F4BB: A2 02

 

LDX

#$2

INDEX FOR 3-BYTE SUBTRACTION.

F4BD: B5 F5

DIV2

LDA

M2,X

 

F4BF: F5 FC

 

SBC

E,X

SUBTRACT A BYTE OF E FROM MANT2.

F4C1: 48

 

PHA

 

SAVE ON STACK.

F4C2: CA

 

DEX

 

NEXT MORE SIGNIFICANT BYTE.

F4C3: 10 F8

 

BPL

DIV2

LOOP UNTIL DONE.

F4C5: A2 FD

 

LDX

#$FD

INDEX FOR 3-BYTE CONDITIONAL MOVE

F4C7: 68

DIV3

PLA

 

PULL BYTE OF DIFFERENCE OFF STACK

F4C8: 90 02

 

BCC

DIV4

IF M2<E THEN DON'T RESTORE M2.

F4CA: 95 F8

 

STA

M2+3,X

 

F4CC: E8

DIV4

INX

 

NEXT LESS SIGNIFICANT BYTE.

F4CD: D0 F8

 

BNE

DIV3

LOOP UNTIL DONE.

F4CF: 26 FB

 

ROL

M1+2

 

F4D1: 26 FA

 

ROL

M1+1

ROLL QUOTIENT LEFT, CARRY INTO LSB

F4D3: 26 F9

 

ROL

M1

 

F4D5: 06 F7

 

ASL

M2+2

 

 

 

 

 

 

Image 66
Contents Apple II Original ROM Information Data Qjjj0005A0 FDA9A920 EDFDA98D 4CEDFDA9 8D4CEDFD Page Page Page JI@ Page 001AA0 F3FFE8E1 E8E8EFEB FFFFE0FF Ffefeeef 001AC0 FFFFE1E1 EFEEE7E8 EEE7F3FB FBEEE1EF001AE0 E8EEE7E8 Efefeeef Eeefeeee Efeeeeee 001DB0 9CDD9CDE DD9EC3DD Cfcacdcb 00479AAD 001FB0 Ffffffff FFFF2071 E14CBFEF 2003EEA9 Page 02E61FBD JJJ DDBAF9F0 0DBDBAF9FA60FFFF 60FFFFFF .JJAEAEA8AD Page Page Return Page LOC1 System Monitor CopyrightLOC0 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 Save BRTBL,XLSR Prepare Carry for BC, BNC Stat LDA R0L JSR STAT2 Push LOW PC Byte VIA R12 BNE Nomove LDA IN,YCMP JSRBNZ Mloop MloopDCR RTNBNZ INRBNC BM1Store Indirect ExampleLoad Indirect Load DOUBLE-BYTE IndirectStore DOUBLE-BYTE Indirect POP IndirectStore POP Indirect ACC SubtractPOP DOUBLE-BYTE Indirect LOOP1 SUB CompareBF A0 SET $A0BF BNC LOOP1LOOP2 Return to 6502 ModeDecrement BNZ LOOP2Branch if Plus Branch if no CarryBranch if Carry SET LOOP3 SUBBreak Branch if Minus ONEBranch if not Minus ONE Return from Sweet 16 SubroutineLDA #ADRH STA IND+1 LDA OPTBL,XSTA IND JMP Page Page Sweet 16 Introduction Page Source Input Enter String a $ , a $ DSPPrint Dbload Sweet REM Ctrl D NVACall -605 Return REM XAM8 in Monitor Poke 776 , a REM Poke DestinationPrint Print Goto SweetMneml MINI-ASSEMBLERBaum MnemrSBC PCL Form ADDR-PC-2 JSR Cout Position FORM7 STX A1H Save Index STA ORGCLC BNENorm LDA EXP1 ZERO? Shift Dividend Left Floating Point Package Floating Point Representation LOWFloating Point Representation Examples StoredHigh LOW EXP Mantissa Number Exponent MantissaFloating Point Subroutine Descriptions Page Page Page Page Calling Sequence STY Init MANT1 LDYSTY HIGH-ORDERPage Page Page Page Page Page Seeeeeee MmmmmmmmFsub 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 CMP YES,RETURN with MANT1 NormalizedRight Shift MANT1 or Swap with MANT2 on Carry AddendNormx BCC Norm If EXEN, Normalize PRODUCT, Else Complement Errata for Rankins Floating Point Routines LDX Load X for High Byte of ExponentLDA STA Fsub LOGFadd FmulPage Mantissa MOD 9/76 Load X for Later M2MHL Contin 1EAD LFA LDA Z,X L2E DCM RTLOG1 MdendNormx Object Code Dump Page Toutfl TapdelHsbdry Lstcom=UBRKVC OutvecUrcvec =UIRQVCTAX ADCORA Stocom STABPL HASHUS+2 Restore Except A,F CPX BEQSTX JMPOutxah PHA Exwrap RTSChksad PHP 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 Dftxfr LDX Newdev LDALDA Toutfl 8BFF 0D Msfirst Bufadh DdrdigLOADT2 STA Mode BNE Lcerr Last Char not Kgettr LDA H8DFF BCC PACKT3 DMPT1A LDA DumptDUMPT1 TXA DUMPT4 LDYOutbth LDX Register Name Patch Outcht STXHS Tape Boundary Uddra Rockwell InternationalUdrah NowlnMovad OldlenLength TMASK1 =MOVADTabuff CurposChecksum TABUF2Write Edge Detect Control not Used Because KB CRB EQSDB TO,EQS CFD2A0A0A0A0SEI Disable Interrupt RS6 JSR Crlow Clear Display E1AC Have Valid Command Nxtadd TYA Space CommFor LOAD1A LDALOADK5 LDX JMP LOADK5 Next E46A EE INC Bkflg SET FLG Outcks LDA OUTCK1 PHADumpta LDX DUMPT1 LDAE5EA TOGTA1 LDA TOGTA2 LDA BCC JD3 MSG Whereo LDY ANY Other CPYSTA Outflg Output PHA Outall PHAROL Priflg Restore FLG Wrax JSR Numa EAA3 CA DEX Memerr JSR STA STIY+2 Dehalf LDA EC5E 4A LSR Only ROW Onekey LDA Debkey LDXED3B GET a Char from Tape Subroutine Edba LSR Cpiy Make Room for MSB Outtty PHA OUTD1A CPX OUTD2A TXAOUTDD1 PHA LDA First Chip Select Prndot LDA LDA #PRTIME/256 Start T2 for 1.7 Msec BIT Imask See if DOT is SET NEW Print ROW Newcol LDACkbuff LDA Bkcksm LDAOUTTA1 PHA OUTTA2 LDXF2E1 3E7E7F3E7F7FCOL0 Zero Leftmost ColumnDB BGYU76HN MNNDX1 LSR RtmodeGetfmt TAX MNNDX2 LSRPRADR2 LDA PLAPRADR4 DEX 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 ROM Table FB46 8A9AAABACADAStartm JSR Rdaddr LDY Tryjmp LDA IMMED1 LDXOPCMP1 LDA Brnchc JMPConvrt LDA FORMD2 LDX Brcomp LDACompbr LDX Backwd LDA Forwrd LDAMATCH1 JMP Curead TXAPATCH4 LDX CURPO2 Dont do Anything if 8D PATC15 JSR Crlf Decode Command Bkcksm AddblkADDS1A BrcompCRA Goerr Namo E8CF NAMO1 RD2 EA5D RD1 AIM 65 Microcomputer Monitor Program Listing E6ACTable of Contents AIM 65 Microcomputer Basic Language Reference ManualIntroduction Memory SIZE? Installing Basic in the AIM ROM Installation ProcedureEntering Basic WIDTH?Basic Cursor Exiting BasicReentering Basic Printer ControlGetting Started with Basic Basic Command SET ASCCHR$ Operating on Programs and Lines Direct and Indirect Commands Direct CommandsIndirect Commands Listing a ProgramDeleting a Program Deleting a LineReplacing a Line List Printing DataPrint ONE Half Equals 1/2 Number FormatNumber Output Format Variables Assigning Variables with AN Input Statement Input RVariable Names PSTG$ Print A, A*2 LET Z=7 Print Z, Z-AReserved Words Relational Tests Program Using RelationsRemarks Input BAN Improved Square Root Program LoopingSquare Root Program Print NsqrnCOUNT-BACKWARD Program Another Square Root ProgramPrint Nsqrn Next N Some Other Looping OperationsMatrix Operations Print What is the NumberPrint I,J Next Next J Sort ProgramPrint Must be Integer Print BAD GUESS, TRY Again RestoreInput N Stopping a ProgramLEN Function Strings$=ROCKWELL R6500 Print A$ Rockwell R6500 Print LENA$,LENMICROCOMPUTERRIGHT$ Function MID$ FunctionCHR$ Function Print B$ Basic for Rockwell R6500Print C$ Basic FOR-ROCKWELL-R6500 VAL and Strs Functions Data AIM 65,DOGInput Input X$ Additional String ConsiderationsName Example PURPOSE/USE DIM Print Print X$Cntl Print Operators Symbol Sample StatementESC Print X/1.3Symbol Sample Statement PURPOSE/USE NegationRelational Operators Not If not Q3 then Operator Argument Result NotAlert CommandsPrint Intruder Alert Statement SYNTAX/FUNCTION Example ClearStatement SYNTAX/FUNCTION Load Statement SYNTAX/FUNCTION FREStatement SYNTAX/FUNCTION List Statement SYNTAX/FUNCTION NEWProgram Statements Statement SYNTAX/FUNCTION Example RUNStatement SYNTAX/FUNCTION Example Save Statement SYNTAX/FUNCTION Example DEFStatement SYNTAX/FUNCTION DIM Statement SYNTAX/FUNCTION ENDStatement SYNTAX/FUNCTION For Statement SYNTAX/FUNCTION IF...GOTO Statement SYNTAX/FUNCTION GosubStatement SYNTAX/FUNCTION Goto Statement SYNTAX/FUNCTION IF...THENStatement SYNTAX/FUNCTION Next If X0 then Print ERROR, X Negative Goto ExampleStatement SYNTAX/FUNCTION LET Statement SYNTAX/FUNCTION ON...GOSUBExample Restore Return Statement SYNTAX/FUNCTION RestoreSymbol SYNTAX/FUNCTION Wait Statement SYNTAX/FUNCTION ReturnStatement SYNTAX/FUNCTION Print Statement SYNTAX/FUNCTION InputStatement SYNTAX/FUNCTION POS Print Value ISAStatement SYNTAX/FUNCTION TAB Statement SYNTAX/FUNCTION ReadStatement SYNTAX/FUNCTION SPC String Functions Statement SYNTAX/FUNCTION ASCStatement SYNTAX/FUNCTION MID$ Statement SYNTAX/FUNCTION LEFT$Statement SYNTAX/FUNCTION LEN Statement SYNTAX/FUNCTION RIGHT$Statement SYNTAX/FUNCTION COS Arithmetic Functions Statement SYNTAX/FUNCTION ABSStatement SYNTAX/FUNCTION ATN Statement SYNTAX/FUNCTION EXPStatement SYNTAX/FUNCTION Example SIN Statement SYNTAX/FUNCTION Example SGNPrint Sgnx Print SinxError Messages ?XX ErrorInverse Hyperbolic Secant TAB, SPC Space HintsPRINTX,Y,Z Storage Allocation Information Speed HintsOLD AIM This is Probably the Most Important Speed HintConverting Basic Programs not Written for AIM 65 Basic OLDNUL Assembly Language SubroutinesAscii Character Codes Decimal SOHInputnumbern Address Content$AE PrintxRecording on Cassette Using the Basic Save Command RUN NUMBER?Storing AIM 65 Basic Programs on Cassette OUT=T F=FNAME T= Cassette Operations Using the AIM 65 EditorOUT=T F= IN=OF9C ATN ImplementationEntered by Alter Memory M 0FACWIDTH? Bytes Free AIM 65 Basic Saving ATN Object Code on Cassette
Related manuals
Manual 19 pages 1.54 Kb

II specifications

The Apple II, launched in April 1977, was one of the first highly successful mass-produced microcomputer products. It marked a significant leap in personal computing, setting standards for future developments in the industry. Created by Steve Wozniak and Steve Jobs, the Apple II differentiated itself with its user-friendly design, appealing aesthetics, and robust capabilities.

One of the standout features of the Apple II was its open architecture, which allowed users to expand and enhance the computer's functionality. This design enabled hundreds of third-party hardware and software developers to contribute to its ecosystem, resulting in an array of peripherals, including printers, modems, and storage devices. The Apple II utilized a MOS Technology 6502 microprocessor running at a clock speed of 1 MHz. Initially equipped with 4 KB of RAM, the machine could be expanded to 48 KB, accommodating more complex applications and programs.

The Apple II was also notable for its colorful graphics. It was one of the first computers to support color display, offering a 6-color palette with a resolution of 280x192 pixels in 16 colors when using its Color Graphics Card. This feature significantly enhanced the visual appeal of games and educational software developed for the platform, making computing more accessible and entertaining for various audiences.

Apple's commitment to user experience was evident in the design of the machine. It featured an integrated keyboard and a plastic case, which was both durable and visually appealing. The self-contained design included drive bays for floppy disk drives, allowing for quicker data access than traditional tape drives. It also supported audio output, enabling sound effects and music, a novelty at the time.

The introduction of the Apple DOS operating system further underscored the machine's capabilities. DOS streamlined file management and made it easier for users to navigate and manage their data. The combination of hardware and software positioned the Apple II as an educational tool and a gaming platform, fostering a vibrant software ecosystem.

The Apple II family continued to evolve, with variations like the Apple II+, IIe, and IIgs being introduced over the years. These iterations brought enhancements in memory, processing power, and graphics capabilities. The legacy of the Apple II endures, not only as a foundational product in personal computing but also as a symbol of innovation that paved the way for future advancements in technology. Its impact is still felt today, as it inspired countless developers and shaped the trajectory of the computer industry.