---

Basics of Lobster

3D Plot

/*
3D Plot

Original version in BASIC:
    Creative Computing (Morristown, New Jersey, USA), ca. 1980.

This version in Lobster:
    Copyright (c) 2023, Marcos Cruz (programandala.net)
    SPDX-License-Identifier: Fair

Written on 2023-09-16.

Last modified 20250318T1528+0100.
*/

def clear():
    print("\x1B[0;0H\x1B[2J")

def showCredits():
    print("3D Plot\n")
    print("Original version in BASIC:")
    print("    Creative computing (Morristown, New Jersey, USA), ca. 1980.\n")
    print("This version in Lobster:")
    print("    Copyright (c) 2023, Marcos Cruz (programandala.net)")
    print("    SPDX-License-Identifier: Fair\n")
    get_line("Press Enter to start the program.")

def exp(n: float) -> float:
    let E = 2.71828
    return pow(E, n)

def a(z: float) -> float:
    return 30.0 * exp(-z * z / 100.0)

def draw():

    let WIDTH = 56
    let SPACE = " "
    let DOT   = "*"

    var l = 0
    var y1 = 0
    var z = 0

    var x = -30.0
    while x <= 30.0:
        let line = []
        var pos = 0
        while pos < WIDTH:
            push(line, SPACE)
            pos += 1
        l = 0
        y1 = 5 * int(sqrt(900.0 - x * x) / 5.0)
        var y = y1
        while y >= -y1:
            z = int(25.0 + a(sqrt(x * x + float(y * y))) - 0.7 * float(y))
            if z > l:
                l = z
                line[z] = DOT
            y -= 5
        print(concat_string(line, ""))
        x += 1.5

clear()
showCredits()
clear()
draw()

• Ĉiuj versioj de 3D Plot

Diamond

/*
Diamond

Original version in BASIC:
    Example included in Vintage BASIC 1.0.3.
    http://www.vintage-basic.net

This version in Lobster:
    Copyright (c) 2023, Marcos Cruz (programandala.net)
    SPDX-License-Identifier: Fair

Written on 2023-09-16.

Last modified 20250318T1528+0100.
*/

let LINES = 17

var i = 1
while i <= int(LINES / 2 + 1):
    let indent = repeat_string(" ", int((LINES + 1) / 2) - i + 1)
    let stars = repeat_string("*", i * 2 - 1)
    print(concat_string([ indent, stars ], ""))
    i += 1

i = 1
while i <= int(LINES / 2):
    let indent = repeat_string(" ", i + 1)
    let stars = repeat_string("*", (int((LINES + 1) / 2) - i) * 2 - 1)
    print(concat_string([ indent, stars ], ""))
    i += 1

• Ĉiuj versioj de Diamond

Rilataj paĝoj

Basics off

Metaprojekto pri la projektoj «Basics of…».

Basics of 8th

Konverto de malnovaj BASIC-programoj al 8th por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Ada

Konverto de malnovaj BASIC-programoj al Ada por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Arturo

Konverto de malnovaj BASIC-programoj al Arturo por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of C#

Konverto de malnovaj BASIC-programoj al C# por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of C3

Konverto de malnovaj BASIC-programoj al C3 por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Chapel

Konverto de malnovaj BASIC-programoj al Chapel por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Clojure

Konverto de malnovaj BASIC-programoj al Clojure por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Crystal

Konverto de malnovaj BASIC-programoj al Crystal por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of D

Konverto de malnovaj BASIC-programoj al D por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Elixir

Konverto de malnovaj BASIC-programoj al Elixir por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of F#

Konverto de malnovaj BASIC-programoj al F# por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Factor

Konverto de malnovaj BASIC-programoj al Factor por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of FreeBASIC

Konverto de malnovaj BASIC-programoj al FreeBASIC por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Gleam

Konverto de malnovaj BASIC-programoj al Gleam por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Go

Konverto de malnovaj BASIC-programoj al Go por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Hare

Konverto de malnovaj BASIC-programoj al Hare por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Haxe

Konverto de malnovaj BASIC-programoj al Haxe por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Icon

Konverto de malnovaj BASIC-programoj al Icon por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Io

Konverto de malnovaj BASIC-programoj al Io por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Janet

Konverto de malnovaj BASIC-programoj al Janet por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Julia

Konverto de malnovaj BASIC-programoj al Julia por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Kotlin

Konverto de malnovaj BASIC-programoj al Kotlin por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Lua

Konverto de malnovaj BASIC-programoj al Lua por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Nature

Konverto de malnovaj BASIC-programoj al Nature por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Neat

Konverto de malnovaj BASIC-programoj al Neat por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Neko

Konverto de malnovaj BASIC-programoj al Neko por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Nelua

Konverto de malnovaj BASIC-programoj al Nelua por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Nim

Konverto de malnovaj BASIC-programoj al Nim por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Nit

Konverto de malnovaj BASIC-programoj al Nit por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Oberon-07

Konverto de malnovaj BASIC-programoj al Oberon-07 por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of OCaml

Konverto de malnovaj BASIC-programoj al OCaml por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Odin

Konverto de malnovaj BASIC-programoj al Odin por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Pike

Konverto de malnovaj BASIC-programoj al Pike por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Pony

Konverto de malnovaj BASIC-programoj al Pony por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Python

Konverto de malnovaj BASIC-programoj al Python por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Racket

Konverto de malnovaj BASIC-programoj al Racket por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Raku

Konverto de malnovaj BASIC-programoj al Raku por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Retro

Konverto de malnovaj BASIC-programoj al Retro por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Rexx

Konverto de malnovaj BASIC-programoj al Rexx por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Ring

Konverto de malnovaj BASIC-programoj al Ring por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Rust

Konverto de malnovaj BASIC-programoj al Rust por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Scala

Konverto de malnovaj BASIC-programoj al Scala por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Scheme

Konverto de malnovaj BASIC-programoj al Scheme por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Styx

Konverto de malnovaj BASIC-programoj al Styx por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Swift

Konverto de malnovaj BASIC-programoj al Swift por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of V

Konverto de malnovaj BASIC-programoj al V por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Vala

Konverto de malnovaj BASIC-programoj al Vala por lerni la fundamentojn de ĉi-tiu lingvo.

Basics of Zig

Konverto de malnovaj BASIC-programoj al Zig por lerni la fundamentojn de ĉi-tiu lingvo.

Eksteraj rilataj ligiloj

• Lobster