166 Followers
7 Following
229 Posts

Increase speed, drop down and reverse direction!

Rheolising since 1991. Stupid on too many levels. Not affiliated with reality.

I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dPeq2 #bbcbasic
#bbcmicrobot MO.1:V.275;8;0;531;15;0;29,624;528;5:N=314:F.P=0TON:Y=1-2*P/N:T=2.4*P:MOVESQR(1-Y*Y)*COST*480,Y*480:M=115A.SINT<0:GC.1,1EORM:V.47EORM:N.:V.1
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dPjzr #bbcbasic
#bbcmicrobot @glymph MO.4:V.29,624;528;5:N=314:F.P=0TON:Y=1-2*P/N:T=2.4*P:MOVESQR(1-Y*Y)*COST*480,Y*480:V.47EOR115A.SINT<0:N.:V.1
#bbcmicrobot MO.1:A%=13:V.531;4;0;787;6;0;29,624;528;5:N=314:F.P=0TON:Y=1-2*P/N:R=SQR(1-Y*Y):T=2.4*P:X=R*COST:Z=R*SINT:GC.1,3+(Z<0):MOVEX*480,Y*480:CA.!554:I.I:N.:V.1
#bbcmicrobot 0TR.1:N=N:IFN N.:V.1 EL.MO.0:V.29,592;528;5:N=314:F.I=0TON:Y=1-2*I/N:R=SQR(1-Y*Y):T=2.4*I:X=R*COST:Z=R*SINT:IFZ<0N.EL.MOVEX*480,Y*480:G.0
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dOUmK #bbcbasic
#bbcmicrobot 0TR.1:!-506=11:V.11-INKEY5,31X%,Y%:X%=X%+(1ORA%):Y%=Y%+(1ORB%):A%=A%EORX%MOD36=0:B%=B%EORY%MOD24=0:RUN
I ran @rheolism's program and got this.
Source: https://bbcmic.ro/?t=dOAnG #bbcbasic
#bbcmicrobot 0TR.9:P."TRACE adventure. Enter N S E W to move.":P$="You are at ":P.P$;
1I.'I$:P.P$;:G.INSTR("SEWN",I$)+1
2I.'I$:P.P$;:G.INSTR("NEWS",I$)+1
3I.'I$:P.P$;:G.INSTR("NEW",I$)+3
4I.'I$:P.P$;:G.INSTR("WES",I$)+1
5I.'I$:P.P$;:G.INSTR("WE",I$)+5
6I.'I$:P.P$;:G.INSTR("EW",I$)+1
7I.'I$:P.P$;:G.INSTR("ES",I$)+6
8I.'I$:P.P$;:G.INSTR("SEW",I$)+6
9P."the end!":TR.OFF