---

Basics of Styx

Diamond

/*
Diamond

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

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

Written on 2025-09-30, 2025-12-06/07.

Last modified 20251207T0043+0100.
*/

unit diamond;

function main() {
    const u32 lines = 17;
    foreach const u32 i in 1 .. lines / 2 + 2 do {
        foreach const u32 j in 1 .. 2 + (lines + 1) / 2 - i do
            printf(" ");
        foreach const u32 j in 1 .. i * 2 do
            printf("*");
        printf("\n");
    }
    foreach const u32 i in 1 .. lines / 2 + 1 do {
        foreach const u32 j in 1 .. i + 2 do
            printf(" ");
        foreach const u32 j in 1 .. ((lines + 1) / 2 - i) * 2 do
            printf("*");
        printf("\n");
    }
}

• All versions of Diamond

Related pages

Basics off

Metaproject about the "Basics of…" projects.

Basics of 8th

Conversion of old BASIC programs to 8th in order to learn the basics of this language.

Basics of Ada

Conversion of old BASIC programs to Ada in order to learn the basics of this language.

Basics of Arturo

Conversion of old BASIC programs to Arturo in order to learn the basics of this language.

Basics of C#

Conversion of old BASIC programs to C# in order to learn the basics of this language.

Basics of C3

Conversion of old BASIC programs to C3 in order to learn the basics of this language.

Basics of Chapel

Conversion of old BASIC programs to Chapel in order to learn the basics of this language.

Basics of Clojure

Conversion of old BASIC programs to Clojure in order to learn the basics of this language.

Basics of Crystal

Conversion of old BASIC programs to Crystal in order to learn the basics of this language.

Basics of D

Conversion of old BASIC programs to D in order to learn the basics of this language.

Basics of Elixir

Conversion of old BASIC programs to Elixir in order to learn the basics of this language.

Basics of F#

Conversion of old BASIC programs to F# in order to learn the basics of this language.

Basics of Factor

Conversion of old BASIC programs to Factor in order to learn the basics of this language.

Basics of FreeBASIC

Conversion of old BASIC programs to FreeBASIC in order to learn the basics of this language.

Basics of Gleam

Conversion of old BASIC programs to Gleam in order to learn the basics of this language.

Basics of Go

Conversion of old BASIC programs to Go in order to learn the basics of this language.

Basics of Hare

Conversion of old BASIC programs to Hare in order to learn the basics of this language.

Basics of Haxe

Conversion of old BASIC programs to Haxe in order to learn the basics of this language.

Basics of Icon

Conversion of old BASIC programs to Icon in order to learn the basics of this language.

Basics of Io

Conversion of old BASIC programs to Io in order to learn the basics of this language.

Basics of Janet

Conversion of old BASIC programs to Janet in order to learn the basics of this language.

Basics of Julia

Conversion of old BASIC programs to Julia in order to learn the basics of this language.

Basics of Kotlin

Conversion of old BASIC programs to Kotlin in order to learn the basics of this language.

Basics of Lobster

Conversion of old BASIC programs to Lobster in order to learn the basics of this language.

Basics of Lua

Conversion of old BASIC programs to Lua in order to learn the basics of this language.

Basics of Nature

Conversion of old BASIC programs to Nature in order to learn the basics of this language.

Basics of Neat

Conversion of old BASIC programs to Neat in order to learn the basics of this language.

Basics of Neko

Conversion of old BASIC programs to Neko in order to learn the basics of this language.

Basics of Nelua

Conversion of old BASIC programs to Nelua in order to learn the basics of this language.

Basics of Nim

Conversion of old BASIC programs to Nim in order to learn the basics of this language.

Basics of Nit

Conversion of old BASIC programs to Nit in order to learn the basics of this language.

Basics of Oberon-07

Conversion of old BASIC programs to Oberon-07 in order to learn the basics of this language.

Basics of OCaml

Conversion of old BASIC programs to OCaml in order to learn the basics of this language.

Basics of Odin

Conversion of old BASIC programs to Odin in order to learn the basics of this language.

Basics of Pike

Conversion of old BASIC programs to Pike in order to learn the basics of this language.

Basics of Pony

Conversion of old BASIC programs to Pony in order to learn the basics of this language.

Basics of Python

Conversion of old BASIC programs to Python in order to learn the basics of this language.

Basics of Racket

Conversion of old BASIC programs to Racket in order to learn the basics of this language.

Basics of Raku

Conversion of old BASIC programs to Raku in order to learn the basics of this language.

Basics of Retro

Conversion of old BASIC programs to Retro in order to learn the basics of this language.

Basics of Rexx

Conversion of old BASIC programs to Rexx in order to learn the basics of this language.

Basics of Ring

Conversion of old BASIC programs to Ring in order to learn the basics of this language.

Basics of Rust

Conversion of old BASIC programs to Rust in order to learn the basics of this language.

Basics of Scala

Conversion of old BASIC programs to Scala in order to learn the basics of this language.

Basics of Scheme

Conversion of old BASIC programs to Scheme in order to learn the basics of this language.

Basics of Swift

Conversion of old BASIC programs to Swift in order to learn the basics of this language.

Basics of V

Conversion of old BASIC programs to V in order to learn the basics of this language.

Basics of Vala

Conversion of old BASIC programs to Vala in order to learn the basics of this language.

Basics of Zig

Conversion of old BASIC programs to Zig in order to learn the basics of this language.

External related links

• Styx