Upload to chd
This commit is contained in:
@@ -2,7 +2,7 @@
|
|||||||
"name": "format-4690",
|
"name": "format-4690",
|
||||||
"displayName": "format-4690",
|
"displayName": "format-4690",
|
||||||
"description": "Formatter for 4690 BASIC",
|
"description": "Formatter for 4690 BASIC",
|
||||||
"version": "0.0.2",
|
"version": "1.0.0",
|
||||||
"repository": {
|
"repository": {
|
||||||
"url": "https://git.kidj.dev/IvanovichRU/4690-BASIC-Language-Support.git"
|
"url": "https://git.kidj.dev/IvanovichRU/4690-BASIC-Language-Support.git"
|
||||||
},
|
},
|
||||||
|
|||||||
12
static/4690functions.BAS
Normal file
12
static/4690functions.BAS
Normal file
@@ -0,0 +1,12 @@
|
|||||||
|
!! Función `valor absoluto`, devuelve un `REAL` que
|
||||||
|
!! contiene el valor absoluto de la expresión numérica
|
||||||
|
!! `NUM%`.
|
||||||
|
FUNCTION ABS(NUM%)
|
||||||
|
REAL ABS
|
||||||
|
REAL NUM%
|
||||||
|
END FUNCTION
|
||||||
|
|
||||||
|
FUNCTION ASC(STR$)
|
||||||
|
INTEGER*2 ASC
|
||||||
|
STRING STR$
|
||||||
|
END FUNCTION
|
||||||
Reference in New Issue
Block a user