Log inRegister an accountBrowse CSDbHelp & documentationFacts & StatisticsThe forumsAvailable RSS-feeds on CSDbSupport CSDb Commodore 64 Scene Database
  You are not logged in - nap
Slang Test   [2012]

Slang Test Released by :
Vulture Design [web]

Release Date :
30 June 2012

Type :
C64 1K Intro

Released At :
Silesia Party 6

Achievements :
C64 4K Intro Competition at Silesia Party 6 :  #1

User rating:awaiting 8 votes (7 left)   See votestatistics

Credits :
Code .... Raf of HVSC Crew, Vulture Design

Download :

Look for downloads on external sites:
 Pokefinder.org


Production Info
Submitted by Raf on 1 July 2012
It was written in SLANG language:

* do 0
* = $0801 ;set assemble address

da $080b;link
da 0 ;line number
dfb $9e ;sys
txt '2061'
dfb 00,00,00
* fin

byte sinus(40) = [-1 24 48 70 90 106 117 125 127 125 117 106 90 70 48 24 -1 -25 -49 -71 -91 -107 -118 -126 -128 -126 -118 -107 -91 -71 -49 -25 -1 24 48 70 90 106 117 125]

ubyte x,y,innerp,sinpos
uint yy
int innerprod,tmp
byte dx,dy

ubyte border@$d020
byte screen(25,40)@$d800

disableinterrupts

fillmem($0400,$07f0,160)

sinpos = 0
ubyte SINLEN = 32
tmp = 0
innerprod = 0

repeat
dy = sinus(sinpos)
dx = sinus(sinpos+2) ; (SINLEN/16) = 2

y=13
repeat
y = y -1
x=20
repeat
x = x -1
innerprod = innerprod + dx

innerp=(innerprod>>8) and 15
screen(y,x)=innerp
screen(24-y,x)=innerp
screen(y,39-x)=innerp
screen(24-y,39-x)=innerp

;poke border,innerp
until (x=0)

tmp = tmp - dy
innerprod = tmp
until (y=0)

sinpos = sinpos + 1
sinpos = sinpos and 31 ; SINLEN - 1

forever

Search CSDb
Advanced
Navigate
Prev - Random - Next
Detailed Info
· Summaries
· User Comments
· Production Notes (1)
Fun Stuff
· Goofs
· Hidden Parts
· Trivia
Forum
· Discuss this release
Support CSDb
Help keep CSDb running:



Funding status:




About this site:
CSDb (Commodore 64 Scene Database) is a website which goal is to gather as much information and material about the scene around the commodore 64 computer - the worlds most popular home computer throughout time. Here you can find almost anything which was ever made for the commodore 64, and more is being added every day. As this website is scene related, you can mostly find demos, music and graphics made by the people who made the scene (the sceners), but you can also find a lot of the old classic games here. Try out the search box in the top right corner, or check out the CSDb main page for the latest additions.
Home - Disclaimer
Copyright © No Name 2001-2024
Page generated in: 0.084 sec.