Category : Word Processors
Archive   : TEMPLMAC.ZIP
Filename : TEMPLATE.PAS

 
Output of file : TEMPLATE.PAS contained in archive : TEMPLMAC.ZIP
TEMPLATE.PAS: QEdit Language Template for PASCAL
(Top 20 lines are skipped)
Last revised: 27-March-1991. For use with "`" macro in TEMPLATE.QM.

Format is as follows:

þKEYWORD1 <---What you want to type
### <---lines this text takes, minus 1
TEXT <---start of text to be inserted
etc
þKEYWORD2 <---Next keyword to match
### <---# of lines
TEXT <---text for this one. And so on...
...

Mandatory: CHR( 254 ) "þ" precedes all keywords
Optional: CHR( 248 ) "ø" marks cursor pos. in inserted text after insertion.

Anything between end of inserted text and next keyword is ignored, so you
can include comments, etc. We have put a line of dashes between each item.
-----------------------------------------------------------------
þ{ COMMENT BLOCK
6 lines
{
****************************************************************
* *
* øBLOCK COMMENT *
* *
****************************************************************
}
-----------------------------------------------------------------
þBEGIN SIMPLE BEGIN/END PAIR
1 line
BEGIN { øblock_comment }
END; { block_comment }
-----------------------------------------------------------------
þCASE CASE SELECT STATEMENT
6 lines
CASE øindex OF
val :
BEGIN
END;
val :
BEGIN
END;
ELSE
END; { CASE comment }
-----------------------------------------------------------------
þFOR FOR LOOP
2 line
FOR øindex := start TO finish DO
BEGIN { FOR comment }
END; { FOR comment }
-----------------------------------------------------------------
þIF IF STATEMENT
5 lines
IF øTRUE THEN
BEGIN { IF comment }
END { IF comment }
ELSE
BEGIN { ELSE comment }
END; { ELSE comment }
-----------------------------------------------------------------
þELSE ELSE CLAUSE ONLY
2 lines
ELSE
BEGIN { ELSE øcomment }
END; { ELSE comment }
-----------------------------------------------------------------
þREPEAT REPEAT LOOP
1 line
REPEAT
UNTIL øFALSE;
-----------------------------------------------------------------
þWHILE WHILE / DO LOOP
2 lines
WHILE øTRUE DO
BEGIN { WHILE comment }
END; { WHILE comment }
-----------------------------------------------------------------
þWITH WITH STATEMENT
2 lines
WITH øexpression DO
BEGIN { WITH comment }
END; { WITH comment }
-----------------------------------------------------------------
þPROCEDURE PROCEDURE DEFINITION
3 lines
PROCEDURE øproc_name(
);
BEGIN { PROCEDURE proc_name }
END; { PROCEDURE proc_name }

-----------------------------------------------------------------
þFUNCTION FUNCTION DEFINITION
4 lines
FUNCTION øfunc_name(
) : type;
BEGIN { FUNCTION func_name }
END; { FUNCTION func_name }

-----------------------------------------------------------------
þARRAY ARRAY DEFINITION
0 lines
ARRAY [ øx..y ] OF type;
-----------------------------------------------------------------
þVAR VAR DEFINITION
2 lines
VAR
øname : type;

-----------------------------------------------------------------
þCONST CONST DEFINITION
2 lines
CONST
øname = value;

-----------------------------------------------------------------
þTYPE TYPE DEFINITION
2 lines
TYPE
øname = value;

-----------------------------------------------------------------
þRECORD RECORD DEFINITION
1 line
RECORD { RECORD øcomment }
END; { RECORD comment }
-----------------------------------------------------------------
þPROGRAM PROGRAM BLOCK
3 lines
PROGRAM øprogram_name( INPUT, OUTPUT );

BEGIN { PROGRAM program_name }
END. { PROGRAM program_name }
-----------------------------------------------------------------
þUNIT TURBO/UCSD PASCAL UNIT
9 lines
UNIT øunit_name;

INTERFACE

USES ;

IMPLEMENTATION

BEGIN { UNIT unit_name }
END. { UNIT unit_name }
-----------------------------------------------------------------
***EOF: TEMPLATE.PAS***


  3 Responses to “Category : Word Processors
Archive   : TEMPLMAC.ZIP
Filename : TEMPLATE.PAS

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/