this post was submitted on 31 Aug 2023
41 points (95.6% liked)

retrocomputing

3974 readers
1 users here now

Discussions on vintage and retrocomputing

founded 1 year ago
MODERATORS
 

You are a BASIC bitch, so type-in and share your BASIC listings here. Any and all BASIC dialects are welcome.

you are viewing a single comment's thread
view the rest of the comments
[โ€“] [email protected] 4 points 11 months ago (1 children)

Originally coded for a Sharp PC-1251. Basically my "Hello World" in every programming language I try:

10: INPUT "GEWICHT IN KG" , M
20: INPUT "GROESSE IN M" ,L
30: B=M/L^2
40: PRINT "BMI = ";B

I ported this to LF-BASIC https://github.com/LiquidFox1776/LF-BASIC, a BASIC-interpreter written in Python:

10 LET M=0
20 LET L=0
30 LET B=0
40 INPUT "GEWICHT IN KG "; M
50 INPUT "GROESSE IN CM "; L
60 LET L=L/100
70 LET B=M/L^2
80 PRINT "BMI = "; B

Then I started using PDP-8-Emulation and TSS-8:

10 LET M=0
20 LET L=0
30 LET B=0
35 PRINT "WEIGHT IN KG.G:"
40 INPUT M
45 PRINT "HEIGHT IN CM:"
50 INPUT L
60 LET L=L/100
70 LET B=M/L^2
75 PRINT "YOUR BMI IS:"
80 PRINT B
90 END
[โ€“] [email protected] 1 points 11 months ago

My BMI has been nicely calculated in your BASIC dialect!