Hey, Taxi! (C64) by romwer

#################################
# BASIC Tenliners Contest 2025  #
#                               #
# Hey, Taxi!                    #
# (c) 2025 Roman Werner @romwer #
# email: roman.werner@gmail.com #
#################################

"Life is hard and money short in the moon orbit. Not many customers here - at all. All the more I need to provide a fast and excellent service with my space cab to get an additional tip every now and then. The old lady is a bit rusty but nothing that can't be covered with a little coat of yellow paint. I should check the left nozzle though - it rattles a bit when I give full throttle. But let's not talk to the stars - the next customer is waiting. Cheers!"

Task and Goal

=============

Carefully manoeuvre your space cab to the next platform where you see a new waiting customer. Gentle landing provided you get paid 10$ as soon as you have touched solid ground. But don't flambé your guest with your cab's thrust and watch the fuel meter to have enough rocket fuel left for the landing phase. You may choose to land on a platform in between to refill your tank on the way. Good luck! The game is won when you earned more 100$ (or more).

Control:

========

Joystick in Port 2

Joystick left:  Activate right thrust to glide to the left

Joystick right: Activate left thrust to glide to the right

Joystick up or fire button: Activate both engines to raise faster

Game Requirements:

==================

- C64/C128* with BASIC 2.0 runtime environment (or compatible)

- 1 Player

*Also playable on Windows/MacOS/iOS/Android (C64 Emulator required)

Hey Taxi BASIC program code:

============================

0v=53248:h=2:fOi=0to62:rEa:pO832+i,a+a:pOv+27+i/3,-(i<6):nE:p$="{cm asterisk}{reverse on}{space*5}{reverse off}{sh pound}{reverse on}{left*5}"

1b=16:e=4:?"{cyan}{clear}"tAb)"{yellow}hey taxi!":f=255:j=56320:a=0:y=192:x=y:g=0:m=e:c=g:pOv+21,1

2fOi=0to4:z=5+i*12aN31:?"{down*3}{green}"sPz)p$i+1:p(i)=1145+i*160+z:nE:pOv+39,7:pO2040,13

3d=nOpE(j):t=sG(daN17):r=sG(daNe):l=sG(daN8):pOv+37,lort:pOv+38,rort:?"{home}f"q"{left} ";

4x=x+c:y=y+g:pOv,xaNf:pOv+b,-(x>f):pOv+1,y:c=c+(l+t*l-r-t*r)/pi:o=pE(v+31)ory>245

5p=(y-56)/32aNf:ifotHif((y+e)aN15)>6org>htHpOv+39,h:?"{pink}crash!":wAj,b:wAj,b,b:gO1

6ifg=0aNp=mtHpOp(m),32:m=m+(rN(0)*e+1)aNf:m=m+(m>e)*5:pOp(m),88:?"{home}{cyan}{down}$"a;:a=a+10

7g=g+.3-(l+r+t)/h:q=q-t-l-r:ifotHifg>0aN(yaN15)<8tHg=0:c=0:y=(y+h)aN240:q=50

8ifq<1tHq=0:g=5:dA,,,,,,,,,,,,,,,,84,,1,17,,4,16,64,4,16,64,21,85,80,84,68,84,81

9gO3:dA17,20,84,68,84,85,85,84,21,85,80,,,,12.5,1.5,88,2,,96,8.5,1.5,24,2,,96,,,

Tip: Copy/paste the program-Code into CBM prg Studio (http://www.ajordison.co.uk/).

There you can see the commands in nice color highlighting and you can directly execute the game in an emulator of your choice.

Trivia

======

- Inspired by the fantastic computer game classic "Space Taxi" (c) 1984 by John Kutcher/Muse Software: https://en.wikipedia.org/wiki/Space_Taxi