Home
JAQForum Ver 20.06
Log In or Join  
Active Topics
Local Time 02:10 05 Feb 2023 Privacy Policy
Jump to

Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.

Forum Index : Microcontroller and PC projects : Software for PicoMite VGA

Author Message
PilotPirx

Newbie

Joined: 03/11/2020
Location: Germany
Posts: 31
Posted: 02:30pm 23 Jan 2023
Copy link to clipboard 
Print this post

I am searching demos or games which are running on PicoMite VGA.
Which software is suitable for this? Is there a list?
Thanks for tips,
Peter
 
Mixtel90

Guru

Joined: 05/10/2019
Location: United Kingdom
Posts: 3327
Posted: 02:59pm 23 Jan 2023
Copy link to clipboard 
Print this post

You could start here:  https://multimite.strongedge.net/
There are links there to CMM2.fun and Fruit of the Shed.
Most of the above will be for CMM2 machines rather than the PicoMite, I think, but there might be stuff on Fruit of the Shed.

There are a few odds and ends if you look back through this forum, probably not marked as demos so a search on that won't find them.

The PicoMite VGA is still a relatively new platform and is, in fact still under development now and again. :) .

I don't know of an actual list of PicoMite VGA demos. Perhaps you'd like to put one together as you find them? There is a fair amount of software, but it's mostly not demos.
Edited 2023-01-24 01:02 by Mixtel90
Mick

Zilog Inside! nascom.info for Nascom & Gemini
Preliminary MMBasic docs & my PCB designs
 
JohnS
Guru

Joined: 18/11/2011
Location: United Kingdom
Posts: 3034
Posted: 05:14pm 23 Jan 2023
Copy link to clipboard 
Print this post

I don't have a list but here's something
Sierpinski

John
 
thwill

Guru

Joined: 16/09/2019
Location: United Kingdom
Posts: 2930
Posted: 07:23pm 23 Jan 2023
Copy link to clipboard 
Print this post

It's a shame we haven't really got this organised yet, it would be unfortunate if someone found the PicoMite VGA and then gave up because they couldn't find examples to run:

- PicoVaders game - @Martin H
- Racing game proof of concept - @Martin H
- 3D (lack of) monster maze proof of concept - @Martin H
- Raycasting proof of concept - @Martin H
- Four Equals Ten (game) - @vegipete
- PWM music demos - @thwill
- and a good proportion of CMM2 software should work if adjusted to use MODE 2

I've got other stuff cooking, but am having difficulty getting it to the boil.

Best wishes,

Tom
Edited 2023-01-24 05:36 by thwill
CMM2 Welcome Tape, Creaky old text adventures
 
Volhout
Guru

Joined: 05/03/2018
Location: Netherlands
Posts: 2027
Posted: 03:52am 24 Jan 2023
Copy link to clipboard 
Print this post

Circle, a 2 player game for picomite and 2 nes controllers.
Edited 2023-01-24 13:54 by Volhout
If nothing goes right ... turn left
 
Martin H.

Senior Member

Joined: 04/06/2022
Location: Germany
Posts: 228
Posted: 06:55am 24 Jan 2023
Copy link to clipboard 
Print this post

  thwill said  It's a shame we haven't really got this organised yet, it would be unfortunate if someone found the PicoMite VGA and then gave up because they couldn't find examples to run:

- PicoVaders game - @Martin H
- Racing game proof of concept - @Martin H
- 3D (lack of) monster maze proof of concept - @Martin H
- Raycasting proof of concept - @Martin H
- Four Equals Ten (game) - @vegipete
- PWM music demos - @thwill
- and a good proportion of CMM2 software should work if adjusted to use MODE 2

I've got other stuff cooking, but am having difficulty getting it to the boil.

Best wishes,

Tom


Dont forget the modified version of Stellar Battle in the Seven Green Hills Zone especially for the PicoMITE-VGA. by vegipete
Stellar Battle in the Seven Green Hills Zone
btw: @Tom  .. till now, you did not add Picovaders to your GidHub Page.
Maybee the "Software" region there, would be a nice Place for a Pico VGA Games collection
Edited 2023-01-24 17:03 by Martin H.
'no comment
 
Volhout
Guru

Joined: 05/03/2018
Location: Netherlands
Posts: 2027
Posted: 09:08am 24 Jan 2023
Copy link to clipboard 
Print this post

  Volhout said  Circle, a 2 player game for picomite and 2 nes controllers.



Circle listing
If nothing goes right ... turn left
 
thwill

Guru

Joined: 16/09/2019
Location: United Kingdom
Posts: 2930
Posted: 10:24am 24 Jan 2023
Copy link to clipboard 
Print this post

Hi Martin,

  Martin H. said  Dont forget the modified version of Stellar Battle in the Seven Green Hills Zone especially for the PicoMITE-VGA. by vegipete
Stellar Battle in the Seven Green Hills Zone


