Re: What'd I find at the dump yesterday?

[Dan Foster <usenet@evilphb.org>]

In article <UX_7d.16155$54.255148@typhoon.sonic.net>, Don Bruder <dakidd@sonic.net> wrote:
> Powering it up with nothing in the drive shows me "Apple IIgs" at the 
> top of the screen, a 1977-1987 copyright date/all rights... message, and 
> "ROM Version 1.0" before it kicks over to the "check startup device" 
> screen a couple seconds later.
>
> Presumably, this would indicate I'm now the proud owner of a ROM 01 Woz 
> Edition gs? Or is 1.0 the number that a ROM 00 machine would show? 

Basically, a Woz edition GS is if you have a case with the Woz signature
on the front of it, and is usually a ROM 00 board (although it's
possible that owners had the board swap for a ROM 01 while retaining the
Woz-signed case).

ROM 00 is a machine that doesn't say 'ROM' at the machine startup screen.

ROM 01 is a machine that says 'ROM Version 1' at machine startup screen.

ROM 03 is a machine that says 'ROM Version 3' at machine startup screen.

> Any way to make a determination *FOR SURE* without needing anything more 
> than the keyboard to do it? (a PEEK() or three, perhaps?) I've got 

Sure, piece of cake. David Empson posted this 4 days short of 10 years
ago, and should do the job. (Good, because I'm away from the IIGS and
tech refs at the moment)

5000 REM IDENTIFY A IIGS
5010 I = 768
5020 READ J: IF J < 0 THEN GOTO 5040
5030 POKE I,J: I = I + 1: GOTO 5020
5040 CALL 768      
5050 GS = PEEK(0): REM 1 IF IIgs
5060 GV = PEEK(1): REM IIgs ROM VERSION   
5070 RETURN             
5080 DATA 169,0,133,0,133,1,56,32,31,254,176,4,132,1,230,0,96,-1

The way to use this is:

GOSUB 5000
PRINT GS
PRINT GV

GS should be set to '1' if it's really a IIGS
GV will be set to the ROM version (0, 1, or 3)

For the interested, the assembly language listing for that small program is:

0300- A9 00      LDA #$00              
0302- 85 00      STA $00
0304- 85 01      STA $01
0306- 38         SEC
0307- 20 1F FE   JSR $FE1F
030A- B0 04      BCS $0310
030C- 84 01      STY $01
030E- E6 00      INC $00
0311- 60         RTS

-Dan