Changes

Jump to: navigation, search

Technical information about Locomotive BASIC

12,352 bytes added, 18:11, 26 December 2022
/* BASIC tokens */ typo
The are two versions of Locomotive BASIC used in the Amstrad CPC and CPC+ computers. v1.0 is used by the CPC464, and v1.1 is used by the CPC664, CPC6128, CPC464+ and CPC6128+[[Category:Cpctech.org]]
== Passing parameters to a RSX (Resident System Extension) command or binary function =='''''This article originally came from Kevin Thackers' archive at [http://www.cpctech.org.uk http://www.cpctech.org.uk].'''''
A RSX (Resident System Extension) command is accessed through = Technical information about Locomotive BASIC with a "|" character prefix. e.g. The "DIR" RSX, is accessed by "|DIR". =
A binary function is accessed through The are two versions of Locomotive BASIC using used in the Amstrad CPC and CPC+ computers. v1.0 is used by the CPC464, and v1.1 is used by the "CALL" commandCPC664, CPC6128, CPC464+ and CPC6128+.
Passing a string parameter:== BASIC v1.0 only ==
BASIC v1.0 There is a$="A"region of memory between AC00-AC1B which is filled with RET instructions. The BASIC ROM calls the following locations:|DRIVEAC01,@a$AC04,AC07,AC0A,AC0D,AC10,AC13,AC16,AC19
BASIC v1It almost looks like these were used for debugging the ROM but were left in.1:
|DRIVE,"A"They can be used to implement new BASIC commands.
== Additional keywords and variables in BASIC v1.1 Passing parameters to a RSX (Resident System Extension) command or binary function ==
* A RSX (Resident System Extension) command is accessed through BASIC v1with a "|" character prefix.1 has e.g. The "DIR" RSX, is accessed by "|DIR". A binary function is accessed through BASIC using the following additional keywords:"CALL" command.
Both RSX and CALL commands work (are!) similar from the BASIC command line and invoke machine code - the only difference is:* COPYCHR$with the help of a RSX command you don't need to know the exact access address. You can pass up to 32 parameters with a CALL or RSX command. Possible parameters could be integer, floating points and strings. Just store the parameter into a variable:* CURSORPassing for integer:* DEC$:* FILL<pre>:* FRAMECALL &4000,32,34,&5E,&x10101010:* GRAPHICS|RSX-command,32,34,&5E,&x10101010:* MASK </pre>Passing for floating points<pre>@a!=43.375CALL or |RSX-command,@a!</pre>
* <br> Passing a string parameter: <br> BASIC v1.0 <pre>a$="A":|DRIVE,@a$</pre> BASIC v1.1 has the following additional predefined variables:<pre>|DRIVE,"A"</pre>or<pre>b$="test"CALL or |RSX-command,@b$</pre>
The parameters will be stored inside the range of Stack:* DERR <pre> A=n -------> MSB PARAM1 LSB PARAM1 MSB PARAM2 LSB PARAM2 ... ... ... MSB PARAMn IX+0 ------> LSB PARAMn</pre>with the help of that assembly code is it possible to find the parameters:<pre>ROUT1: CP x ;test register A if "x" parameters were given, e.g. x = 2 RET NZ ; if not exactly x parameters then do not execute RSX. LD L,(IX+0) LD H,(IX+1) ; HL = value of last parameter LD E,(IX+2) LD D,(IX+3) ; DE = value of next to last parameter ...</pre>A register holds the number of parameters. IX points to each parameter. IX+0/IX+1 is the last parameter. This happens because each parameter in order is pushed onto the stack and IX then points to the last parameter pushed. Each parameter is a 16-bit value.
If a parameter is a string, then IX holds the address of the string descriptor which point to a 3 byte block. The first byte of the string descriptor is the length. The next 2 bytes are an address that point to the string in memory. With the help of the variable container "@" it is also possible to get a result from an invoked mc-code back to basic.In this case the parameter contains the address of the integer, floating point or string. You can modify these to give the result.BASIC allocates the strings, so when you modify a string, do not write more characters than the original string. Hint: the first two bytes at the end of stack shows the internal return address from BASIC interpreter where it was executed. == Additional keywords and variables in BASIC v1.1 == #BASIC v1.1 has the following additional keywords: #*COPYCHR$ #*CURSOR #*DEC$ #*FILL #*FRAME #*GRAPHICS #*MASK #BASIC v1.1 has the following additional predefined variables: #*DERR <br> <br>  == Entering BASIC programs ==
A maximum of 255 characters can be entered for a single BASIC line.
This There are some rules for assigning names for variables:: - it is converted into not allowed to define a variable starting with a figure (the tokenised BASIC system expect then programming mode and interpret it as a program which is more compact than the line entered. The number): - no space (or 'under' as it is common today) between variable names are allowed: - BASIC keywords are converted into "tokens", or 1can't be used: -2 byte sequences different sign e.g.: a slash (doesn't depend which uniquely identify each keyworddirection), a 'minus' sign, a 'and' sign can't be used in a variable names: - after a dollar sign (for defining string variables) it is not allowed to use further signs: - different defining functions together are not allowed (e.g.use '%' together with '$')
== Structure of : - you can use 40 characters for a BASIC program ==variable name: - use ! for defining a REAL value variable (like the function DEFREAL but only for the assigned variable) > It's also possible to omit the exlamation mark because it's the default system declaration after powering on then CPC.: - use % for defining a INTEGER value variable (like the function DEFINT but only for the assigned variable): - use $ for defining a STRING variable (like the function DEFSTR but only for the assigned variable): - Minimum line number is 1. Maximum line number is 65535.
A This is converted into the tokenised BASIC program which is stored in a tokenised format. Here more compact than the line entered. The BASIC keywords are represented by 1 converted into "tokens", or 1-2 byte unique sequenceswhich uniquely identify each keyword.
Each line of the BASIC program has the form:<br>
{|{{Prettytable|width== Speeding up BASIC programs == To speed up BASIC programs following rules could help: 700px; font-size: 2em;}}|: - Avoid loops or a branching program structure if possible. Internally the operating system searches for the right line number always from the beginning of the program 'listing'Offset. Often recurring subroutines (if necessary) should be at the beginning of RAM to speed up things.: - Avoid the index variable after the <code>NEXT</code> command/statement (although it isn't a good program style): - Avoid spaces inside program code or remarks: - Put lots of statements as possible in ONE line: - Use variables instead of constants. A constand has always to be converted in a binary/digital format. A variable is already converted.: - Dimensioning at the beginning of the program: - Dimensioning your variables & pre-calculate: - Avoid AND/OR/XOR in IF-THEN statements. It's faster to write IF ... THEN (statement 1).. IF ... THEN (statement 2). == Structure of a BASIC program == A BASIC program is stored in a tokenised format. Here the keywords are represented by 1 or 2 byte unique sequences. Each line of the BASIC program has the form:  <br>  {||''Size''||''Description''border="1"
|-
|0||2||Length of line data in bytes (note 1)! Offset ! Size ! Description
|-
|2|0 |2||16-bit decimal integer Length of line number data in bytes (note 21)
|-
|42 |2 |n||BASIC 16-bit decimal integer line encoded into tokens number (note 32)
|-
| 4 |n+1||1||"0" the end of BASIC line marker encoded into tokens (note 43)
|-
| n+1
| 1
| "0" the end of line marker (note 4)
|}
'''<br> Notes:''' #This 16-bit value has two functions: if "0" it signals the end of the BASIC program. In this case, there is no furthur BASIC program lines or data, otherwise, this value defines the length of the tokenised BASIC program line in bytes, and includes the 2 bytes defining this value, the 2 bytes defining the program line number, and the end of line marker. This number is stored in little endian notation with low byte followed by high byte.#This 16-bit value defines the line number and exists if the length of line data in bytes is not "0". A line number is a integer number in the range 1-65535. This number is stored in little endian notation with low byte followed by high byte. #This data defines the tokenised BASIC program line and exists if the length of line data in bytes is not "0". The length is dependant on the BASIC program line contents. #This value defines the end of the tokenised BASIC line data and exists if the length of line data in bytes is not "0". The BASIC interpreter looks for this token during the processing of this line, and if found, will stop execution and continue to the next line.
* This 16-bit value has two functions::* if "0" it signals the end of the == BASIC program. In this case, there is no furthur BASIC program lines or data.:* otherwise, this value defines the length of the tokenised BASIC program line in bytes, and includes the 2 bytes defining this value, the 2 bytes defining the program line number, and the end of line marker. This number is stored in little endian notation with low byte followed by high byte. * This 16-bit value defines the line number and exists if the length of line data in bytes is not "0". A line number is a integer number in the range 1-65535. This number is stored in little endian notation with low byte followed by high byte.* This data defines the tokenised BASIC program line and exists if the length of line data in bytes is not "0". The length is dependant on the BASIC program line contents.* This value defines the end of the tokenised BASIC line data and exists if the length of line data in bytes is not "0". The BASIC interpreter looks for this token during the processing of this line, and if found, will stop execution and continue to the next line.tokens ==
== This table list the BASIC tokens ==with no prefix byte.
This table list the BASIC tokens with no prefix byte.<br>
{|{{Prettytable|width: 700px; font-size: 2em;}}|''Code (hexidecimal)''||''BASIC Keyword''border="1"
|-
|&00||end of tokenised line marker! Code<br>(hexidecimal) ! BASIC keyword
|-
|&01amp;00 ||":" statement seperatorend of tokenised line marker
|-
|&02amp;01 ||integer variable definition (defined with "%:" suffix)statement seperator
|-
|&03amp;02 ||string integer variable definition (defined with "$%" suffix)
|-
|&04amp;03 ||floating point string variable definition (defined with "!$" suffix)
|-
|&05amp;04 ||var?floating point variable definition (defined with "!" suffix)
|-
|&06|amp;05 |var?
|-
|&07|amp;06 |var?
|-
|&08|amp;07 |var?
|-
|&09|amp;08 |var?
|-
|&0a|amp;09 |var?
|-
|&0bamp;0a ||variable definition (no suffix)var?
|-
|&0c|amp;0b |variable definition (no suffix)
|-
|&0d|amp;0c |variable definition (no suffix)
|-
|&0eamp;0d ||number constant "0"variable definition (no suffix)
|-
|&0f|amp;0e |number constant "10"
|-
|&10|amp;0f |number constant "21"
|-
|&11|amp;10 |number constant "32"
|-
|&12|amp;11 |number constant "43"
|-
|&13|amp;12 |number constant "54"
|-
|&14|amp;13 |number constant "65"
|-
|&15|amp;14 |number constant "76"
|-
|&16|amp;15 |number constant "87"
|-
|&17|amp;16 |number constant "98"
|-
|&18|amp;17 |number constant "109"
|-
|&19amp;18 ||8-bit integer decimal valuenumber constant "10"
|-
|&1aamp;19 ||168-bit integer decimal value
|-
|&1b|amp;1a |16-bit integer binary decimal value (with "&X" prefix)
|-
|&1c|amp;1b |16-bit integer hexadecimal binary value (with "&H" or "&amp;X" prefix)
|-
|&1d|amp;1c |16-bit BASIC program line memory address pointerinteger hexadecimal value (with "&amp;H" or "&amp;" prefix)
|-
|&1e|amp;1d |16-bit integer BASIC program line numbermemory address pointer (see notes)
|-
|&1famp;1e ||floating point value16-bit integer BASIC line number
|-
|&20amp;1f ||" " (space) symbolfloating point value
|-
|&21amp;20 ||ASCII "!" (space) symbol
|-
|&22amp;21 ||quoted string valueASCII "!" symbol
|-
|&23-7bamp;22 ||ASCII printable symbolsquoted string value
|-
|&7camp;23-7b ||"|" symbol; prefix for RSX commandsASCII printable symbols
|-
|&80amp;7c ||AFTER"&#124;" symbol; prefix for RSX commands
|-
|&81amp;80 ||AUTOAFTER
|-
|&82amp;81 ||BORDERAUTO
|-
|&83amp;82 ||CALLBORDER
|-
|&84amp;83 ||CATCALL
|-
|&85amp;84 ||CHAINCAT
|-
|&86amp;85 ||CLEARCHAIN
|-
|&87amp;86 ||CLGCLEAR
|-
|&88amp;87 ||CLOSEINCLG
|-
|&89amp;88 ||CLOSEOUTCLOSEIN
|-
|&8aamp;89 ||CLSCLOSEOUT
|-
|&8bamp;8a ||CONTCLS
|-
|&8camp;8b ||DATACONT
|-
|&8damp;8c ||DEFDATA
|-
|&8eamp;8d ||DEFINTDEF
|-
|&8famp;8e ||DEFREALDEFINT
|-
|&90amp;8f ||DEFSTRDEFREAL
|-
|&91amp;90 ||DEGDEFSTR
|-
|&92amp;91 ||DELETEDEG
|-
|&93amp;92 ||DIMDELETE
|-
|&94amp;93 ||DRAWDIM
|-
|&95amp;94 ||DRAWRDRAW
|-
|&96amp;95 ||EDITDRAWR
|-
|&97amp;96 ||ELSEEDIT
|-
|&98amp;97 ||ENDELSE
|-
|&99amp;98 ||ENTEND
|-
|&9aamp;99 ||ENVENT
|-
|&9bamp;9a ||ERASEENV
|-
|&9camp;9b ||ERRORERASE
|-
|&9damp;9c ||EVERYERROR
|-
|&9eamp;9d ||FOREVERY
|-
|&9famp;9e ||GOSUB, GO SUBFOR
|-
|&a0amp;9f ||GOTOGOSUB, GO TOSUB
|-
|&a1amp;a0 ||IFGOTO, GO TO
|-
|&a2amp;a1 ||INKIF
|-
|&a3amp;a2 ||INPUTINK
|-
|&a4amp;a3 ||KEYINPUT
|-
|&a5amp;a4||LETKEY
|-
|&a6amp;a5 ||LINELET
|-
|&a7amp;a6 ||LISTLINE
|-
|&a8amp;a7 ||LOADLIST
|-
|&a9amp;a8 ||LOCATELOAD
|-
|&aaamp;a9 ||MEMORYLOCATE
|-
|&abamp;aa ||MERGEMEMORY
|-
|&acamp;ab ||MID$MERGE
|-
|&adamp;ac ||MODEMID$
|-
|&aeamp;ad ||MOVEMODE
|-
|&afamp;ae ||MOVERMOVE
|-
|&b0amp;af ||NEXTMOVER
|-
|&b1amp;b0 ||NEWNEXT
|-
|&b2amp;b1 ||ONNEW
|-
|&b3|amp;b2 |ON BREAK
|-
|&b4amp;b3 ||ON ERROR GOTO, ON ERROR GO TOBREAK
|-
|&b5amp;b4 ||SQON ERROR GOTO, ON ERROR GO TO
|-
|&b6amp;b5 ||OPENINON SQ
|-
|&b7amp;b6 ||OPENOUTOPENIN
|-
|&b8amp;b7 ||ORIGINOPENOUT
|-
|&b9amp;b8 ||OUTORIGIN
|-
|&baamp;b9 ||PAPEROUT
|-
|&bbamp;ba ||PENPAPER
|-
|&bcamp;bb ||PLOTPEN
|-
|&bdamp;bc ||PLOTRPLOT
|-
|&beamp;bd ||POKEPLOTR
|-
|&bfamp;be ||PRINTPOKE
|-
|&c0amp;bf ||"'" symbol (same function as REM keyword)PRINT
|-
|&c1amp;c0 ||RAD"'" symbol (same function as REM keyword)
|-
|&c2amp;c1 ||RANDOMIZERAD
|-
|&c3amp;c2 ||READRANDOMIZE
|-
|&c4amp;c3 ||RELEASEREAD
|-
|&c5amp;c4 ||REMRELEASE
|-
|&c6amp;c5 ||RENUMREM
|-
|&c7amp;c6 ||RESTORERENUM
|-
|&c8amp;c7 ||RESUMERESTORE
|-
|&c9amp;c8 ||RETURNRESUME
|-
|&caamp;c9 ||RUNRETURN
|-
|&cbamp;ca ||SAVERUN
|-
|&ccamp;cb ||SOUNDSAVE
|-
|&cdamp;cc ||SPEEDSOUND
|-
|&ceamp;cd ||STOPSPEED
|-
|&cfamp;ce ||SYMBOLSTOP
|-
|&d0amp;cf ||TAGSYMBOL
|-
|&d1amp;d0 ||TAGOFFTAG
|-
|&d2amp;d1 ||TROFFTAGOFF
|-
|&d3amp;d2 ||TRONTROFF
|-
|&d4amp;d3 ||WAITTRON
|-
|&d5amp;d4 ||WENDWAIT
|-
|&d6amp;d5 ||WHILEWEND
|-
|&d7amp;d6 ||WIDTHWHILE
|-
|&d8amp;d7 ||WINDOWWIDTH
|-
|&d9amp;d8 ||WRITEWINDOW
|-
|&daamp;d9 ||ZONEWRITE
|-
|&dbamp;da ||DIZONE
|-
|&dcamp;db ||EIDI
|-
|&ddamp;dc ||FILL (v1.1)EI
|-
|&deamp;dd ||GRAPHICS FILL (v1.1)
|-
|&dfamp;de ||MASK GRAPHICS (v1.1)
|-
|&e0amp;df ||FRAME MASK (v1.1)
|-
|&e1amp;e0 ||CURSOR FRAME (v1.1)
|-
|&e2|amp;e1 |CURSOR (note 2v1.1)
|-
|&e3amp;e2 ||ERL(note 2)
|-
|&e4amp;e3 ||FNERL
|-
|&e5amp;e4 ||SPCFN
|-
|&e6amp;e5 ||STEPSPC
|-
|&e7amp;e6 ||SWAPSTEP
|-
|&e8amp;e7 ||(note 2)SWAP
|-
|&e9|amp;e8 |(note 2)
|-
|&eaamp;e9 ||TAB(note 2)
|-
|&ebamp;ea ||THENTAB
|-
|&ecamp;eb ||TOTHEN
|-
|&edamp;ec ||USINGTO
|-
|&eeamp;ed ||> (greater than)USING
|-
|&efamp;ee ||= &gt; (equalgreater than)
|-
|&f0amp;ef ||>=, > =, => (greater or equal)
|-
|&f1amp;f0 ||< &amp;gt=, &gt;&nbsp;=, =&gt; (less thangreater or equal)
|-
|&f2amp;f1 ||<>, < > &lt; (not equalless than)
|-
|&f3amp;f2 ||=<, <=&lt;&amp;gt, < = &lt;&nbsp;&gt; (less than or not equal)
|-
|&f4amp;f3 ||+ =&lt;, &lt;=, &lt;&nbsp;= (additionless than or equal)
|-
|&f5amp;f4 ||- + (subtraction or unary minusaddition)
|-
|&f6amp;f5 ||* - (multiplicationsubtraction or unary minus)
|-
|&f7amp;f6 ||/ * (divisionmultiplication)
|-
|&f8amp;f7 ||^ / (x to the power of ydivision)
|-
|&f9amp;f8 ||\ ^ (integer divisionx to the power of y)
|-
|&faamp;f9 ||AND\ (integer division)
|-
|&fbamp;fa ||MODAND
|-
|&fcamp;fb ||ORMOD
|-
|&fdamp;fc ||XOROR
|-
|&feamp;fd ||NOTXOR
|-
|&ffamp;fe ||(prefix for additional keywords)NOT
|-
| &amp;ff
| (prefix for additional keywords)
|}
<br> Notes:
''Notes:''*The &amp;ff code is used as a prefix for more keywords. See the table below for the list of keywords using this prefix. *&amp;e2,&amp;e8 and &amp;e9 are not used *&amp;7c ("|") is a character prefix used to identify an RSX command. e.g. "|DIR".
* The &ff code An RSX is used as encoded in a prefix for more keywords. See BASIC program using the table below for the list of keywords using this prefix.* &e2,&e8 and &e9 are not used* &7c ("|") is a character prefix used to identify a RSX command.following structure:
e.g. {| border="1"|-! Offset ! Count ! Description|-| 0 | 1 |DIR"&#124;" character prefix|-| 1 | 1 | 8-bit byte offset to tokens following RSX name.|-| 2 | x | RSX name. (Last character of name has bit 7 set to "1", all other characters have bit 7 set to "0")|}
An RSX *This token identifies a integer (16-bit) number. The two bytes following this token is encoded in the number, stored low byte then high byte. e.g. &amp;1a,&amp;2d,&amp;00 represents the integer number "&amp;002d"="45". *This token (&amp;0B) is changed at run-time to &amp;0D *This token identifies a BASIC integer variable. 02,00,00,var name offset to number in program using setup when program RUN. The variable name is stored directly, with bit 7 of the last character set. *This token identifies a string variable. offset to string in program string stored AS IS with quotes around it. *This token identifies a floating point number. Immediatly following structure:the token are 5 bytes which define the number.
{| border="1"|-! Offset ! Count ! Description |-| 0 1 "|" character prefix 1 1 8-bit byte offset to tokens following RSX name. 2 x RSX name. | &amp;1f (Last character of name has bit 7 set to "note 1", all other characters have bit 7 set to "0")* This token identifies a integer (16|-bit) number. The two bytes following this token is the number, stored low byte then high byte. e.g. &19,&2d,&00 represents the integer number "&002d"="45".* This token (&0B) is changed at run-time to &0D| 1 * This token identifies a integer variable. 02,00,00,var name offset to number in program setup when program RUN. The variable name is stored directly, with bit 7 of the last character set.| 5 * This token identifies a string variable. offset to string in program string stored AS IS with quotes around it.* This token identifies a floating | Floating point number. Immediatly following the token are 5 bytes which define the number.(note 2)|}
Offset Count Description 0 1 &1f (note 1) 1 5 Floating point number (note 2) 1. *#This byte is the BASIC token identifying a floating point number 2. *#These 5 bytes define the floating point number. * The space symbol is used as a command seperator * Variable definitions: o **The variable definition has the following structure: Offset Count Description 0 1 Token defining variable type 2 2 16-bit Byte offset to variable value within tokenised BASIC program. 4 x Variable name
The 16{| border="1"|-bit byte offset is initially set to 0, but is setup when the program is RUN. The offset is stored in little! Offset ! Count ! Description|-endian format, with low byte followed by high byte. o The token byte defines the variable type (i.e. string, floating point, integer) and the suffix ("$", none and "%").| 0 o The variable name is stored in the program, with bit 7 of the last character set to "| 1". e.g. The | Token defining variable named "abc" will be encoded as 'a','b','c'+&80 type * String values:|- o Each string value is prefixed with &22 token.| 2 o All strings must be enclosed by double quote symbols ("). This symbols define the start and end of the string value.| 2 o The string value can contain any symbol except the quote ("). i.e. 0-&21, and &23-&ff can be used. * After running a program, Tokens of "1d" with | 16-bit Byte offset to variable value within tokenised BASIC program line pointers are changed to token "1e" with the 16.|-bit memory address of the BASIC line number in memory. | 4 | x | Variable name|}
This table list <br> The 16-bit byte offset is initially set to 0, but is setup when the BASIC tokens program is RUN. The offset is stored in little-endian format, with a &ff prefix low byte followed by high byte.
Code**The token byte defines the variable type (hexidecimali.e. string, floating point, integer) BASIC keyword&00 ABS&01 ASC&02 ATN&03 CHRand the suffix ("$", none and "%"). **The variable name is stored in the program, with bit 7 of the last character set to "1". e.g. The variable named "abc" will be encoded as 'a','b','c'+&04 CINTamp;80 &05 COS*String values: **Each string value is prefixed with &06 CREALamp;22 token. **All strings must be enclosed by double quote symbols (&07 EXP&08 FIX&09 FRE&0a INKEY&0b INP&0c INT&0d JOY&0e LEN&0f LOG&10 LOG10&11 LOWER$&12 PEEK&13 REMAIN&14 SGN&15 SIN&16 SPACE$&17 SQ&18 SQR&19 STR$&1a TAN&1b UNT&1c UPPER$&1d VAL (note 2amp;quot)&40 EOF&41 ERR&42 HIMEM&43 INKEY$&44 PI&45 RND&46 TIME&47 XPOS&48 YPOS&49 DERR (v1.1)This symbols define the start and end of the string value. **The string value can contain any symbol except the quote (note 3")&71 BIN$&72 DEC$ (v1.1)i.e. 0-&73 HEX$amp;21, and &74 INSTRamp;23-&75 LEFT$&76 MAX&77 MIN&78 POS&79 RIGHT$&7a ROUND&7b STRING$&7c TEST&7d TESTR&7e COPYCHR$ (v1amp;ff can be used.1)&7f VPOS (note 4)
NOTES:*After running a program, Tokens of "1d" with 16-bit BASIC program line pointers are changed to token "1e" with the 16-bit memory address of the BASIC line number in memory.
* These codes are prefixed by <br> This table list the BASIC tokens with a &FFamp;ff prefix byte. e.g. The keyword "ABS" is stored as the following sequence:
&FF,&00<br>
* Codes {| border="1"|-! Code<br>(hexidecimal) ! BASIC keyword|-| &1e..amp;00 | ABS|-| &amp;01 | ASC|-| &amp;02 | ATN|-| &amp;03 | CHR$|-| &amp;04 | CINT|-| &amp;05 | COS|-| &amp;06 | CREAL|-| &amp;07 | EXP|-| &amp;08 | FIX|-| &amp;09 | FRE|-| &amp;0a | INKEY|-| &amp;0b | INP|-| &amp;0c | INT|-| &amp;0d | JOY|-| &amp;0e | LEN|-| &amp;0f | LOG|-| &amp;10 | LOG10|-| &amp;11 | LOWER$|-| &amp;12 | PEEK|-| &amp;13 | REMAIN|-| &amp;14 | SGN|-| &amp;15 | SIN|-| &amp;16 | SPACE$|-| &amp;17 | SQ|-| &amp;18 | SQR|-| &amp;19 | STR$|-| &amp;1a | TAN|-| &amp;1b | UNT|-| &amp;1c | UPPER$|-| &amp;1d | VAL|-| &nbsp; | (note 2)|-| &amp;40 | EOF|-| &amp;41 | ERR|-| &amp;42 | HIMEM|-| &amp;43 | INKEY$|-| &amp;44 | PI|-| &amp;45 | RND|-| &amp;46 | TIME|-| &amp;47 | XPOS|-| &amp;48 | YPOS|-| &amp;49 | DERR (v1.1)|-| &3f inclusive are not usednbsp; * Codes | (note 3)|-| &4a..amp;71 | BIN$|-| &amp;72 | DEC$ (v1.1)|-| &6f inclusive are not usedamp;73 * Codes | HEX$|-| &80..amp;74 | INSTR|-| &amp;75 | LEFT$|-| &amp;76 | MAX|-| &amp;77 | MIN|-| &amp;78 | POS|-| &amp;79 | RIGHT$|-| &amp;7a | ROUND|-| &amp;7b | STRING$|-| &amp;7c | TEST|-| &amp;7d | TESTR|-| &amp;7e | COPYCHR$ (v1.1)|-| &ff inclusive are not usedamp;7f | VPOS|-| &nbsp; | (note 4)|}
== Floating Point data definition ==<br> NOTES:
A floating point number represents a number with both an integer and fractional part*These codes are prefixed by &amp;FF.e.g. The keyword "ABS" is stored as the following sequence: <pre>&amp;FF,&amp;00</pre> *Codes &amp;1e...&amp;3f inclusive are not used *Codes &amp;4a...&amp;6f inclusive are not used *Codes &amp;80...&amp;ff inclusive are not used
In Amstrad BASIC, *When a floating point number BASIC program is stored in basememory, the BASIC ROM can replace "16-2 in a normalized form:bit BASIC program line number" tokens with "16-bit BASIC program line memory address pointer".
1 x 2<exponent>When a program is loaded or saved, there will only be "16-bit BASIC program line number" tokens followed by a 16-bit number of the line.
The representation uses 5 bytes and When a program is stored using running, BASIC will replace the "16-bit BASIC program line number" with the "16-bit BASIC program line memory address pointer" token, and replace the 16-bit line number with the memory address of the following structure:start of that line.
Byte 0 1 2 3 4Bit 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0 7 6 5 4 3 2 1 0Function mantissa (bits 23-16) mantissa (bits 15-8) mantissa (bits 7-0) sign mantissa (bits 30-24) exponentIt does this to avoid having to lookup the address of the line each time.
=== Sign ===* When a REM or ' is seen, the characters following it are output directly (i.e. the bytes are not tokenized) until the end of line or a ':' is seen.
The sign * When a BASIC program is represented by bit 7 listed each line is converted to a string (this includes the line number and the tokens converted to their strings). There is a maximum length for this string of byte 3256 characters. This means that if the BASIC line is LISTed or EDITed, then the line will be displayed incorrectly with missing characters on the end. This is also noticed if you have a "10-liner" program that packs as much BASIC as possible into each line and renumber it so the line number has more digits.
The value of the sign bit indicates the sign of the floating point number.== Floating Point data definition ==
* If the sign bit is "1", then the A floating point number is negative.* If the sign bit is "0", then the represents a number is positivewith both an integer and fractional part.
=== Mantissa ===<br> In Amstrad BASIC, a floating point number is stored in base-2 in a normalized form: 1 x 2<sup>&lt;exponent&gt;</sup> The representation uses 5 bytes and is stored using the following structure:
The mantissa holds the normalized number. The exponent is manipulated so that the most significant bit is always 1. Since it is always 1, it is not stored. It's value is implied by the representation.<br>
{| border="1"|-! Byte ! colspan="8" | 0 ! colspan= Exponent "8" | 1 ! colspan="8" | 2 ! colspan="8" | 3 ! colspan="8" | 4|-! Bit ! 7 ! 6 ! 5 ! 4 ! 3 ! 2 ! 1 ! 0 ! 7 ! 6 ! 5 ! 4 ! 3 ! 2 ! 1 ! 0 ! 7 ! 6 ! 5 ! 4 ! 3 ! 2 ! 1 ! 0 ! 7 ! 6 ! 5 ! 4 ! 3 ! 2 ! 1 ! 0 ! 7 ! 6 ! 5 ! 4 ! 3 ! 2 ! 1 ! 0|-| Function | colspan="8" | (LSB) mantissa (bits 31-24) | colspan="8" | mantissa (bits 23-16) | colspan="8" | mantissa (bits 15-8) | colspan="1" | sign | colspan="7" | (MSB) mantissa (bits 7-0) | colspan="8" | exponent|}
The exponent is 8-bit and is stored in byte 4.=== Sign ===
It The sign is stored with a bias represented by bit 7 of 128byte 3. The value of the sign bit indicates the sign of the floating point number.
#* 128-255 are positive exponentsIf the sign bit is "1",then the number is negative. #* If the sign bit is "0-127 are negative exponents", then the number is positive.
To obtain the signed exponent, you must subtract 128 from the stored exponent.=== Mantissa ===
The minimum mantissa holds the normalized number. The exponent is 0 and this describes a number of 2^-127manipulated so that the most significant bit is always 1. Since it is always 1, it is not stored. It's value is implied by the representation.
The maximum exponent is 255 and this describes a number of 2^128.=== Exponent ===
== BASIC floatingThe exponent is 8-point/real variables ==bit and is stored in byte 4. It is stored with a bias of 128.
A floating point (real) variable describes a number with integer and fractional parts#*128-255 are positive exponents, #*0-127 are negative exponents.
* A integer variable To obtain the signed exponent, you must subtract 128 from the stored exponent. The minimum exponent is defined with 0 and this describes a "!" character postfixnumber of 2^-127. The maximum exponent is 255 and this describes a number of 2^128.
e.g.=== BASIC Display of Floating point numbers ===
* Numbers are displayed to 9 decimal places.* If the number doesn't have a! = 3fractional part (e.g. .0) then the fractional part is not displayed.141592654* Trailing zeros (zero digits after the last digit in the fraction) are not displayed* The value is rounded in the following way for display:
* A real number uses If the 10th fractional digit is 5 bytes of memory as storageor above, then the number is rounded up. The format If the 10th fractional digit is described above4 or below, then the number is rounded down.* The address of a real variable can be found in BASIC by:e.g. 0.1234567891 is displayed as 0.123456789 0.1234567895 is displayed as 0.12345679
=== floating point example in RAM by MaV ===
 
The initial figure = 43.375.
An example in BASIC:
<pre>
a!=43.375
READY
PRINT a!
43.375
PRINT @a!
374
FOR I=0 TO 4:PRINT HEX$(PEEK(374+I),2);:NEXT I
0000802D86
</pre>
the result for better readability:<br>
'''00 00 80 2D 86'''<br>
The first byte contains the least significant bits of the mantissa, and every following byte up to the fourth byte contain the bits following the first in significance and in exactly that order!
Where "a" should be replaced with That means that you have to turn around the name of first four bytes if you want to read the variablemantissa correctly:2D800000or0010.1101.1000.0000.0000.0000.0000.0000in binary (the stops are inserted for better readability).
== BASIC integer variables ==Now the highest significant bit here is 0, so the number is positive.What's more, you need to clear that bit and substitute the implied highest bit (see description in the link), which is always 1 (regardless of the deleted sign bit!!!).Thus you get:AD800000or1010.1101.1000.0000.0000.0000.0000.0000in binary.
A integer variable describes a whole The mantissa has an implied decimal point before the number. Since the number is 2^32 bits (i.e. a number without any fractional part4 bytes) long you have to divide by 2^32 to get the proper decimal representation.
NOTES:AD800000 (hex) = 2910846976 (dec)
* A integer variable is defined with a "%" character postfix2910846976 / 2^32 = 0.677734375
e.gThe mantissa in a decimal representation is: 0.677734375
a% = 3Now, the last byte contains the exponent: 86 (hex) or 134 (dec). You need to subtract 128 to get the real exponent, the highest bit tells you that the exponent is positive (1) or negative (0). Your exponent is 6.
0.677734375 * A integer variable has a range of -32768 to 32767* A integer variable always uses two bytes of memory as storage with the following format:2^6 = 43.375
Offset Length Description'''Another example:'''<br>0 2 Integer PI is represented in memory as:<br>'''A2 DA 0F 49 82'''<br>The mantissa is<br>490FDAA2 (highest significant bit is zero => numberis positive)The exponent is<br>82 (=positive mantissa, value=2 thus multiply mantissa with 2^2)<br>
* The address of Delete the integer variable can be found in BASIC bysign bit (which is 0 anyway), and then add the implied 1 bit:<br>C90FDAA2 (hex) = 3373259426 (dec) = 1100.1001.0000.1111.1101.1010.1010.0010 (bin)<br><br>
PRINT @a%Calculate the decimal representation of the mantissa:<br>3373259426 / 2^32 = 0,7853981633670628070831298828125<br><br>
where "a" should be replaced with Then add the name of the variable.exponent (82h - 80h = 2 thus 2^2)<br>0,7853981633670628070831298828125 * 2^2 = 3,14159265346825122833251953125<br><br>
== BASIC string variables ==Voilà! The internal representation of the number PI on the CPC is: 3,14159265346825122833251953125<br><br>
A string is a variable which contains a group of characters.
NOTESIf you compare to a (more) correct representation of PI, you'll see that the CPC is correct up to the 9th decimal place:<br><br>
* A string variable is defined in BASIC with a "$" character postfix.
eCPC:<br>3.14159265346825122833251953125<br>more correctly:<br>3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986..g.
a$ = "hello"= BASIC floating-point/real variables ==
* A string floating point (real) variable is described internally by describes a "string descriptor block" number with integer and fractional parts. The biggest figure which has the following structure:can be stored correctly in RAM by a variable is 2^32-1 = 4294967295.
#*A integer variable is defined with a "!" character postfix. e.g. <pre>a! = 3.141592654</pre> #*A real number uses 5 bytes of memory as storage. The format is described above. #*The address of a real variable can be found in BASIC by: <pre>PRINT @a!</pre> Where "a" should be replaced with the name of the variable.  <br> == BASIC integer variables == A integer variable describes a whole number. i.e. a number without any fractional part.  <br> NOTES:  #*A integer variable is defined with a "%" character postfix. e.g. <pre>a% = 3</pre> #*A integer variable has a range of -32768 to 32767 #*A integer variable always uses two bytes of memory as storage with the following format: {| border="1"|-! Offset ! Length ! Description |-| 0 | 2 | Integer number|} #*The address of the integer variable can be found in BASIC by: <pre>PRINT @a%</pre> where "a" should be replaced with the name of the variable.  == BASIC string variables == A string is a variable which contains a group of characters.  <br> NOTES:  #**A string variable is defined in BASIC with a "$" character postfix. e.g. <pre>a$ = "hello"</pre> #**A string variable is described internally by a "string descriptor block" which has the following structure: {| border="1 "|-! Offset ! Length ! Description|-| 0 | 1 | Length of string in bytes/characters |-| 1 | 2 | Location of start of string|}
#** The address of the "string descriptor block" for the string variable can be found in BASIC by typing:<pre>PRINT @a$</pre>
PRINT @replacing "a$" with the name of the string variable.
replacing "#**A string uses a$minimum of 3 bytes of storage (a 0 character length string) and a maximum of 258 bytes of storage. 3 bytes are used by the " with string descriptor block") #**A string variable can contain any ASCII character code in the name range 0-255. #**A string variable can store a minimum of 0 characters and a maximum of 255 characters. #**The length of the string variablein characters is defined in the string descriptor block. The string does not have a termination character.
* A string uses a minimum of 3 bytes of storage (a 0 character length string) and a maximum of 258 bytes of storage. 3 bytes are used by the "string descriptor block")[[Category:Programming]]* A string variable can contain any ASCII character code in the range 0-255.[[Category:BASIC| ]]* A string variable can store a minimum of 0 characters and a maximum of 255 characters.[[Category:CPC Internal Components]]* The length of the string in characters is defined in the string descriptor block. The string does not have a termination character.[[Category:Operating System| ]][[Category:Software]][[Category:Programming software| ]]
903
edits