Random demo
Random demo
Random demo
Bert Bert Bert Bert
Bert source: https://www.vitoco.cl/atari/10liner/BERT/
Listing 1
G.8:G.28:PMG.1:H=&"0xz8((($ /+;^$0zx8((8(^????0T$.4@<$^<<"+1
DA.R()B.="":M.&"*jZV?_WJ*jZVO?_WUUUUUUUUDDDD@",$B20F,91
M.$E088,$B008,376:P.756,$B0:M.H+60,704,8:DI.P(99),Q(99)B.,O(99)B.:O(0)=99:Q(0)=99:D.$BB86,7:DO:L=1:N=3:W.L<6A.N:?#6,""
B=2+(L>1)-(L=3):F.X=1T.7:F.Y=1T.8-X:Z=X+Y*9:A=$BC18+X*81+Y*79:P(Z)=A:Q(Z)=B:O(Z)=1:@D 1:N.:N.:X=1:Y=1:Z=10:I=1:P.$BBD2,N
E=1:F=0:@Q:U=9:V=0:R=0:R.:P.77,0:K=S.0:I.I>20A.K<15T.J=K:I.I=0:I.J<15:E=(J=7)-(J=11):F=(J=13)-(J=14):I.E+F:Z=Z+E+F*9
X=X+E:Y=Y+F:@Q:I.O(Z):B=Q(Z)-1:I.B=0T.B=1+(L>2)+(L>4):Q(Z)=B:A=P(Z):@D 0:E.:W=9:E.:E.:J=15:E.:S.0,161,12,W:W=W-(W>0)
I=(I+1)*(I<31):M=O(Z)=0O.Z=V:I.U+L>14:V=10:U=0:R=0:E.:I.R<1A.M=0:INCU:V=(V+1+8*R.2)*(U<8):A=V M.9:B=V/9:MS.$B400,256,0
PM.0,128+4*(A-B):I.V T.M.H+86,$B43D+16*(A+B),10:R=90-L*5:M=V=Z:E.:DE.R:U.$(&Q)=$(&O)O.M:F.J=0T.99:S.0,150-J+J*M,10+2*M,8
N.:S.:N=N-M:L=L+1-M:WE.:M.H+68+M*9,$BBCE,9:W.STR.0:WE.:L.:PR.D C:P.A,66+2*(X>1)+R(B):P.A+1,70+2*(Y>1)+R(B):D.A+40,$4B4A
I.C T.D.A+80,$4D4C:ENDP.:PR.Q:PA.:MS.$B500,256,0:PM.1,128+4*(X-Y):M.H+45*(E<0)+15*(F>0)+30*(F<0),$B538+16*(X+Y),15:ENDP.  

This is non-commercial site, its content is based on Atari 8-bit home computer contents and references.
If you feel your rights are violated by showing/using any part of contents of your product represented on this page, please contact me immediatelly so I can remove it!