Global Amiga Experience/globalamigaexperience.iso/text_dtp/editor/turbotext/support/ttx_lang_basic.dfn

Text File | 1995-07-10 | 2KB | 251 lines

/** $VER: TTX_Lang_BASIC.dfn 2.0 (24.8.93)
 **
 ** This definition file contains definitions necessary to use TurboText as a
 ** HiSoft Basic programmer's editor.
 **
 ** Written by Steven D. Kapplin
 ** Modified by Martin Taillefer
 **/


DICTIONARY:

  ABS
  ACCESS
  AND
  APPEND
  AREA
  AREAFILL
  AS
  ASC
  ATN
  AUTO
  BAR
  BASE
  BEEP
  BIN$
  BLOAD
  BREAK
  BSAVE
  CALL
  CALLS
  CASE
  CDBL
  CHAIN
  CHDIR
  CHR$
  CINT
  CIRCLE
  CLEAR
  CLNG
  CLOSE
  CLS
  COLLISION
  COLOR
  COMMAND$
  COMMON
  CONST
  COS
  CSNG
  CSRLIN
  CVD
  CVFFP
  CVI
  CVL
  CVS
  DATA
  DATE$
  DECLARE
  DECR
  DEF
  DEFDBL
  DEFINT
  DEFLNG
  DEFSNG
  DEFSTR
  DIM
  DO
  ELSE
  ELSEIF
  END
  EOF
  EQV
  ERASE
  ERL
  ERR
  ERROR
  EXIT
  EXP
  FEXISTS
  FIELD
  FILES
  FIX
  FOR
  FRE
  FUNCTION
  GET
  GOSUB
  GOTO
  HEX$
  IF
  INCR
  INKEY$
  INPUT
  INPUT$
  INSTR
  INT
  KEY
  KILL
  LBOUND
  LCASE$
  LEFT$
  LEN
  LET
  LIBRARY
  LINE
  LOC
  LOCAL
  LOCATE
  LOF
  LOG
  LOG10
  LOG2
  LOOP
  LPOS
  LPRINT
  LSET
  MID$
  MKD$
  MKDIR
  MKFFP$
  MKI$
  MKL$
  MKS$
  MOD
  MOUSE
  NAME
  NEXT
  NOT
  OBJECT.xx
  OCT$
  OFF
  ON
  OPEN
  OPTION
  OR
  OUTPUT
  PAINT
  PALLETTE
  PATTERN
  PCIRCLE
  PCOPY
  PEEK
  PEEKB
  PEEKL
  PEEKW
  POINT
  POKE
  POKEB
  POKEL
  POKEW
  POS
  PRESET
  PRINT
  PSET
  PUT
  RANDOM
  RANDOMIZE
  READ
  REDIM
  REM
  REMAINDER
  REPEAT
  RESET
  RESTORE
  RESUME
  RETURN
  RIGHT$
  RMDIR
  RND
  RSET
  RUN
  SADD
  SCREEN
  SCROLL
  SELECT
  SGN
  SHARED
  SIN
  SLEEP
  SOUND
  SPACE$
  SPC
  SQR
  STATIC
  STEP
  STICK
  STOP
  STR$
  STRIG
  STRING$
  SUB
  SWAP
  SYSTAB
  SYSTEM
  TAB
  TAN
  THEN
  TIME$
  TIMER
  TO
  TRANSLATE$
  TROFF
  TRON
  UBOUND
  UCASE$
  UNTIL
  USING
  VAL
  VARPTR
  VARPTRS
  WAVE
  WEND
  WHILE
  WIDTH
  WINDOW
  WRITE
  XOR
#


TEMPLATES:

  "REM $OPTION @"
  "FOR @ = TO *n*nNEXT *n"
  "DIM (@)"
  "SUB @ ()*n*nEND SUB*n"
  "FUNCTION @ ()*n*nEND FUNCTION*n"
  "DO WHILE @*n*nLOOP*n"
  "WHILE @*n*nWEND*n"
  "REPEAT @*n*nEND REPEAT*n"
  "DECLARE @  LIBRARY*n"
  "DEF FN@()"
  "SELECT CASE @*n  CASE *n*nEND SELECT*n"
  "AREA (@)"
  "IF @ THEN*n*nEND IF*n"
  "WINDOW @,,()-(),256,ScrID"
  "WINDOW CLOSE @"
  "SCREEN @,,,,"
  "PTAB(@)"
  "PRINT USING @;"
  "ON BREAK GOSUB @"
  "ON COLLISION GOSUB @"
  "ON ERROR GOTO @"
  "ON @ GOSUB "
  "ON @ GOTO "
  "ON MENU GOSUB @"
  "ON MOUSE GOSUB @"
  "ON TIMER(@) GOSUB "
#