Private
Public Access
1
0
Files
BASIC10Liner2026/game.tap

4 lines
970 B
Plaintext
Raw Normal View History

2026-02-07 22:01:44 +00:00
pac <20><00><>ҳ<03>Q<00>i=1<00>9 :<3A><>i,2;"..............":<3A>i:<3A>p=22562"X:<3A>x=1 s<00>a:<3A>b:<3A>b()=<3D>a(g,(g-p<0))+<2B>a(g,-(g-p>0)):<3A>1,8,2,3,2,4,2 U<00>a<EFBFBD><61><EFBFBD>a,b;" ";<3B>a,17-b;" ";<3B>10
-a,b;" ";<3B>10
2026-02-08 11:56:44 +00:00
-a,17-b;" ":<3A>2 d<00>g=22831/Y:<3A>z=4:<3A>22689<00>X,129<00>:<3A>22704<00>X,129<00>:<3A>s=1<00>85U<00>0 I<00>k$=<3D>:<3A>n=<3D>a(p,(32 *(k$="d"))-(32 *(k$="e"))-(k$="o")+(k$="p")) ^<00>b=(b*<2A>n)+n:<3A>p,0:<3A>q=<3D>(p+b):<3A>p=p+b*(q<>568):<3A>6,3,8,4,2 W<00>p=p+(-14*b*(q>99c)):<3A>q=<3D>p:<3A>p,546:<3A>g,z:<3A>j=g-p:<3A>4,4,4 a<00>j=<3D>a(g,32 *(j<-18))+<2B>a(g,-32 *(j>18)):<3A>j=0<00><>j=<3D>b():<3A>5,4 ><00>x=j-(x*<2A>j):<3A>g=g+x:<3A>z=<3D>g:<3A>g,40(:<3A>z=546<00>q=40(<00><>
2026-02-07 22:01:44 +00:00
o<00>s=s+1*(q=4):<3A>s:<3A>:<3A>a(l,n)=n*(<28>(l+n)<29>568):<3A>6,4,8,0,0 <0A>