Detect SCC using basic ? (Development MSX Fora)MSX Resource Center MSXdev 2008 - MSX1 development bonanza!           
            
English Nederlands Español Português Russian         
 Nieuws
   Voorpagina
  Nieuws archief
  Nieuws onderwerpen

 Informatie
   MSX Fora
  Artikelen
  Recensies
  Beursverslagen
  Fotoreportages
  Beurzen en meetings
  Enquêtes
  Links
  Zoek

 Software
   Downloads
  Webshop

 MRC
   Wie we zijn
  Kom bij ons team
  Doneren
  Policies
  Contact met het MRC
  Link naar Ons
  Statistieken

 Zoek
 
  

  

 Login
 

Gebruikersnaam

Wachtwoord




Ben je nog niet lid? Klik hier en word MSX vriend!


 Statistieken
 

Er zijn 148 gasten en 4 MSX vrienden online

Je bent een anonieme bezoeker.
 

MSX Fora


MSX Fora

Development - Detect SCC using basic ?

Schrijver

Detect SCC using basic ?

Argon
msx professional
Berichten: 842
Geplaatst: 07 Januari 2004, 18:05   
Is it possible to detect if there's an SCC chip available using basic ? (Anyone? NYRIKKI ?)

I have an MSX machine and it is supposed to have an INTERNAL SCC chip.
I would like to check this rumor for confirmation.

Thank you.
Kris.

BiFi
msx guru
Berichten: 3142
Geplaatst: 07 Januari 2004, 18:33   
It is possible. You need to increase the base of basic to &HC000 or higher to enable slot switching in page 2. I've made one already:
10 REM Find SCC - SAVE"SCC" ' You need to save it first and with this name!
20 DEFINT I
30 IF PEEK(&HF677)<>&HC0 THEN POKE &HC000,0:POKE &HF676,1:POKE &HF677,&HC0:RUN"SCC"
40 DATA 3A,F8,F7,26,80,CD,24,00,FB,C9
50 FOR A=&HFA00 TO &HFA09:READ A$:POKE A,VAL("&H"+A$):NEXT A:DEF USR=&HFA00:SL=0
60 FOR I=&H80 TO &H8F:DUMMY=USR(I):POKE &H9000,63:J=PEEK(&H9900):POKE &H9900,J XOR 255:IF (PEEK(&H9900)=(J XOR 255)) THEN POKE &H9900,J:NEXT ELSE POKE &H9900,J:SL=I:I=&H8F:NEXT
70 CLS:IF SL=0 THEN PRINT "No SCC found!" ELSE PRINT"SCC found in slot:";(SL AND 3);-((SL AND 12)/4)
80 IF SL=0 THEN END ELSE PRINT:PRINT"Slot in HEX:&H";HEX$(SL):END

BiFi
msx guru
Berichten: 3142
Geplaatst: 07 Januari 2004, 18:54   
I'm NOT gonna edit again... When will the " still be ", < still be <, > still be > and & still be & in a code block? :/
Argon
msx professional
Berichten: 842
Geplaatst: 07 Januari 2004, 18:54   
LOL, wow that's some decent code
Oh yes, I already corrected the amp and quot stuff, no worries.

Thank you, I will try it ASAP.

K.
Argon
msx professional
Berichten: 842
Geplaatst: 08 Juli 2004, 11:47   
Hey, I saved the code as "SCC".
I insert a Snatcher SCC cart in my NMS-8250.

When I run the code it does NOT detect the SCC cart correctly...
It doesn't matter if there is or if there is no SCC cart inserted it always detects SCC at slot 0 - 0.

Any ideas ?
Thanks.
BiFi
msx guru
Berichten: 3142
Geplaatst: 08 Juli 2004, 13:34   
Try changing the &H9900 into &H9800.
Argon
msx professional
Berichten: 842
Geplaatst: 08 Juli 2004, 15:30   
k, will do.
 
 







(c) 1994 - 2008 Stichting MSX Resource Center. MSX is een trademark van MSX Licensing Corporation.