Please Don't Tell My Boss
See bottom for update
The disk image. This is a RARed DSK image. Use WINRAR to decompress
The disk image HIGH RESOLUTION. This is a ZIPped DSK image. Use WINzip to decompress
play it online
play it online HIGH RESOLUTION
This is something I've been playing with during lunch breaks at work..
type in world1.1 as the level to load
controls:
Q=UP
A=stop
Z= down
closed apple = JUMP (right ALT in applewin)
Gravity, and the entire world is out of phase by 90 degrees, because
I used the built in text screen scroller. The goal is to make a %100
BASIC Super Mario Bros. game.
not planned on being supported are: background sprites
What works: walking, jumping, collision detection (KIND OF), level
editor, level scrolling.
you can only jump from a standstill. I know how to make it work,
haven't done it yet.
To do: fix physics. Add enemies. Detect collisions with :
enemies, power ups, coins, presence of pipes below mario
when he pushes LEFT, changing marios coordinates when
he is on a moving platform.
I prototyped Super Mario Brothers in BASIC. I figured out the game logic is very simple. So now I need to work on getting the Hires tile-engine running ..... Update, Antoine had a good idea to scroll the screen 1 byte at a time. Saves me alot of coding to get this prototype running.
MMphosis posted a cool bit of code to draw mario on the hi-res screen in color:
0 H = 2:V = 2:M = 130:N = 70
1 HGR : HCOLOR= 6: HPLOT 0,0
2 CALL 62454: FOR Y = 0 TO 191
3 READ A$:L = LEN (A$):X = 0
4 IF L = 0 THEN 80
5 B = Y * V + N: FOR I = 1 TO L
6 C$ = MID$ (A$,I,1)
7 P = X * H + M:E = P + H - 1
10 IF C$ = "." THEN 70
20 IF C$ = "O" THEN HCOLOR= 5
30 IF C$ = ";" THEN HCOLOR= 4
40 IF C$ = "@" THEN HCOLOR= 7
50 FOR Z = B TO B + V - 1
60 HPLOT P,Z TO E,Z: NEXT Z
70 X = X + 1: NEXT I,Y
80 DATA.....OOOOOO
82 DATA....OOOOOOOOOO
84 DATA....;;;@@;@@
86 DATA...;@;@@@;@@@@
88 DATA...;@;;@@@;@@@@
90 DATA...;;@@@@;;;;;
92 DATA.....@@@@@@@@
94 DATA....;;;O;;;
96 DATA...;;;;O;;;
98 DATA.@;;;;OO;;;,@@@;;OO@OO
100 DATA.;;OOOOOOO,...;;OOOO
102 DATA..;;;;,..;;;,
A screenshot of the drawing and scrolling code working with the BASIC MARIO level format!
I didn't change anything... I just wrote a parser in BASIC to cycle through the level tiles, and
display them on screen. So I have world1.1 to world1.4 entered, and have 4 levels to play once
I get it all working...
In the upper right is the same screenshot of SuperMario Bros. running
on NES:
I've been stuck in Mario Land!