Denial

Hare BASIC is very, very fast... Her is the demo you are waiting for! :-) 10 a=usr(20) 20 poke36879,9 30 poke36878,15 35 x=4096:y=4600:a=32:go3 40 x=1:y=1 50 d=1:t=1 60 z=1:a=81 70 go14 100 forw=0to100:next 105 go2 110 a=32:go14 120 x=x+d 130 ifx=0thend=-d:poke36876,230 135 ifx=21thend=-d:poke36876,...

Here are the results of the BASIC BOSS for comparison. I still believe this to be the fastest Commodore V2 BASIC compiler.


(mod: image attachment repaired. Use "Place inline", not an 'empty' image tag pair!)

Thank you for the benchmark. Hare BASIC is extremly fast. It's a shame that Commodore didn't release the Vic 20 with a slightly larger ROM (+4k) and faster BASIC with proper integer calculation routines. We see here how fast BASIC can be, even without a compiler. a very successful project. thanks fo...

Hi aeb,

can you compare your hare BASIC with the Austro , BASIC Boss, and so on?
Here is a link to a german magazine where the author compare a lot of BASIC compilers.

https://archive.org/details/64er_sonder ... 1/mode/1up

Best regards
Sven

I have found some code snippet in the circle routine from http://michaeljmahon.com/FASTCIRC%20description.html stx savex txa ; X = 15 - X eor #$0F tax sec ; y = yc - dy lda yc sbc dy,x sta y He uses the EOR command there in a very clever way. I really like such ingenious tricks.;-)

Hey, I set a pixel with this routine. PlotPixel: ldx xp ldy yp lda highb,x sta Pixel_High lda lowb,x sta Pixel_Low lda (Pixel_Low),y ora xtable,x sta (Pixel_Low),y rts And with this I can read a pixel. ReadPixel: ldx xp ldy yp lda highb,x sta Pixel_High lda lowb,x sta Pixel_Low lda (Pixel_Low),y cmp...

Very nice!

Good morning, here is some nice graphic i like to share with you. - LOXODROME - Loxodrome.png 10 @on:@clr 15 b=-1.2:w=.06:d=.6 20 xa=80:xb=80:yb=ya 21 ya=96-96*sin(b)*cos(d)-96*cos(l)*cos(b)*sin(d) 30 l=l+.1:b=b+w*.1*cos(b) 40 x=80+79*sin(l)*cos(b)/1.25 50 y=96-96*sin(b)*cos(d)-96*cos(l)*cos(b)*sin(...

I have a few questions about the sprites.
Have you programmed your own routine and how many sprites can be displayed at the same time?
I've counted ten so far. Is that right?

BR Sven

PS: The quality of the game is one of the best on the VIC-20, in my opinion.

I think i have it. Thanks for the tipps.

This is the code so far... I used one of the multiply routines from Toby Lobster... only to play around with them. CLRSCR equ $E55F WRTF equ $E742 ; faster print MVFACC equ $dba2 FLPINT equ $D1BF STROUT equ $CB1E PRTFIX equ $DDCD ; values form 0 to 65000 X - low; A - high STACK equ $0100 *=$1201 dB ...

Super game, but very very difficult...

Hello,

I like to print 32bit integer numbers in assembly.
I read the example on codebase64.org but I don't get correct results. Can anyone help here?

https://codebase64.org/doku.php?id=base ... _to_string

Thank you in advance
Sven

Okay, sorry for the double post. I have found my mistake. The value 1/Z ist calculated in a range from 4-255, if we reduce it to the maxium x value of 168 the routine works fine. Additionally, a second table with 1/Z for Y should be created. :mrgreen: PROJTAB ;byte $FF,$F0 ; 255, 240 ;byte $E8,$D5,$...

I still have some questions about the 65C02 processor and its instructions.

STZ $20
is the same like
LDA #$00 / STA $20

PHX = STX $FB
PLX = LDX $FB

This ist not clear to me:
BRA XXXX

CLV
BVC XXXX

or can i write
JMP XXXX

***