Cool, I knew he was doing it but missed (or forgot) that he had actually succeeded .

  Martin H. said  btw: @Tom  .. till now, you did not add Picovaders to your Gi[t]Hub Page. Maybee the "Software" region there, would be a nice Place for a Pico VGA Games collection


Which GitHub page,

   https://github.com/thwill1000/cmm2-sptools/wiki
   https://github.com/thwill1000/pico-game-vga/wiki/Software

The former is really just a list I keep for my convenience, the latter I have sadly neglected (like the rest of the PicoGAME) whilst trying to keep up with other things.

No blame intended but as a community I think we are failing when it comes to a Wiki. I know that valiant effort has been put into "Fruit of the Shed" by @CaptainBoing but the Wiki software is just too ancient and IMO looks awful and is not as easy to navigate or edit as it should be - I know by personal experience, I tried to do something with it early on in the life of the CMM2 and just decided the results were not worth the effort and so found other things to do.

Best wishes,

Tom
Edited 2023-01-24 20:25 by thwill
CMM2 Welcome Tape, Creaky old text adventures
 
Martin H.

Senior Member

Joined: 04/06/2022
Location: Germany
Posts: 228
Posted: 11:16am 24 Jan 2023
Copy link to clipboard 
Print this post

  thwill said  
Posted: 06:55pm 08 Jul 2022
Martin,

At some future point it is possible I might make a free compilation of games/programs for the PicoGAME VGA downloadable from https://github.com/thwill1000/pico-game-vga. Can I have your permission to include PicoVaders ?

Thanks,

Tom


Found at PicoVaders Tree
'no comment
 
thwill

Guru

Joined: 16/09/2019
Location: United Kingdom
Posts: 2930
Posted: 11:50am 24 Jan 2023
Copy link to clipboard 
Print this post

  thwill said  At some future point it is possible I might make a free compilation of games/programs for the PicoGAME VGA downloadable from https://github.com/thwill1000/pico-game-vga. Can I have your permission to include PicoVaders ?


Ah right, I hadn't completely forgotten.

Either:

a) We haven't yet reached "some future point", or
b) This is another of my unfulfilled MMBasic commitments - story of my life at the moment.

Best wishes,

Tom
CMM2 Welcome Tape, Creaky old text adventures
 
Volhout
Guru

Joined: 05/03/2018
Location: Netherlands
Posts: 2027
Posted: 02:48pm 24 Jan 2023
Copy link to clipboard 
Print this post

Ten Line Sokoban from the 2021 programming challenge, ported to picomite VGA

