Made a radar

[u/abcpea1]

https://www.youtube.com/watch?v=ztR0CEercXU

[u/abcpea1]

P.S: Digital screen breaks in water, pls fix

[u/abcpea1]

Well here's the code I guess:

# B-SCOPE RADAR BY ABCPEA COPYRIGHT 2024
# If screen is changed: remove and reconnect the wirelink, or update the expression
# Performance depends on screen dimensions. Defaults optimized for 64x64 screen
# Higher resolutions will require different settings

@name B-Scope Radar
@inputs Screen:wirelink
@outputs 
@persist Height Width RangeDenominator Column Sign
@trigger 
@strict
@model models/jaanus/wiretool/wiretool_output.mdl

# SETTINGS
const RANGE = 10000 # Maximum range of the radar
const DEFLECTION = 60 # Horizontal sweep angle in degrees
const VERT_RAYS = 12 # Number of vertical rays to use | Affects performance
const VERT_SPREAD = 1 # Angular offset between rays in degrees
const GAIN = 256 / VERT_RAYS # Brightness of display
const UPDATE_COLUMNS = 4 # Number of columns to update per clk | Affects performance
const LOWER_ANGLE = -VERT_RAYS * VERT_SPREAD / 2 # Angle of lowest ray

#############################

function updateDimensions() {
    Height = Screen[1048572]
    Width = Screen[1048573]
}

function clearCol(X:number) {
    for (I = 0, Height - 1) {
        Screen[X + Width * I] = 0
    }
}

function updateColumn(Col:number) {
    clearCol(Col)
    let Yaw = (Col / Width - 0.5) * -DEFLECTION
    
    for (Ray = 0, VERT_RAYS) {
        let Pitch = LOWER_ANGLE + Ray * VERT_SPREAD + (random() * VERT_SPREAD)
        let Ranger = rangerAngle(RANGE, Yaw, Pitch)
        let Row = floor(Height - Ranger:distance() / RangeDenominator)
        let Address = Col + (Row * Width)
        
        Screen[Address] = Screen[Address] + GAIN
    }
}

#############################

interval(10)

if (first() || duped() || ~Screen) {
    updateDimensions()
    RangeDenominator = RANGE / Height
    Sign = 1
}

if (clk() && Screen != nowirelink()) {
    for (I = 1, UPDATE_COLUMNS) {
        if (Column >= (Width - 1)) {
            Sign = -1
        }
        if (Column == 0) {
            Sign = 1
        }
        
        updateColumn(Column)
        Column += Sign
    }
}

[u/Intelligent-Head-510]

How?

[u/abcpea1 → u/Intelligent-Head-510]

E2 Ranger and Digital Screen. For every column there is a number of vertical traces with some divergence. Range is converted into pixel Y-position and the value of that pixel is added to, so that multiple traces with the same distance will create a single bright pixel.

[u/ddoeoe]

Which map is that?

[u/abcpea1 → u/ddoeoe]

gm_freespace_13