Click above to get retro games delivered to your door ever month!

##############################################################################
###+---+######################################################################
#+-| @ |-------------------------------------------------------------------+##
#| +---+ The @ command positions the screen cursor in a specific location. |##
#|       Optional forms of the command allow for displaying the results of |##
#|       an expression to the screen, clearing the screen, initializing    |##
#|       the READ command for user input to a variable, installing menu    |##
#|       prompts and drawing boxes.                                        |##
#+-------------------------------------------------------------------------+##
##############################################################################
##############################################################################
#+--| Syntax |---------------------------------------------------------+######
#|     @<Int-exp,Int-exp>                                              |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> ?? <C-exp>                                   |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> SAY <C-exp> [PICTURE <C-exp>                 |######
#|     || FUNCTION <C-exp> ]                                           |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> GET <C-exp> [PICTURE <C-exp>                 |######
#|     || FUNCTION <C-exp>] [VALID <L-exp>] [FILTER <Uint-exp>]        |######
#|     [ ID <Uint-exp> ]                                               |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> PROMPT <C-exp> [MESSAGE <C-exp>]             |######
#|     [ ID <Uint-exp> ]                                               |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> CLEAR                                        |######
#|                                                                     |######
#|     @<Int-exp,Int-exp> TO <Int-exp>,<Int-exp> [CLEAR || DOUBLE]     |######
#|                                                                     |######
#+---------------------------------------------------------------------+######
##############################################################################
##############################################################################
########+---| Description |------------------------------------------+########
########| The @ command can be expressed in many forms.  Its primary |########
########| function is moving the cursor to a row and column position |########
########| on the monitor, then allowing either:                      |########
########|                                                            |########
########|         *  a ??.                                           |########
########|         *  a SAY.                                          |########
########|         *  a SAY and a GET.                                |########
########|         *  a GET.                                          |########
########|         *  a PROMPT.                                       |########
########|         *  clearing the screen from the cursor position.   |########
########|         *  drawing or clearing boxes from the screen.      |########
########+------------------------------------------------------------+########
##############################################################################
##############################################################################
#########+--| Example 1 |-------------------------------------------+#########
#########| *    Locate cursor at row 11, column 35.                 |#########
#########| *    This does NOT clear to the end of line.             |#########
#########|                                                          |#########
#########| @ 11,35                                                  |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 2 |-------------------------------------------+#########
#########| *    Use either @S function or a template to             |#########
#########| *    control the width of the output string.             |#########
#########|                                                          |#########
#########| @ 1,1 SAY "What will be printed?" PICTURE "@S6"          |#########
#########| @ 2,1 SAY "What will be printed?" PICTURE "XXXXBBB"      |#########
#########|                                                          |#########
#########| Output:                                                  |#########
#########| What w                                                   |#########
#########| WhatBBB                                                  |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 3 |-------------------------------------------+#########
#########| *    Numeric values may be filtered using the            |#########
#########| *    @C @X or @(  functions                              |#########
#########| *    Note: functions may be combined                     |#########
#########|                                                          |#########
#########| dbl_num = -5.55                                          |#########
#########| @ 1,1 SAY "1234567890"                                   |#########
#########| @ 2,1 SAY dbl_num PICTURE "@CX"                          |#########
#########| dbl_num = 5.55                                           |#########
#########| @ 3,1 SAY dbl_num PICTURE "@CX"                          |#########
#########|                                                          |#########
#########| Output:                                                  |#########
#########| 1234567890                                               |#########
#########|          5.55 DB                                         |#########
#########|          5.55 CR                                         |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 4 |-------------------------------------------+#########
#########| *    Dates will be displayed in the format               |#########
#########| *    specified in the SET DATE command unless            |#########
#########| *    overridden by the @D or @E function.                |#########
#########|                                                          |#########
#########| SET DATE ITALIAN                                         |#########
#########| date_var = ctod( "12/24/84" )                            |#########
#########| @ 1,1 SAY date_var                                       |#########
#########| @ 2,1 SAY date_var PICTURE "@D"                          |#########
#########|                                                          |#########
#########| Output:                                                  |#########
#########| 24-12-84                                                 |#########
#########| 12/24/84                                                 |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 5 |-------------------------------------------+#########
#########| *    SAYs, GETs, FILTERs, IDs...If there are             |#########
#########| *    many parameters, stack them vertically.             |#########
#########|                                                          |#########
#########| @ r, c    SAY "Customer No: " PICTURE "####" ;           |#########
#########|           GET cust_no FILTER give_help();                |#########
#########|           ID idnumber[ r ]                               |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 6 |-------------------------------------------+#########
#########| *    Draw a box on the screen.                           |#########
#########|                                                          |#########
#########| SET COLOR TO "g+/b+"            && Boxes use the         |#########
#########|                                 && background portion    |#########
#########|                                 && of the color          |#########
#########|                                 && command.              |#########
#########| @ 3,3 TO 10,20 DOUBLE                                    |#########
#########|                                                          |#########
#########|     *--- Clear the same box.                             |#########
#########|                                                          |#########
#########| @ 3,3 CLEAR TO 10,20                                     |#########
#########+----------------------------------------------------------+#########
##############################################################################
##############################################################################
#########+--| Example 7 |-------------------------------------------+#########
#########| *    Clear a portion of the screen.                      |#########
#########|                                                          |#########
#########| @ 10,10 CLEAR                                            |#########
#########+----------------------------------------------------------+#########
##############################################################################