Add files via upload

This commit is contained in:
Андрей 2021-03-29 20:43:07 +04:00 committed by GitHub
parent 64c6352265
commit 35131ba393
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
90 changed files with 1738 additions and 0 deletions
Examples/Include_Files

View file

@ -0,0 +1,13 @@
REM
REM ==================================================
REM Please make sure the Include Files Enabled setting
REM has been enabled before trying to run this program
REM ==================================================
REM
#include "Library.bas"
SUB MAIN
PRINT "100 degC = " + STR$(DegF(100.0)) + " degF"
PRINT "212 degF = " + STR$(DegC(212.0)) + " degC"
END SUB

View file

@ -0,0 +1,7 @@
FUNCTION DegF(DegC AS DOUBLE) AS DOUBLE
DegF = DegC * 9.0 / 5.0 + 32.0
END FUNCTION
FUNCTION DegC(DegF AS DOUBLE) AS DOUBLE
DegC = (DegF - 32.0) * 5.0 / 9.0
END FUNCTION