SET MODE CHANGE SET EN W ' '' ,.()=+-/*;[]<>{}' SET EN SEN ';' SET EN PAR '}' DEF K CON B AS "BACKWADV." DEF K CON G AS "^G." DEF K CON N AS "EXT N?*'Change next: '?*' to: '." DEF K CON P AS "CUTPAR=PARAGRAPH." DEF K CON R AS "SEN." DEF K CON V AS "EXT S?*'Change every: '?*' to: 'WH." DEF K CON _ AS "CUTSEN=SENTENCE." DEF K CON ^ AS "PAR." DEF K CON \ AS "SHL." DEF K CON ] AS "SHR." DEF K G CON H AS "16-C." DEF K G CON I AS "16+C." DEF K G CON P AS "PASTE=PARAGRAPH." DEF K G CON R AS "BACKSENADV." DEF K G CON _ AS "PASTE=SENTENCE." DEF K G CON ^ AS "BACKPARADV." DEF K G DEL AS "EXT DEL S." DEF K G ` AS "D+C+CUNDC-C." DEF K G ~ AS "+CDEWBACKWUNDWADVW-C." DEF KEY G FUN 3 AS "CUTSRPASTE." DEF KEY G FUN 4 AS "RESET" DEF KEY G FUN 5 AS "(-66L)." DEF KEY G FUN 6 AS "(+66L)." DEF KEY FUN 19 AS "D+EL." DEF K FUN 20 AS "EXT SET SCREEN 132." DEF K G FUN 20 AS "EXT SET SCREEN 80." DEF K FUN 21 AS "CHGCSR." DEF K G FUN 21 AS "DATE." DEF K FUN 23 AS "^[." DEF K FUN 26 AS "EXT ?*'Command :'." DEF K G FUN 26 AS "EXT QUIT." DEF K G FUN 29 AS "EXT EXIT." DEF K FUN 31 AS "^M-C." DEF K FUN 32 AS "RESET" DEF K G FUN 32 AS "D+C+CUNDC." DEF K FUN 33 AS "UNDW." DEF K G FUN 33 AS "D+EW +W UNDW." DEF K FUN 34 AS "UNDL." DEF K G FUN 34 AS "D+NL+LUNDL." DEF K G A AS "iauto ." DEF K G B AS "ibreak;." DEF K G C AS "icase ." DEF K G D AS "idefault: ." DEF K G E AS "iextern ." DEF K G F AS "ifor (?*'for Start expr: '; ?*' End condition: '; ?*'; Inc expr: ')." DEF K G G AS "igoto ." DEF K G H AS "EXT HELP CLANG." DEF K G I AS "istdin." DEF K G J AS "icmpstr(." DEF K G K AS "ilenstr(." DEF K G L AS "i#include ." DEF K G M AS "istruct ." DEF K G N AS "icontinue;." DEF K G O AS "istdout." DEF K G P AS "iputlin(." DEF K G Q AS "iputlin(""?*'Prompt: '""); get." DEF K G R AS "ireturn(." DEF K G S AS "iswitch(." DEF K G T AS "itypedef ." DEF K G U AS "iunion ." DEF K G V AS "ifill(." DEF K G W AS "iwhile (." DEF K G X AS "igetlin(." DEF K G Y AS "i else ." DEF K G Z AS "i#define ." DEF K G "!" AS "iabs(." DEF K G @ AS "isqrt(." DEF K G # AS "ifalse." DEF K G $ AS "itrue." DEF K G "%" AS "ierror(." DEF K G ^ AS "Iexp(." DEF K G & AS "Iarctan(." DEF K G * AS "iln(." DEF K G ( AS "isin(." DEF K G ) AS "icos(." DEF K G _ AS "iremark(." DEF K G + AS "isubstr(." DEF K G = AS "iif (?*'if '==?*'== ." DEF K G ~ AS "+CDEWBACKWUNDWADVW-C." DEF K G ` AS "D+C+CUNDC-C." DEF K G ] AS "isizeof(." DEF K G [ AS "iprintf(." DEF K G | AS "iabs(." DEF K G \ AS "istatic ." DEF K G : AS "ilong ." DEF K G ; AS "ifloat ." DEF K G '"' AS "ichar ." DEF K G "'" AS "idouble ." DEF K G { AS "imax(." DEF K G } AS "imin(." DEF K G < AS "iif ( ?*'if '< ." DEF K G , AS "iint ." DEF K G > AS "iif ( ?*'if '> ." DEF K G . AS "iregister ." DEF K G ? AS "ishort ." SET COMMAND SYS$LOGIN:EDTINI.EDT SET COMMAND EDTINI.EDT