Two Liners Art Gallery

Nibbles
Description: Only two types of animals live in magic land of Nibbles: the hungry green snake and the small red frog. As I said before, this land is magic and some strange things happen here. First, the snake always increase his size after eating a frog. Second, after a frog is eaten, another one just appears from nothing! In this game, you must control the green snake with the cursors to eat the red frogs. But beware: never try to eat your own tail and never touch the eletrified fences on the border! Since your goal is to eat the red frogs, the background music is the brazilian tune "Meu Lanchinho" (translates to "My Small Lunch"). If you die, the game will show how many frogs did you eat.

Minimum: MSX-1
Recommended: CIEL 7MHz or Turbo-R (R800/ROM)
Download: nibbles.zip
Listing Screenshot 
1 K=-1-RND(-TIME):COLOR3,1,1:SCREEN3:D=
636:DIMA(D):A(0)=D:A(1)=K:A(2)=K:E=256:
LINE(0,0)-(E,191),,B:F=2:S=1:M=3:Q=511:
Z=64:P$(3)="L6O5CDECCDECEFG3EFG3":P$(2)
="L12GAGFE6C6GAGFL6ECDO4GO5C3DO4GO5C3":
FORB=0TO9:B=STICK(0):S=Z*((B=1)-(B=5))-
(B=3)+(B=7)-S*(B=0)
2 I=I-1ANDQ:D=D+4*S:X=DMODE:P=POINT(X,D
\Z):PSET(X,D\Z):A(I)=D:IFP=3THENSCREEN0
:PRINTWELSEPSET(A(F)MODE,A(F)\Z),1:H=P=
6ORW=0ORU*H:K=RND(1)*E:L=RND(1)*192:G=P
OINT(K,L):J=G=1:W=W+J*H:U=J+1:PSET(K,L)
,U*G+6*H*J:F=F-1-HANDQ:T=1+PLAY(0):PLAY
P$(M*T):M=MXORT:NEXT

Genius
Description: As a novice Buddhist student, you must learn two things: patience and memory. Your master made a game that will train both your abilities. First, your patience will be tested as you wait while the game board is drawed. After that, your memory will be tested as you try to replicate the sequence of lights and sounds using the cursors. Each time you successfully replicate a sequence, it will repeat itself, however a bit longer. If you fail the test, the game will show you how good your memory was.

Minimum: MSX-1
Recommended: Turbo-R (R800/DRAM)
Download: genius.zip
Listing Screenshot 
1 COLOR15,1:SCREEN1:KEYOFF:DIML(8):K=81
97:FORI=0TO7:READL(I):VPOKEK+I,L(I):NEX
T:T=-TIME:FORI=0TO768:X=IMOD32-16:Y=I/3
2-12:R=X*X:B=Y*Y:VPOKEI+6144,ABS((56+(Y
<X)*16-(R>B)*8)*(R+B>20)*(R+B<150)):VPO
KEI+320,0:NEXT:'RicBit2001'(anuncie_nes
te_espaco)
2 R=RND(T):FORI=0TOM:C=INT(4*RND(1)):FO
RW=-1TO0:S=STICK(0):W=DANDS=0:NEXTW:IFS
-1=2*CORNOTDTHENVPOKEK+C,L(C+4):PLAY"L2
N"+STR$(32+C*8):FORN=0TO1:N=1+PLAY(0):N
EXTN:VPOKEK+C,L(C):NEXTI:M=M-D:D=-1-D:G
OTO2ELSESCREEN0:PRINT"SCORE:";M:DATA12,
14,4,6,3,15,7,9

Nemesis Dawn
Description: When he worked in a space station orbiting the planet Nemesis, the computer programmer Gaudie could see everyday one of the most beautiful things in the universe: the dawn of planet Nemesis as seen from the space. However, due to the war with the Bacterions, the space station was considered insecure and all personal were transported to the planet's surface. After so many years of war, Gaudie created a computer to replicate the Nemesis Dawn he wanted so hard to see again, and couldn't, due to the war! By using complex mathematics, he succeeded in his task, producing the program below. It will take some minutes before the animation can be seen, but that's nothing next to the years Gaudie had to wait to see it again.

