TIP: Click on subject to list as thread! ANSI
echo: 64_talk
to: Greg Harper
from: Errol Smith
date: 1994-02-08 01:55:24
subject: scene

ES> the leader (?) of Lithium again. The new Epic outfit done
 ES> by TBH is almost finished, so that will still be a Lithium
 GH>Should be interesting.

 Yep, he's explained the outfit to me, and it sounds very
'different'. It allows different fonts on each line, even logos in the
text, so it will be very proffesional.
 
 GH>Hmm, me thinks Marc might hold out for a while.
 
 Yeah, me thinks so too :( But after he sees our first little demo he may
think twice... (:
 
 GH>Can you send me that routine please?  I tried it out again, and it
 GH>still didn't work.  Thanks.
 
hmm - I'm doing this out of my head so I hope it works..

C000 dec $FB
C002 bpl $C005
C004 rts
C005 lda #$07
C007 sta $FB
C009 ldx #$00
C00B lda $0401,X
C00E sta $0400,X
C011 inx
C012 cpx #$27
C014 bne $C00B
C016 inc $FC
C018 ldx $FC
C01A lda $C800,X  - text is at $C800
C01D sta $0427
C020 rts

that was the main routine. The following code is the loop that calls the above.

C040 lda #$00   - setup
C042 sta $FB    - smooth scroll pointer
C044 sta $FC    - text pointer
C046 jsr $1000   <- only do this if you have a music to run.. C049 lda
#$80   - start of loop
C04B cmp $D012
C04E bne $C04B
C050 jsr $C000    (scroll routine)
C053 jsr $1003   <- again only do this if you have a music loaded C056 lda $FB
C058 sta $D016
C05B jmp $C049

After you've typed that in you -should- have a nice smooth scroller moving
across the top line of the screen. If you dont have a music loaded (at
$1000 - $2000 of course) then replace both the JSR $1000 and the JSR $1003
with 3 NOP's. That will make sure the addresses are still correct.
 To run it type G C040 in your monitor. Make sure you have put some text in
$C800-$C900 using screen codes, otherwise you will just get junk moving
across the screen (:
 
 Well I hope it works this time!
 
cya, Strobe/Menace

--- Ezycom V1.05 03fa0008

* Origin: WOW BBS - Commodore Suport, Sydney's West (3:713/888)
SEEN-BY: 50/99 54/54 640/316 711/807 808 809 934 712/623 713/317 700 805 888
@PATH: 713/888 54/54 711/808 809

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.