Quick & dirty test for new 63C09

For the discussion of all hardware related topics.
Post Reply
User avatar
Vyper68
Posts: 35
Joined: Thu May 25, 2017 4:51 pm
Location: Hurworth-On-Tees

Quick & dirty test for new 63C09

Post by Vyper68 »

Hi all,
Does anyone have a quick test to check the 63C09 I fitted to my old trusty Dragon 32 today. It works just as It did beforehand and I know the benefits of a 63c09 are under the hood so just wanted to check it’s not a rebadged 6809.
The pessimist complains about the wind; the optimist expects it to change; the realist adjusts the sails.
sixxie
Posts: 1346
Joined: Fri Jul 18, 2008 8:36 am
Location: Hertfordshire
Contact:

Re: Quick & dirty test for new 63C09

Post by sixxie »

I guess a really dumb test would be to trigger an invalid instruction trap. Try POKE359,66 - on a 6809, it'll just mangle output into graphic characters, on a 6309 it'll crash :)

An immediately observable difference I find is that a 6309 takes a while longer to initialise: when you turn the power on, there's a slightly longer delay until you get the OK prompt.
User avatar
Vyper68
Posts: 35
Joined: Thu May 25, 2017 4:51 pm
Location: Hurworth-On-Tees

Re: Quick & dirty test for new 63C09

Post by Vyper68 »

Thanks sixxie I’ll try that out :D
The pessimist complains about the wind; the optimist expects it to change; the realist adjusts the sails.
User avatar
Vyper68
Posts: 35
Joined: Thu May 25, 2017 4:51 pm
Location: Hurworth-On-Tees

Re: Quick & dirty test for new 63C09

Post by Vyper68 »

Well it had a hissy fit and then crashed & froze so it seems a legit 6309 :D
The pessimist complains about the wind; the optimist expects it to change; the realist adjusts the sails.
prime
Posts: 266
Joined: Fri Apr 10, 2009 1:40 am

Re: Quick & dirty test for new 63C09

Post by prime »

For what it's worth this is the code that the diag card uses to identify the 6309.

Code: Select all

;
; Test to see if CPU is a 6809 or 6309.
;	
; 
GetCPUType	
;		lbsr	LCDClrScr	; clear LCD screen
		leax	LCPUIs,pcr	; point to message
		lbsr	DevWriteStr	; write it
		
		ldb	#$ff		; setup b
		FCB	$10		; This will be CLRD on 6309, CLRA on 6809
		clra
		tstb			; is b zero?
		
		beq	Is6309		; yes, 6309
		
		leax	LCPU6809,pcr	; 6809 messsage
		bra	ShowCPU		

Is6309		leax	LCPU6309,pcr	; 6809 messsage
ShowCPU		lbsr	DevWriteStr
		lbsr	VCR
		lbra	WaitPause	; wait a while
Cheers,

Phill.
Post Reply