Minimum: MSX-2 or MSX-2+
Recommended: Turbo-R (R800/DRAM)
Download: nemmsx2p.zip , nemmsx2.zip

Listing (MSX 2+) Screenshot 
1 DIMZ%(4100):COLOR15,0,0:SCREEN12:SETP
AGE0,0:R=63:P=-1.4:FORN=0TO11:Q=224*COS
(P):W=224*SIN(P):S=64*(N\3):T=64*(NMOD3
):A=1/32:B=A*A:I=-1:J=I:H=-A-A:E=B+B:D=
I:FORY=0TO31:FORX=0TOR:F=-(D>0)*(Q*I+W*
D):C=-(F>0)*INT(F+32*RND(1))AND248:PSET
(X+S,Y+T),C:I=I+A
2 D=D-H-B:H=H+E:PSET(X+S,R-Y+T),C:NEXTX
:I=-1:J=J+A:D=-J*J:H=-A-A:NEXTY:P=P+.26
2:NEXTN:SETPAGE1,1:CLS:FORS=0TO200:FORN
=0TO21:Q=N>11:F=N+(N-10+NMOD12)*Q:S=64*
(F\3):T=64*(FMOD3):COPY(S,T)-(S+R,T+R),
0TOZ%:COPYZ%,-QTO(-R*Q,0):NEXTN,S

Listing (MSX 2) Screenshot 
1 DIMZ%(4100):COLOR15,0,0:SCREEN5:SETPA
GE0,0:R=63:P=-1.4:FORN=0TO11:Z=-(N<8)*N
:COLOR=(Z,Z,Z,Z):Q=7*COS(P):W=7*SIN(P):
S=64*(N\3):T=64*(NMOD3):A=1/32:B=A*A:I=
-1:J=I:H=-A-A:E=B+B:D=I:FORY=0TO31:FORX
=0TOR:F=-(D>0)*(Q*I+W*D):C=-(F>0)*INT(F
+RND(1)):'RicBit2000
2 PSET(X+S,Y+T),C:I=I+A:D=D-H-B:H=H+E:P
SET(X+S,R-Y+T),C:NEXT:I=-1:J=J+A:D=-J*J
:H=-A-A:NEXT:P=P+.262:NEXTN:SETPAGE1,1:
CLS:FORS=0TO200:FORN=0TO21:Q=N>11:F=N+(
N-10+NMOD12)*Q:S=64*(F\3):T=64*(FMOD3):
COPY(S,T)-(S+R,T+R),0TOZ%:COPYZ%,-QTO(-
R*Q,0):NEXTN,S

Salamander is Alive
Description: So you thought Salamander was killed in the last time you saw him? Think again! Salamander is alive in the other corner of the galaxy, and you must hurry to end his plans of universe domination! To reach the other side of the galaxy, you'll need the Warp Engine that achieves faster than light speeds. It does take some minutes to the Warp Engine to warm up, but after that, you can start your voyage, and see the stars passing through the window of your ship!

Minimum: MSX-1
Recommended: Turbo-R (R800/DRAM)
Download: salive.zip
Listing Screenshot 
1 DEFINTA-Z:SCREEN1:KEYOFF:VDP(6)=0:A=-
30720:FORN=0TO128:PRINT".";:X=INT(64*RN
D(1)-32):Y=INT(48*RND(1)-24):FORI=0TO15
:POKEA,X+128:POKEA+1,Y+96:A=A+2:X=X+X\8
:Y=Y+Y\8:B=ABS(X)<128:Z=ABS(Y)<96:X=SGN
(X)-X*B:Y=SGN(Y)-Y*Z:K=-1-BOR-1-Z:Y=Y+K
*(Y-113):NEXTI,N:CLS
2 COLOR8,1,1:LOCATE6,11:PRINT"SALAMANDE
R IS ALIVE":DIMC(16):FORI=0TO15:READC(I
):NEXTI:FORA=0TO0:A=-30690:FORN=0TO113:
FORY=0TO15:PUTSPRITEY,(PEEK(A),PEEK(A+1
)),C(Y),46:A=A+30:NEXTY:A=A-448:NEXTN,A
:DATA15,15,15,15,7,7,7,7,5,5,5,5,4,4,4,
4

