Log inRegister an accountBrowse CSDbHelp & documentationFacts & StatisticsThe forumsAvailable RSS-feeds on CSDbSupport CSDb Commodore 64 Scene Database
You are not logged in - nap
CSDb User Forums


Forums > C64 Composing > Sid playing automatically from .prg
2007-08-10 17:47
neshmod
Account closed

Registered: Aug 2007
Posts: 2
Sid playing automatically from .prg

Hi,

Im looking for very simple source code or program to make executable .prg file from .sid, similar to psid64. Psid64 is good but I just want to show Song name and Author on screen while song plays, nothing else.

BR, nesh.
2007-08-10 19:02
tlr

Registered: Sep 2003
Posts: 1814
I think there is an example program for this in Kick-Assembler. I could depend on your .sid of course, but most should be easy to get working.
2007-08-10 19:47
scout

Registered: Dec 2002
Posts: 1578
; Quick n dirty SID player by Scout
; Compiles with TASS 1.45
; Doesn't work with multispeed & sample-tunes :P

*=$0800

		.byte $00,$0b,$08	; BASIC line setup; 666 sys2061
		.word 666		
		.byte $9e		
		.text "2061",0,0,0	

*=$080d

		lda #$00
		jsr $1000		; init music

		lda #<yoyo
		ldy #>yoyo
		jsr $ab1e


		sei
		lda #$00
		sta $d012
		
playloop
		lda #$38
		cmp $d012
		bne *-3
		dec $d020
		jsr $1003		; play music
		inc $d020
		jmp playloop

		.enc screen
yoyo
		.byte 147	; <-- clear screen
		.text "i made this ubercool zax in 2007 ad!",0  ; <--- your 1337 text. add a 0 (zero) to end string
*=$1000

.binary "Maniac_Mansion.sid",126	; load sid, strip the SID header (126 bytes)
2007-08-10 19:59
neshmod
Account closed

Registered: Aug 2007
Posts: 2
Thank you both very much! I got it working now \o/
2007-08-10 20:04
Oswald

Registered: Apr 2002
Posts: 5127
Quote:
; Quick n dirty SID player by Scout
; Compiles with TASS 1.45
; Doesn't work with multispeed & sample-tunes :P

*=$0800

		.byte $00,$0b,$08	; BASIC line setup; 666 sys2061
		.word 666		
		.byte $9e		
		.text "2061",0,0,0	

*=$080d

		lda #$00
		jsr $1000		; init music

		lda #<yoyo
		ldy #>yoyo
		jsr $ab1e


		sei
		lda #$00
		sta $d012
		
playloop
		lda #$38
		cmp $d012
		bne *-3
		dec $d020
		jsr $1003		; play music
		inc $d020
		jmp playloop

		.enc screen
yoyo
		.byte 147	; <-- clear screen
		.text "i made this ubercool zax in 2007 ad!",0  ; <--- your 1337 text. add a 0 (zero) to end string
*=$1000

.binary "Maniac_Mansion.sid",126	; load sid, strip the SID header (126 bytes)


.word 666


!!!
RefreshSubscribe to this thread:

You need to be logged in to post in the forum.

Search the forum:
Search   for   in  
All times are CET.
Search CSDb
Advanced
Users Online
Alakran_64
Herrera64
sebalozlepsi
GuyGavin/HF
Airwolf/F4CG
Didi/Laxity
Mason/Unicess
Fred/Channel 4
Visage/Lethargy
Guests online: 442
Top Demos
1 Next Level  (9.7)
2 13:37  (9.7)
3 Codeboys & Endians  (9.7)
4 Mojo  (9.6)
5 Coma Light 13  (9.6)
6 Edge of Disgrace  (9.6)
7 Signal Carnival  (9.6)
8 Wonderland XIV  (9.5)
9 Uncensored  (9.5)
10 Comaland 100%  (9.5)
Top onefile Demos
1 Nine  (9.7)
2 Layers  (9.6)
3 Cubic Dream  (9.6)
4 Party Elk 2  (9.6)
5 Copper Booze  (9.5)
6 Scan and Spin  (9.5)
7 Onscreen 5k  (9.5)
8 Grey  (9.5)
9 Dawnfall V1.1  (9.5)
10 Rainbow Connection  (9.5)
Top Groups
1 Artline Designs  (9.3)
2 Booze Design  (9.3)
3 Performers  (9.3)
4 Oxyron  (9.3)
5 Censor Design  (9.3)
Top Cover Designers
1 Duce  (9.8)
2 Electric  (9.8)
3 Junkie  (9.6)
4 The Elegance  (9.5)
5 Mermaid  (9.3)

Home - Disclaimer
Copyright © No Name 2001-2025
Page generated in: 0.09 sec.