s=11:z=16:Dim f(s,s),t(s,s),v$(16):GoSub 1:Sprite Load "x.s":Do :MODE 2:Read x,y
For i=1To s:Read a$:l=Val("&h"+a$):For j=1To s:f(i,j)=3And l:t(i,j)=(f(i,j)=1)
l=l\4:Next j,i:CLS :Print w,,"TLS":f(x,y)=4:Do :d=0:For i=1To s:For j=1To s:k=f(i,j)
o=120+z*(i-6):p=99+z*(j-6):Sprite write Int(k+1+((k=4)*n)),o,p,0:d=d+(k=1):Next j,i
If d+q=0Then:w=w+1:Exit :EndIf :Data 9,2,FFC,3003,3003,30C3:Do :a$=Inkey$
Loop While a$="":n=3And Asc(a$):c=(n<2)*(n*2-1):b=(n>1)*(n*2-5):e=x+b:g=y+c
If f(e,g)=3Then:b=0:c=0:ElseIf f(e,g)=2Then:If f(e+b,g+c)<2Then:f(e,g)=t(e,g)
f(e+b,g+c)=2:Else :b=0:c=0:EndIf :EndIf :f(x,y)=t(x,y):x=x+b:y=y+c:f(x,y)=4:q=t(x,y)
If a$="r"Then:Exit :EndIf :Data FC0,,FFC,3217,3203,3003,FFC,5,2,,,,FFFF,D5F3,CBC3
Loop :Restore :For i=1To(s+2)*w:Read a$:Next i:Loop :Data C023,C3CF,EC0C,C0FC,FFC0
Data 8,5,,,,FC0,DC0,CFF,FE87,D83F,FFB0,370,3F0,6,3,,,3FF,3FF03,30FA3,30083,303FF
Data 3F300,C3F0,C570,FFF0,5,4,,,,FF0,C30,E3F,3DA3,3163,3163,3F03,3FF,7,7,,,,FF00
Data C3F0,C03F,CE07,C897,C87F,C3F0,FF00,6,6,,,3FF,3F03,3023,30E3,3163,317F,32F0
Data 30C0,3FC0,9,7,,,,,FFFF,C017,C897,FABB,C897,C017,FFFF,7,6,,,FFFF,D503,D1B3
Data CB03,C23F,F30C,328C,3F0C,3FC,7,6,,,,3FF0,303F,3053,3373,32B3,3C23,C0F,FFC
Data 8,2,,,,FF0,C3F,FC03,C273,CE23,C44F,FF0C,3FC,6,2,,,,,FFFF,C303,C0B3,DA13
Data CDEF,C10C,FFFC,2,3,FFC,3FC0C,30C8C,300BF,37F23,37203,3703F,37230,37F30
Data 30030,3FFF0,6,3,,,,3FFFC,321DC,32FCF,31323,36683,32043,31FFF,3FC00,10,7,,FF
Data 3FFCC3,300FE3,339003,331FEF,339C0C,301CEC,3F100C,30FFC,3FC00,5,10,,,3FFFC0
Data 3005C0,33F5FF,303003,32B0C3,3E3FCF,32000C,303F0C,3FF3FC,5,3,3FC0,30FF,F023
Data C2C3,CC8F,C0BC,FF0C,F0C,D0C,D5C,FFC,3,8,FFFFC,C3C0C,C008C,C0F0F,FC8C3,C803
Data FC3F,3570,3030,30F0,3FC0,9,7,,,,3FFF,3003,3333,3003,FF3F,C2A3,C153,FFFF
Data 10,10,3FF003,3333FF,303003,0,3FF3FF,8030,3FF3FF,0,3FF3FF,307333,FC303
1 Open "x.s"For output As#1:Print #1,"16,8":Do :Read a$:Loop Until a$="s"
For i=1To 8:For j=1To 14:Read a$:b=Len(a$):v$(j)="":If b=1Then:v$(j)=v$(Val(a$))
Else :For k=1To b Step 2:n=Val("&h"+Mid$(a$,k,1)):r$=Mid$(a$,k+1,1):For l=1To n
v$(j)=v$(j)+r$:Next l,k:EndIf :Print #1,v$(j)+"  ":Next j:Print #1,Space$(16)
Print #1,Space$(16):Next i:Close #1:Restore :Return :Data s,E0,1,1,1,1,1,1,1,1,1,1,1,1
Data 1,E0,1,1,3016601630,4016401640,5016201650,602660,7,6,5,4,1,1,1,2210821022
Data 1,E0,1,1,1,1,1,1,1,1,3,1,1,4410441044,1,E0,14104410441024,4,3,1,1,3,4,4,3
Data 1,1,2730443027,2720642027,2710841027,27102445241027,271014154415141027
Data 27111564151127,2711841127,7,7,10171184111710,1031643110,2031443120,308130
Data 406140,406140,308130,2031443120,1031643110,10171184111710,2711841127,6,6
Data 27111564151127,271014154415141027,27102445241027,2710841027,2720642027
Data 2730443027,9750,A71130,507120,203415443110,1034156431,34158421,6,6,6,5,4,3
Data 2,1,5097,3011A7,207150,103144153420,3164153410,21841534,6,6,6,5,4,3,2,1


Description for those who want to understand (unbelievable) what's going on .....

Sokoban for the Color Maximite 1

This game is writte for the 2021 Color Maximite programming challenge.
The challenge is to write a program where the whole listing fit's on a CMM2 screen (48 lines @ 100 chars).
This is 37 lines of 80 characters, in line with the CMM1 screen. Using sprites 14x14

Game task: move the green boxes onto the yellow crosses.
You (the Mario type guy) can only push the boxes, not pull.
Typing lower case "r" reloads the current level.
There are 20 levels. The level is shown in the left top corner.
Mario is controlled using cursor keys.

Cheat: by adding the line w=xx before the game,"pressing "r" will bring you to level xx


Explain:
' TLS_game = Ten Line Sokoban (with Sprites)

' control by cursor keys-128 (128,129,130,131 => 0,1,2,3 => ^ V < >)
' playfield values 0=empty, 1=target, 2=block, 3=wall
' press "r" to redo the level

'z   = size block
'x,y = position human
'e,g = new position human
'o,p = position onscreen
'n   = ascii value key
'b,c = direction human
'd   = done
'a$  = key pressed
'l,m = vars for decoding rooms / sprites
'i,j = counters
'k   = value field f(i,j)
'f() = playing field
't() = target locations for the boxes
's   = size playfield (sxs)
'q   = boolean (human on target)
'w   = level (0....nn)
'v$()= array to create sprites
'r$  = sprite pixel color
'h,u = not used


History

TLS is 10 line Sokoban: what can you do in 10 lines of code.
TLSS is same with 18 additional levels, actually playable.
TLS_game is the fancy 20 level game using sprites

If you want to make additional levels:

What is important
Fields are maximum 11x11 determined by variable "s".
Larger are possible but all provided levels must be adapted.

The DATA statement needs 13 entries per level
1 - X coordinate guy (number 1 .. 11)
2 - Y coordinate guy (number 1 .. 11)
3.....13 : field information

The field information uses 2 bits per cel
&b00 = empty
&b01 = target (destination field)
&b10 = box
&b11 = wall

There is one caveat: due to the above definition it is not possible to add a level that starts out with one or more boxes already on it's destination.
If a field is smaller, simply add blanks (,,) until you have 13 entries.
If nothing goes right ... turn left
 
Print this page


To reply to this topic, you need to log in.

© JAQ Software 2023