BBC Basic command line database

   10 REM A database that uses a record structure and a sequential file.    20 SYS "GetStdHandle", -10 TO @hfile%(1)    30 SYS "GetStdHandle", -11 TO @hfile%(2)    40 SYS "SetConsoleMode", @hfile%(1), 0    50 *INPUT 13    60 *OUTPUT 14    70 DIM details{name$, phone$, email$,response%(1,10)}    80 DIM contact{(100)} = details{}    90 DIM temp{(1)} = contact{(100)}   100 counter = 0   110 FOR d = 1 TO 100   120   FOR c = 1 TO 10   130     contact{(d)}.response%(1,c) = 0   140   NEXT c   150 NEXT d   160 REPEAT   170   PRINT   180   PRINT"1.  Create a record."   190   PRINT"2.  Save records to file."   200   PRINT"3.  Delete a record."   210   PRINT"4.  Sort records."   220   PRINT"5.  List records."   230...