Globber (C64) by Metzelwurst
A downloadable game
GLOBBER (10 LINER CONTEST 2026) by Sönke Schultz
Author: Sönke Schultz (Metzelwurst)
Platform: C64
Language: Commodore BASIC V2
Category: EXTREM-256
(goto https://schultz-fl.de/globber/ for more Information)
**** GAME DESCRIPTION ****
You are GLOBBER, a brave creature with googly eyes! Race through the highway full of dangerous stones! Collect hearts for bonus points and reach the finish line to reach the next level.
Watch out: Stones change direction at the halfway point! Sound on! The game has cool sound effects - turn up the volume!
**** CONTROLS ****
Joystick 1 (Up/Down) or Keys Q=Up / A=Down
Hearts: Light red brings more points than the dark red
**** LINES OVERVIEW ****
01 Initialize game: Setup variables, sound & sprites
02 Load sprite data, setup arrays & race track
03 Initialize player & stones, set start positions
04 Main game loop: Read joystick/keyboard input, sprite data (player)
05 Update player position, move stones
06 Set stone positions, check collision & animate
07 Check heart collision, update score & sound
08 Loop back to main game, sprite data (player, stones and hearts)
09 Level complete! Increase difficulty & continue
10 Game over, play sad sound & restart
**** BASIC code (developed in C64Studio) ****
01 L=1:C=5:R=3:Z=5:U=54272:V=53268:T=13:POKEV+13,0:FORI=UTOU+24:POKEI,0:NEXT:POKEU+24,15:D=832:FORI=0TO188:POKED+I,0:NEXT:FORI=0TO32:READA:POKED+(0*64)+I,A:NEXT:FORI=0TO32:READA:POKED+(1*64)+I,A:NEXT:FORI=0TO23:READA:POKED+(2*64)+I,A:NEXT:S=0:B=0:F=56320
02 D=16320:FORI=0TO63:POKED+I,0:NEXT:FORI=0TO23:READA:POKED+I,A:NEXT:DIMX(5),Y(5):DIMD(5):DIMHX(2),HY(2):POKEV+1,255:POKEV+3,255:POKEV+8,255:POKEV+17,12:POKEV+18,11:?"{CLR}{2CTRL-Q}{GREEN}GLOBBER":FORI=1TOC+1:FORJ=1TO30:POKE983+J+I*160,160:NEXTJ,I:W=2039:Y=3:POKEV+19,5
03 Y=Y+(C<Y):?"{HOME}{CTRL-Q}{GREY 1}UP/DOWN WITH JOY1 OR KEY Q/A":FORI=1TO1+C*4:POKE1134+I*40,92:NEXT:X=20:POKEW+1,T:FORN=1TO5:X(N)=265-(N*30):Y(N)=INT(RND(1)*C)+1:POKEW+N+1,15:POKEV+N+19,15:NEXTN:HX(1)=255:HY(1)=INT(RND(1)*C)+1:POKEW+7,255:HX(2)=255:HY(2)=INT(RND(1)*C)+1
04 POKEV+12,0:POKEV+25,2:POKEV+26,10:POKEW+8,255:H=PEEK(F):GETA$:K=(A$="Q"OR(HAND1)=0)-(A$="A"OR(HAND2)=0):IFK<>0ANDY+K>=1ANDY+K<=CTHENY=Y+K:DATA10,2,128,35,136,96,35,136,96,47,130,128,10,0,128,2,128,160,0,170,168,12,157,208,4,157,208,10,170,168,9,36,0
05 POKEV-19,52+Y*32:POKEU+6,40:POKEU+4,17:POKEU+1,INT(RND(1)*3)+5+9*ABS(K):FORI=1TO70:NEXT:POKEU+4,0:FORN=1TOR:D(N)=B:M=9+INT(RND(1)*8):X(N)=X(N)-M+(B*2*M):B=INT(X/150):POKEW+1,T:T=13+(XAND1):IF(X(N)<20)OR(X(N)>255)THENX(N)=255-(B*235):Y(N)=INT(RND(1)*C)+1
06 POKEV-20+(2*N),X(N):POKEV-19+(2*N),58+32*Y(N):ON-(Y(N)=Y)AND(ABS(X(N)-2-X)<19)GOTO10:NEXTN:X=X+Z:POKEV-20,X:HX(1)=HX(1)-17:POKEV-8,HX(1):POKEV-7,54+32*HY(1):HX(2)=HX(2)-13:IFB=1THEN?"{HOME}{CTRL-Q}{GRAY 2} STONES CHANGE DIRECTION! ":IF(X>240)THENL=L+1:POKEV+12,13:GOTO09
07 POKEV-6,HX(2):POKEV-5,54+32*HY(2):FORQ=1TO2:E=HX(Q):IF(E<20)OR((HY(Q)=Y)AND(ABS(HX(Q)-X+2)<22))THENHX(Q)=255:HY(Q)=INT(RND(1)*C)+1:IF(E>20)THENS=S+Q+L:?"{HOME}{YELLOW}LEVEL:";L;"{LEFT} {LIGHT RED}SCORE: {LEFT}";S:POKEV+12,10:FORI=1TO5:POKEU+1,I*40:POKEU+4,33:FORJ=1TO20:NEXTJ,I
08 POKEU+4,0:NEXTQ:GOTO04:DATA0,160,40,2,248,190,2,200,178,0,160,40,0,128,224,0,191,170,0,170,156,4,157,0,12,188,0,10,170,168,0,96,144,2,170,0,10,89,192,41,101,112,38,149,112,37,85,240,37,151,240,7,95,192,3,255,0,5,0,80,26,129,172,25,166,172,26,170,172
09 R=R+(R<6)*(L=2ORL=7):C=C-(C>3)*(L=3ORL=9):?"{HOME}{CTRL-Q}{GREEN}WON!":POKEU+6,40:POKEU+4,17:FORI=0TO9:POKEU+1,INT(RND(1)*9)+4:FORJ=1TO140:NEXTJ,I:POKEU+4,16:?"{HOME}{CTRL-Q}PRESS KEY{HOME}LEVEL:";L:POKE198,0:WAIT198,1:FORI=1TO-4*(C<5):FORJ=1TO30:POKE1103+J+I*40+C*160,160:NEXTJ,I:GOTO03
10 ?"{RED} GAME OVER! STONE HIT YOU! {LIGHT BLUE}":POKEU+6,40:POKEU+4,17:FORI=0TO7:POKEU+1,160-20*I:FORJ=1TO29:NEXTJ,I:POKEU+4,0:FORI=1TO50:NEXT:POKEU+6,190:POKEU+4,128:POKEV+12,2:POKE198,0:WAIT198,1:POKEV-12,0:POKEV-10,0:RUN:DATA6,170,176,1,170,192,0,171,0,0,44,0
**** about the developer ****
Hello, I am Sönke from Flensburg (Germany), born near Hamburg (1978). My mother bought a Comodore64 at the end of the 80s. I made my first code experiences when I was 10 years old.
And sometimes, if time (and kids) permit, i connect the c64 on TV :-)
This is my second game, first test was last year 2023 "snake-star"
More about me: https://schultz-fl.de/
| Status | Released |
| Rating | Rated 4.0 out of 5 stars (1 total ratings) |
| Author | BASIC 10Liner |
| Genre | Action |
| Tags | 10liner, basic, Commodore 64 |
Download
Install instructions
**** Start game ****
Start the vice emulator (or other).
Download the file globber.prg, Drag and drop the file into the VICE emulator window. The game starts automatically - have fun!
Development log
- Exchanged files because of a typo32 days ago



Comments
Log in with itch.io to leave a comment.
Fun game and awesome graphics!
Very nice for a 10-Liner!