20 Second Fish Tank Demo

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|715\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
SoCoder -> Showcase Home -> Graphic Demos

mike_g	Created : 12 March 2007 Edited : 15 June 2008 Language : Blitz 20 Second Fish Tank Demo https://grundez.googlepages.com/Demos.html
Screenshots
A short old school demo I made. Can anyone let us know if you get a MAV when you run this? It works fine for me but someone else said that they had a problem with it. Cheers

Comments
Monday, 12 March 2007, 18:40
magicman	thats pretty cool! and no i didnt get a MAV.
Monday, 12 March 2007, 18:48
mike_g	Thanks for testing it magicman The problem might have to do with using GraphicsWidth(), ImageHeight(), or something like that to get the image buffer bounds. Cant be arsed to go through everything just at the moment tho.
Monday, 12 March 2007, 18:50
HoboBen	Awesome! I loved the way the bubbles light things up. Did you do those graphics yourself? No MAV here either. Cheers.
Monday, 12 March 2007, 18:53
mike_g	Thanks hobo, glad you like it I made all the graphics in paint, but ripped the music from a mega drive game called gaiares. As its kinda cool and cheesy.
Monday, 12 March 2007, 19:56
Agent	I get MAV every time on this line in F_CIRCLE() col = ReadPixelFast(x, y2) --v
Monday, 12 March 2007, 20:04
mike_g	Yeah thats where the problem was. The .exe should work for you as I updated it, but I think I forgot to update the code too. I'm uploading a fixed version now. \|edit\| If you just delete the 'fast' bit it should work fine, cheers \|edit\|
Monday, 12 March 2007, 20:15
Agent	When I made the change you suggested, the MAV shifts to this line in BLEND() Return cf --v
Monday, 12 March 2007, 20:19
mike_g	Hmm... the function returns an integer, which works for me. In the past I always thought that blitz could only return a bool from a function, as thats what it said in the help file. I dont know, maybe you are using an older version or something. Does the .exe work?
Monday, 12 March 2007, 20:25
Agent	I tried compiling with both Blitz Basic 1.73 and Blitz3D 1.98 and I get the same result. BTW, the .exe crashes too. I dunno, maybe it's something hardware-specific (my machine is a MacBook Pro).
Monday, 12 March 2007, 20:38
mike_g	I just uploaded a new version using cf as a global. I hope this will work for you.
Monday, 12 March 2007, 20:54
Agent	MAVs shifted back to F_CIRCLE() Took out a couple of _Fast's and got it to work ok: Function F_CIRCLE(cx, cy, rad) inc# = Float(360/(radPi2)) steps = 90/inc# For i = 1 To steps x1 = (cx - rad * Cos(deg#)) y1 = (cy - rad * Sin(deg#)) x2 = cx+cx-x1 y2 = cy+cy-y1 If x1 < 24 Then x1 = 24 If x2 > 616 Then x2 = 616 If y1 < 96 Then y1 = 96 If y1 > 480 Then y1 = 480 If y2 < 96 Then y2 = 96 If y2 > 550 Then y2 = 550 If y2 > old_y ;Prevents scanline from being drawn more than once old_y = y2 For x = x1 To x2 col= ReadPixelFast(x, y1) BLEND(col, $FFFFFF, 0.1) WritePixelFast x, y1, cf Next If i > 1 ;Prevents scanline from being drawn more than once For x = x1 To x2 col= ReadPixel(x, y2) BLEND(col, $FFFFFF, 0.1) WritePixel x, y2, cf Next EndIf EndIf deg# = deg# + inc# Next End Function --v
Monday, 12 March 2007, 21:00
mike_g	Yeah, tonight has been a major headache for me trying to fix this. I uploaded the files but dident realise that they wernt overwriting the existing ones o_0 Anyway on the last upload there are no writepixelfasts, and cf is global. Phew...
Monday, 12 March 2007, 21:29
Agent	Dude, maybe you should compile with Blitz Basic. .exe size is only 752k vs ~1.29M for Blitz3D
Tuesday, 13 March 2007, 04:17
mike_g	Yeah I think I just gave up on attempting to keep the size down...
Tuesday, 13 March 2007, 07:37
Phoenix	Nice demo! I like it, especially your MS Paint skills!
Tuesday, 13 March 2007, 08:43
mike_g	Thanks man
Tuesday, 13 March 2007, 16:24
blanko1324	Your demo kicks ass! I love the images, and the mega fish made me laugh a bit. (If you look, you can see the little fish piloting it.)
Tuesday, 13 March 2007, 16:37
garand	Yea thats pretty sweet!
Tuesday, 13 March 2007, 16:46
mike_g	Hey thanks blanko, and garand. Yeah it was meant to be a bit silly. Maybe I'll re-use some of the material for a game some day, cheers.
Tuesday, 13 March 2007, 21:47
Nolan	Sweet graphics, I like it!

20 Second Fish Tank Demo

Comments