added raden launch

This commit is contained in:
2025-11-19 12:52:55 -05:00
parent 86ade33bef
commit 533ec9d520
28 changed files with 2412 additions and 0 deletions

48
library/lib_num_to_str.ks Normal file
View File

@@ -0,0 +1,48 @@
// lib_num_to_str.ks can be used to to format a number in a string of constant length for use in a display.
// Copyright © 2015,2023 KSLib team
// Lic. MIT
@LAZYGLOBAL off.
@CLOBBERBUILTINS off.
function num_to_str {
parameter
number, //input number
ip, //number of digits before the decimal point.
dp. //number of decimal places
local string is "".
local padder is "".
local absNumber is abs(number).
local index is ip-1.
local firstNum is false.
until firstNum or index = 0 { // stop adding spacers when the first number is found
if mod(floor(absNumber/10^index),10) = 0 {
set padder to padder +" ".
}
else {
set firstNum to true.
}
set index to index-1.
}.
if dp = 0 {
set string to string +round(absNumber).
}.
else {
// set index to index-1.
set string to string +floor(absNumber).
set index to -1.
set string to string +".".
until index = -dp {
set string to string +mod(floor(absNumber/10^index),10).
set index to index-1.
}.
set string to string + mod(round(absNumber/10^index),10).
}.
if number < 0 {
set string to padder +"-" +string.
}
else {
set string to padder +" " +string.
}.
return string.
}.