RB Race!
Description: As the best brazilian autopilot alive, you have now the access to the ultimate machine ever made, the Great Red Car! To achieve the maximum glory, all you need to do is to finish the RicBit Race, the one race no pilot has ever finished before! Use the cursors to drive the Great Red Car, but beware: your rival has spreaded oil in the road, and controlling the car will be very difficult! If you crash, the game show how far did you reach.

Minimum: MSX-1
Recommended: MSX-1
Download: rbrace.zip
Listing Screenshot 
1 SCREEN1:PRINT"RicBit RACE "INPUT$(1):
CLS:KEYOFF:WIDTH32:DEFFNE$(X)=CHR$(X*8)
+STRING$(X-1,215)+"     "+STRING$(27-X,
215):K=14:FORN=0TO28:FORI=0TO7:VPOKEN*6
4+I,0:NEXT:PRINTFNE$(K);:NEXT:P=128:SPR
ITE$(0)="ÛÿÛ<<7~7":PUTSPRITE0,(P,7),6:O
NINTERVAL=5GOSUB2
2 IFSTHENT=STICK(0):N=(T=7)-(T=3):M=M+N
:P=P+M:VPOKE6913,P:C=VPEEK(6176):IFP<CO
RP>C+32THENSCREEN0:PRINT"GAME OVER,SCOR
E";RELSERETURNELSES=1:INTERVALON:FORF=0
TO5:PRINTFNE$(K);:F=INT(RND(1)*3)-1:X=S
GN(X+F):K=K+X:K=K-(K<4)+(K>29):R=R+1:NE
XT

RB Shoot!
Description: After so many years of preparation, the evil Darkon did at last conquer the world! Now everyone is his slave! However, a small band of renegades is trying to incite the revolt in the population by releasing Happy Face ballons in the sky. Darkon has designated you to destroy the Happy Faces, and gave you a noisy Blaster Cannon to eliminate them! Press the spacebar to release the bomb and try to explode all the ballons! The clock at the bottom will monitor the time you take to finish the task, and remember: Darkon will not be happy if you take too long to finish the mission !

Minimum: MSX-1
Recommended: MSX-1
Download: rbshoot.zip
Listing Screenshot 
1 SCREEN1:KEYOFF:ONINTERVAL=60GOSUB2:S=
153:X=6912:INTERVALON:VDP(6)=0:J=S:FORN
=XTOX+15:READR:VPOKEN,R:NEXT:ONSPRITEGO
SUB2:SPRITEON:FORB=0TO1:B=J<3:J=(J+3*(J
<SORSTRIG(0)))*(B+1)-S*B:VPOKEX+12,J:FO
RI=X+1TOX+9STEP4:VPOKEI,VPEEK(I)+2AND25
5:SOUND0,S-J:NEXTI,B
2 IFVDP(8)AND32THENQ=0:FORK=XTOX+8STEP4
:M=ABS(VPEEK(K+1)-128)<10:VPOKEK,VPEEK(
K)*(1+M)-200*M:Q=Q+VPEEK(K):NEXT:IFQ=60
0THENPRINT"Game Over":BEEPELSERETURNELS
EH=H+1:LOCATE1,20:PRINTH;:SOUND8,10:SOU
ND7,254:RETURN:DATA1,0,1,3,1,85,1,3,1,1
70,1,3,153,128,94,6

MSX Rating All the programs in this page were made by Ricardo Bittencourt
Last updated: 25/4/2000
Copyright (C) 1999,2000 by Ricardo Bittencourt