
	Makrodatei fr PKS-WRITE 	DATE: 04/08/91 TIME: 19:30:12

	
	Kommentarzeilen beginnen mit einem Leerzeichen oder einem Tabulator

	Tabelle mit der Tastenbelegung fr die Menus
	--------------------------------------------
	
    Achtung: Bei einer nderung der Menus mssen leider die 
    Menunummern angepat werden.

	Die 1. Spalte dieser Tabelle beginnt mit dem Buchstaben 'm'
	und wird gefolgt von der Menunummer. 
	In der 2. Spalte wird der Scancode angegeben
	In der 3. Spalte steht ein Kommentar (wird dieser in " eingeschlossen)
	ist er als Hilfstext im Programm verfgbar


     Tastenbelegungen fr Makros 
	---------------------------

     allgemeine Form:
          SCANCODE Funktion(Parameter)[Funktion(Parameter)] <"Bezeichnung">

[C]Q		schliesse()				"Fenster schliessen"
[A]F		bmark(A,0,a,$)format()		"Format Absatz"

[L]ClrHome gehezu(%,0)				"Zum Ende der Datei"
ClrHome	gehezu(0,0)				"Zum Anfang der Datei"
[L]Up	gehezu(T,0)				"Bildschirm oben"
[L]Down	gehezu(t,0)				"Bildschirm unten"
[C]Up	aufab(-f)					"Seite hoch"
[C]Down	aufab(f)					"Seite runter"
[L]Left	gehezu(z,0)				"zum Zeilenanfang"
[L]Right	gehezu(z,$)				"zum Zeilenende"

[C]O		anzeige(0,0)				"Anzeige ohne Satzinfos"
[C]M		anzeige(1,1)				"Textattribute ein/aus"
[A],		anzeige(2,1)				"Zeilenende und Tabulatoren ein/aus"
[A].		anzeige(4,1)				"Satzinfos ein/aus"
[C]Space		anzeige(8,1)				"Anzeige optionale Leerzeichen|ein/aus"
Help		anzeige(64,1)				"Statuszeile ein/aus"
Insert	optionen(4)				"Einfgen/berschreiben"

[L]Help	zeigemakros()				"Makros anzeigen"

[L]Space		fgein([FL])				"festes Leerzeichen"
[C]~			fgein(3)					"optionale Trennung"
[C]L			Satzein(28)				"Lockmarke"
[C#].		wiederein()				"letzte Einfgung wiederholen"
[CL#]1		satzein([S])				"fge letzten Stil ein"
[CL#]2		satzein([L])				"fge letztes Lineal ein"
[AL]C		satzein(26)				"fge Bemerkung ein"
[#]-			fgein(45)				"fge minus ein"
-			fgein(252)				"fge divis ein"

	# Abstze und Zeilenenden
Return		fgein(10)				"Absatzende"
Enter		fgein(10)				"Absatzende"
[L]Return		fgein(23)				"festes Zeilenende"
[A]Return		fgein(13)				"weiches Zeilenende"
[C]Return		fgein(29)				"variables Absatzende"

Backspace		lsch(-1)
Delete		lsch(1)
[C]Delete 	bstart()wortweise(1)\
			bend()blsch()			"Wort lschen"
[C]Backspace 	bend()wortweise(-1)\
			bstart()blsch()		"Wort nach links lschen"
[L]Delete 	bmark(z,s,z,$)blsch()	"zum Zeilenende lschen"
[L]Backspace 	bmark(z,0,z,s)\
			blsch()				"zum Zeilenanfang lschen"
[AC]T			bstart()wortweise(1)\
			bend()blsch()\
			wortweise(1)undo()  	"tausche Wort"

Undo			undo()				"Undo Lschen"
[C]A			suche(1)				"erneut vorwrts suchen"
[C]B			suche(-1)				"erneut rckwrts suchen"
[C]S			Satznd()				"Satzinfo editieren"
[C]T			bstart()linksrechts(1)\
			bend()blsch()\
			linksrechts(1)undo()  	"tausche Zeichen"

[C]C			bkopie()				"Block kopieren"
[C]H			versteck()			"Block verstecken"
[C]P			beinf()				"Block einfgen"
[LC]X			blsch()				"Block lschen"
[C]Y			bschnei()				"Block ausschneiden"

[C]Enter		bmark(A,0,a,$)			"Absatz markieren"

[LA#]1		susatz([S],-1)			"Stilinfo rckwrts suchen"
[LA#]2		susatz([L],-1)			"Lineal rckwrts suchen"
[LA#]6		susatz([K],-1)			"Kapitel rckwrts suchen"
[LA#]7		susatz([EU],-1)		"Umbruch rckwrts suchen"

[C]Z			Fontliste()			"Fontliste editieren"
[LC]Z			Optionen(0)			"Setup speichern"

