UP! with a BANG!

casual card games from 'up with a bang'

HTML5 Canvas Animations	52 Pickup on Facebook
Structured Canvas Language Make complex animation easily on any HTML5 canvas. Check out our SCL web site for how you can create your animations without JavaScript. Just with simple code that looks like this: create routine as Start launch fan end create sprite from windmill90x90.png as fan where x=50 and y=50 and center=45,45 having alt= (sub create rotation as rot where speed=90 end) end	Play on Facebook - challenge friends
Web Designer Resources	52 Pickup v1.2
Split background into 2 colors Center a page in a browser window Using DIV tags instead of tables for formatting Graphics borders on DIV and other HTML elements Horizontal lists Doctype effects on rendering More developer, tricks and how-tos	Play 52-Pickup Here
Tech Articles	Outer Space Action
NEW Configure local machine to test Facebook apps and Google App Engine Flash optimization (optimzing Actionscript) Windows 8 Metro development HTML tags for search engine optimization (SEO) Escaping query strings HTTP redirect PNG transparency Color names for style sheets	Cluster Chaos

Play 52 Pickup

create sprite from transparent.png as bkgrd end

create sprite from transparent.png as holder1
	where center=100,100 and x=150 and y=75
	having alt=(sub create rotation as hrot1 where speed=-60 end)
	and alt=(sub create wait as hwait1 where delay=1 and completion=launchBeads end)
	and alt=(sub create wait as waitToScatter where delay=2000 and completion=scatter end)
end

create routine as Start
	draw onto _bottom
		clear
		fillstyle "rgba(0,82,164,1)"
		fillrect 0,0,630,70
		fill
	enddraw
	launch bkgrd
	launch holder1
	insert into bkgrd where alt=(sub create wait as bgwait1 where delay=200 and completion=bgw1Done end)
	insert into bkgrd where alt=(sub create wait as bgwait2 where delay=400 and completion=bgw2Done end)
	insert into bkgrd where alt=(sub create wait as bgwait3 where delay=600 and completion=bgw3Done end)
	insert into bkgrd where alt=(sub create wait as bgwait4 where delay=800 and completion=bgw4Done end)
	insert into bkgrd where alt=(sub create wait as bgwait5 where delay=1000 and completion=bgw5Done end)
	insert into bkgrd where alt=(sub create wait as bgwait6 where delay=5000 and completion=Start end)
end

create routine as launchBeads
	run routine setBead where repeat=36
end

create routine as setBead
	clone from bead using original
	update sprite _clone where angle=_repeat*10
	insert into _sprite where children=_clone
end

create sprite from shape-star.png as bead
	where x=0 and y=0 and center=7,7 and size=1
	having alt=(sub create vector as v1 where speed=80 end)
	and alt=(sub create wait as w1 where delay=700 and completion=w1Done end)
	and alt=(sub create wait as w2 where delay=2000 and completion=scatterBead end)
end

create routine as scatterBead
	update sprite _sprite where angle=random(0,360)
	insert into _sprite where alt=(sub create vector as beadScatter where speed=300 end)
end

create routine as w1Done
	remove from _sprite where alt=v1
end

create routine as bgw1Done clone from holder1 using original as wheel1 update sprite _clone where x=200 end
create routine as bgw2Done clone from holder1 using original as wheel2 update sprite _clone where x=250 end
create routine as bgw3Done clone from holder1 using original as wheel3 update sprite _clone where x=300 end
create routine as bgw4Done clone from holder1 using original as wheel4 update sprite _clone where x=350 end
create routine as bgw5Done clone from holder1 using original as wheel5 update sprite _clone where x=400 end

create routine as scatter
	remove from _sprite where alt=hrot1
	update sprite _sprite where angle=random(0,360)
	insert into _sprite where alt=(sub create vector as wheelV where speed=100 end)
	insert into _sprite where alt=(sub create wait as scatterWait where delay=1200 and completion=DoneScatter end)
end

create routine as DoneScatter
	drop _sprite
end