CPC Scene, "what have you been doing"

[norecess]

Yeah it's pretty hard to polish a demo (as also a tool, a game, .. a documentation .. actually whatever you do !! ).


Sorry for my negative state of mind at the beginning of the thread but once again, it was like 2 people discussing about the best demo to do without having the corresponding knowledge behind that.
Of course, newcomers/newbies are welcomed to participate and talk about what they like/dislike in a demo or what they would like to eventually see.. (or not )

[MacDeath]

Sorry for my negative state of mind at the beginning of the thread but once again, it was like 2 people discussing about the best demo to do without having the corresponding knowledge behind that.

I was just answering to Steve because while I can't code at all... I know some bits of the Hardware and possibilities, so I felt I had to remind him of the reality concerning what he said.

He posted a superbe modern PC3D demo with music... and asked if this can be done on CPC... well, not really, and clearly not as complicated as it is... unless you just do a CPC movie player.

Also only reminded him that Demos with Hardware addons or Cartridges Demo are somewhat... not in the spirit...nor practicle...

[norecess]

@MacDeath BTW - just a personal thought - why don't you start learning ASM programming ? Regarding your activity on multiple forums, looks like you have infinite time for that    we all would be happy to help you in such a way I guess!

[arnoldemu]

@MacDeath BTW - just a personal thought - why don't you start learning ASM programming ? Regarding your activity on multiple forums, looks like you have infinite time for that    we all would be happy to help you in such a way I guess!

@norecess: asm is not the only way as you know
he could code in C use SDCC or Z88dk too and use a library to help him to realise his wildest plus dreams.

[Bryce]

Maybe we should start a Basic Demo competition - Who can create the best demo using only Basic?

Bryce.

[norecess]

Nooooooooooooooooooooooooooooooo. (http://www.nooooooooooooooo.com/)   don't want a debate about which languages to stick on




@MacDeath Well, you get the idea : any programming stuff. Discovering the side of creation, .. learning ASIC for real or whatever..

[norecess]

PS. I pushed something like 5 times that NO button. Still funny =)

[arnoldemu]

@MacDeath Well, you get the idea : any programming stuff. Discovering the side of creation, .. learning ASIC for real or whatever..

indded one more B-ASIC...

Plus sprites from BASIC... go on Macdeath

[MaV]

Maybe we should start a Basic Demo competition - Who can create the best demo using only Basic?

Riiiight! I pick up the gauntlet that you threw so carelessly into our round. But be warned, this is 1337 stuff!

Code Select Expand

10 mode 1:randomize:cls
20 ink 0,0:ink 1,26:ink 2,13:ink 3,14:border 0
30 for j=0 to &ffff
40 for i=&c000 to &ffff
50 a=rnd((i+j) mod 255) * 255
60 poke i,a
70 next i,j

Ha! Given enough speed you have a tv snow effect!

Who dares answer my challenge? 

[Devilmarkus]

Riiiight! I pick up the gauntlet that you threw so carelessly into our round. But be warned, this is 1337 stuff!

Code Select Expand

10 mode 1:randomize:cls
20 ink 0,0:ink 1,26:ink 2,13:ink 3,14:border 0
30 for j=0 to &ffff
40 for i=&c000 to &ffff
50 a=rnd((i+j) mod 255) * 255
60 poke i,a
70 next i,j

Ha! Given enough speed you have a tv snow effect!

Who dares answer my challenge? 

You should test your programs first
This does nothing except asking for random number seed and thats it...

[MaV]

You should test your programs first
This does nothing except asking for random number seed and thats it...

How should I do that at work?

&ffff = 65535
&c000 = 49152

If that's the problem, just insert the decimal numbers instead of the hexadecimal.

It was meant as a joke, anyway.

[arnoldemu]

Code Select Expand


10 INPUT "Enter random seed:",a%
20 if a%>65000 THEN PRINT "Your random seed is a nice big number!":END
30 if a%<100 THEN PRINT "Your random seed is tiny, but cute!":END
40 PRINT "Your random seed is cool!. I need to go find my sunglasses now!":END


[MaV]

&ffff = 65535

Checked it now!

Just change the value in line 30 to 65535 instead of &ffff and leave the other values (&c000 and &ffff in line 40) in hex.


My first BASIC program in 20+ years! 

@arnoldemu: I don't quite get the point...

[Bryce]

I didn't understand the code anyway Can you add REMs next time

Bryce.

[Devilmarkus]

