N | Color type P,D, or N \s3attribute(<> + (<> * 16)); | CLS color \s3clear(0); | Clear Screen \s3attribute(<> + (<> * 16)); | Box color 1 # | Box color 2 cb_box(<>,<>,<>,<>, | Draw Box \CB_DOUBLE); | If Double \CB_SINGLE); | If Single \s3attribute(<> + (<> * 16)); | Say Color 1 # | Say Color 2 \s3(<>,<>, "<>"); | Say Text \s3num(<>,<>, &<>, 1); | Say Char \s3(<>,<>, <>); | Say String \s3(<>,<>, <>); | Say Date \s3int(<>,<>, <>, <>); | Say Byte \s3int(<>,<>, <>, <>); | Say Integer \s3long(<>,<>, <>, <>); | Say Long \s3double(<>,<>, <>, <>, <>); | Say Real \s3int(<>,<>, <>, <>); | Say Logical # | With Say Picture # | Without Say Picture # | With Say Picture Alt # | Without Say Picture Alt \g3attribute(<> + (<> * 16)); | Get Color 1 # | Get Color 2 \g3char(<>,<>, &<>); | Get Char \g3(<>,<>, <>); | Get String \g3date(<>,<>, <>); | Get Date \g3int(<>,<>, &<>); | Get Byte \g3int(<>,<>, &<>); | Get Integer \g3long(<>,<>, &<>); | Get Long \g3double(<>,<>, &<>); | Get Real \g3logical(<>,<>, &<>); | Get Logical \g3picture("<>"); | With Get Picture # | Without Get Picture # | With Get Picture Alt # | Without Get Picture Alt # | With Range # | Without Range \g3prepare(<>); | With PreField # | Without PreField \g3valid(<>); | With Valid # | Without Valid END-OF-FILE