git @ Cat's Eye Technologies Strelnokoff / master eg / modulus.skf
master

Tree @master (Download .tar.gz)

modulus.skf @masterraw · history · blame

1
2
3
4
5
6
REM TESTING MODULUS IN STRELNOKOFF
REM CHRIS PRESSEY JANUARY 2024
X = 43
Y = 7
T = (X > 0) * (Y > 0) * (X - ((X / Y) * Y))
T = (T > 0) * ((PRINT CHAR (T + '0')) - (T + '0'))