MODE 1:CLS is cool, too This rocks 

[MaV]

MODE 1:CLS is cool, too This rocks 

Nah, that one makes sense ... mode 1 to set the mode, then randomize, then cls to clear the text.

Beat this Markus!

[Devilmarkus]

Sure....

Cannot print as text because control chars used...
But try it
PRINT "<ctrl+d>1<ctrl+x>"

[McKlain]

This one is a classic.

Code Select Expand

10 CALL 10
20 GOTO 10

Works better on a 464

[arnoldemu]

@arnoldemu: I don't quite get the point...

It was a really bad joke program in response to this from Markus:

"You should test your programs first
This does nothing except asking for random number seed and thats it..."

So my program asks for a random seed and tells you how nice the number is 

[MaV]

It was a really bad joke program in response to this from Markus:

"You should test your programs first
This does nothing except asking for random number seed and thats it..."

So my program asks for a random seed and tells you how nice the number is 

Ah ok. The basic program I understood, but I failed to connect your post to Markus'. 

[AMSDOS]

I wrote this thing in Assembly ages ago, for best results it used a reoccuring screen pattern which made it look like it was moving (unfortunately I don't have that on hand!):

Code Select Expand

org &4000
.loop call &bb09
cp &20
jr z,end
ld a,0
ld bc,&0606
call &bc32
call &bd19
ld a,&00
ld bc,&1818
call &bc32
call &bd19
ld a,0
ld bc,&0f0f
call &bc32
call &bd19
jr loop
.end ret

If it were done in BASIC it would look like this:

Code Select Expand


10 WHILE INKEY$<>" "
20 INK 0,6:CALL &BD19
30 INK 0,24:CALL &BD19
40 INK 0,15:CALL &BD19
50 WEND


[redbox]

If it were done in BASIC it would look like this:

That just made my headache a lot worse.


If we're programming in BASIC, are we allowed to use POKE and DATA commands?  If so, I think I could write something 

[AMSDOS]

That just made my headache a lot worse.

I'm sorry I should of put a <WARNING> up, cause that effect gave me a Headache too, particularly the Assembly version cause it runs faster!  ). Definitely recommended if you want a day off work cause you've got a Headache!    I'm having a problem with that routine now cause from what I recall, the image I used with it had Colour Rotation. The idea being you'd have an image of patterns (4 colours for example) and you would switch between the INK numbers while switching the other INK colours to zero. For example:

Code Select Expand

10 MODE 1
20 FOR y=399 TO 379 STEP -1:MOVE 0,y:DRAW 12,y,1:NEXT y
30 FOR y=378 TO 358 STEP -1:MOVE 10,y:DRAW 20,y,2:NEXT y
40 FOR y=357 TO 337 STEP -1:MOVE 20,y:DRAW 30,y,3:NEXT y
50 LOCATE 10,10
60 WHILE INKEY$<>" "
70 INK 0,0:INK 1,26:INK 2,0:INK 3,0:CALL &BD19:CALL &BD19
80 INK 0,0:INK 1,0:INK 2,6:INK 3,0:CALL &BD19:CALL &BD19
90 INK 0,0:INK 1,0:INK 2,0:INK 3,2:CALL &BD19:CALL &BD19
100 INK 0,0:INK 1,0:INK 2,0:INK 3,0:CALL &BD19:CALL &BD19:WEND:CALL &BC02

I've put more Frame Flybacks into this one so it's not blinking so badly, making a whole screen of reoccurring imagery will give you the appearance of it moving. The best example I saw once was in ACU which gave you the appearance of a moving Locomotive from the Rear using Palette Switching! 

If we're programming in BASIC, are we allowed to use POKE and DATA commands?  If so, I think I could write something 

You could, but then it maybe Machine Code your using as your secondary language!    Though BASIC can most certainally use POKE and DATA statements for other purposes! 

[McKlain]

I remember a basic routine from the spanish version of Amstrad User magazine that replicated the infamous amiga bouncing ball, using palette rotation and outs to move the ball around, it also mimicked the bouncing sound. Really impressive, although the ball took a while to be drawn (maybe about a minute).

[demoniak]

I remember a basic routine from the spanish version of Amstrad User magazine that replicated the infamous amiga bouncing ball, using palette rotation and outs to move the ball around, it also mimicked the bouncing sound. Really impressive, although the ball took a while to be drawn (maybe about a minute).

I think it was this one : http://www.cpc-power.com/cpcdemos/index.php?page=detail&num=1754