Amatsugu/kOS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added raden launch

Browse Source
This commit is contained in:
Amatsugu
2025-11-19 12:52:55 -05:00
parent 86ade33bef
commit 533ec9d520
28 changed files with 2412 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

89
library/lib_seven_seg.ks Normal file
View File

@@ -0,0 +1,89 @@
// lib_seven_seg.ks prints a seven segment display on the terminal showing the input value at the location specified.
// Copyright © 2015,2019 KSLib team
// Lic. MIT
function seven_seg {
parameter
num,
col,
row.
if num:istype("scalar") {
if num > -1 {
if num < 5 {
if num < 2 {
if num < 1 {
print "_" at (col+1,row).
print "| |" at (col,row+1).
print "|_|" at (col,row+2).
} else {
print " " at (col+1,row).
print " |" at (col,row+1).
print " |" at (col,row+2).
}
} else {
if num < 4 {
if num < 3 {
print "_" at (col+1,row).
print " _|" at (col,row+1).
print "|_ " at (col,row+2).
} else {
print "_" at (col+1,row).
print " _|" at (col,row+1).
print " _|" at (col,row+2).
}
} else {
print " " at (col+1,row).
print "|_|" at (col,row+1).
print " |" at (col,row+2).
}
}
} else {
if num < 7 {
if num < 6 {
print "_" at (col+1,row).
print "|_ " at (col,row+1).
print " _|" at (col,row+2).
} else {
print "_" at (col+1,row).
print "|_ " at (col,row+1).
print "|_|" at (col,row+2).
}
} else {
if num < 9 {
if num < 8 {
print "_" at (col+1,row).
print " |" at (col,row+1).
print " |" at (col,row+2).
} else {
print "_" at (col+1,row).
print "|_|" at (col,row+1).
print "|_|" at (col,row+2).
}
} else if num < 10 {
print "_" at (col+1,row).
print "|_|" at (col,row+1).
print " |" at (col,row+2).
} else {
hudtext("ERROR: [lib_seven_seg.ks] number: " + num +" is out of bounds high" , 10, 2, 30, RED, FALSE).
}
}
}
} else {
hudtext("ERROR: [lib_seven_seg.ks] number: " + num +" is out of bounds low" , 10, 2, 30, RED, FALSE).
}
// special cases
} else if num:ISTYPE("string") {
if num = "b" { //"b" = blank
print " " at (col+1,row).
print " " at (col,row+1).
print " " at (col,row+2).
} else if num = "-" { //"-" = minus
print " " at (col+1,row).
print " _ " at (col,row+1).
print " " at (col,row+2).
} else {// else if num = // add more special cases here.
hudtext("ERROR: [lib_seven_seg.ks] unrecognized string: " +num, 10, 2, 30, RED, FALSE).
}
} else {
hudtext("ERROR: [lib_seven_seg.ks] unrecognized type: " +num:typename, 10, 2, 30, RED, FALSE).
}
}