BlitzMax on Android

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|461\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Off Topic -> BlitzMax on Android
Tue, 06 Oct 2015, 15:06
Dabz	My first ever BlitzMax Android app: Linkage Had to do a bit battle with the setup since I never had a clue, as well as bmk was being iffy with paths, I had to tinker with that! \o/ PS... Its not my app as in I wrote it myself, its the firepaint demo, but, it is the first mobile app I've built using BlitzMax! Quite pleased! Here's the code which I built BTW:- Strict Framework sdl.gl2sdlmax2d Import brl.pngloader Import brl.random Import brl.ramstream Import brl.standardio Incbin "spark.png" Global width=DesktopWidth() Global height=DesktopHeight() Graphics width,height,0 AddHook EmitEventHook,TouchHook,Null,0 ' Create a spark type Type spark Field x#,y#,z#,vy#,xd#,yd#,zd#,r#,g#,b#,alpha# End Type ' Load spark image Global sparki:TImage=LoadImage("incbin::spark.png") ' Set no. of sparks to be created per firework Global no_sparks=50 Global spark_cache:TList = New TList ' Create spark list Global spark_list:TList=New TList Global spark_count:Int ' Start main loop While Not KeyHit(KEY_ESCAPE) And Not KeyHit(KEY_BROWSER_BACK) ' Draw all sparks SetBlend LIGHTBLEND For Local sp:spark=EachIn spark_list ' If spark alpha is above 0 then draw it... If sp.alpha>0 sp.x=sp.x+sp.xd10.0 sp.y=sp.y+sp.yd10.0 sp.z=sp.z+sp.zd10.0 sp.y=sp.y+sp.vy sp.vy=sp.vy+0.02 Local x# = sp.x Local y# = sp.y sp.alpha=sp.alpha-0.01 SetColor sp.r,sp.g,sp.b SetAlpha sp.alpha 'SetScale 20/sp.z,20/sp.z 'DrawImage sparki,x#,y# Plot x, y '...else remove spark from spark list Else spark_cache.AddLast sp spark_list.Remove sp spark_count :- 1 EndIf Next SetBlend SOLIDBLEND 'SetScale 1,1 SetColor 255,255,255 DrawText spark_count,0,0 Flip Cls Wend End Function TouchHook:Object( id,data:Object,context:Object ) Local ev:TEvent=TEvent(data) If Not ev Return data 'If inputSource And inputSource<>ev.source Return data Local x:Int, y:Int Local touched:Int Select ev.id Case EVENT_TOUCHDOWN, EVENT_TOUCHMOVE Local x#=ev.x Local y#=ev.y Local z#=200 Local r#=Rand(255) Local g#=Rand(255) Local b#=Rand(255) For Local i:Int = 0 Until no_sparks Local speed# = 0.1 Local ang1# = Rnd!(360) Local ang2# = Rnd!(360) Local sp:spark=spark(spark_cache.RemoveFirst()) If Not sp Then sp = New Spark End If spark_list.AddLast sp sp.x=x# sp.y=y# sp.z=z# sp.xd=Cos(ang1#)Cos(ang2#)speed# sp.yd=Cos(ang1#)Sin(ang2#)speed# sp.zd=Sin(ang1#)speed# sp.vy = 0 sp.r=r sp.g=g sp.b=b sp.alpha=1 Next spark_count :+ no_sparks End Select Return data End Function --v Just so you can see how very BlitzMaxy it is! Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Tue, 06 Oct 2015, 15:06
Dabz	Oh, and it absolutely flies on my Samsung Ace 3! -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Tue, 06 Oct 2015, 16:47
steve_ancell	I didn't know BlitzMax had an Android target.
Tue, 06 Oct 2015, 17:13
therevillsgames	Officially it doesnt Steve... Dabz is using BMX-NG, Brucey's BlitzMax Syntax Monkey C Compiler
Tue, 06 Oct 2015, 21:47
Dabz	bmx-ng.com Wait for 30mins, I need to update the Windows download on there with the jiggled bmk.exe, and I'll throw up a tutorial as well to get things grafting! Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Tue, 06 Oct 2015, 22:55
rockford	Cool. BTW - Setting up Android can be a right git, but once it's done, it's done.
Tue, 06 Oct 2015, 23:12
steve_ancell	I downloaed BlitzMax a few weeks ago but never got around to trying it out, does it do anything that Monkey-X doesn't?
Wed, 07 Oct 2015, 01:53
Dabz	Bruceys BlitzMax-ng does quite a few things... Compiles to 32 and 64 desktop, android, iOS, raspberry pi I've updated the download link with the newer bmk that fixes an issue with paths. But setting it up is simple once you've done it... Basically, until I write a step by step, which I never had time this morning... There's a few things to remember if playing with the one I put up... 32bit NDK required (at the minute) and two... Make sure you peek at Bruceys forum, more notably, the android thread... It has info on files bmx-ng needs (only 4 which you make yourself) and finally, i installed that platform 16 api in the android manager thingy me bob! Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Thu, 08 Oct 2015, 11:00
Dabz	Anyone got 10 mins to try this before I chuck it over bb.com:- www.bmx-ng.com/main/tutorials/building-for-android/ Cheers Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Thu, 08 Oct 2015, 11:27
Jayenkai	I'd rather not touch my Android SDK stuff, right now. Not until I'm done recompiling all bloody 42 god damned feckin' games.. Grrrr!!! (21 down, 21 to go.. Halfway there!) -=-=- ''Load, Next List!''
Thu, 08 Oct 2015, 11:31
Dabz	No sweat! I've followed it about three times now and it works, lol, but you know how it is... Put it out there "proper", and voila... fan, shit, wallop!!! Dabz -=-=- Intel Core i5 6400 2.7GHz, NVIDIA GeForce GTX 1070 (8GB), 8Gig DDR4 RAM, 256GB SSD, 1TB HDD, Windows 10 64bit
Thu, 08 Oct 2015, 14:29
therevillsgames	Very nice Dabz!