Optimized

MyPackages/ldf/defaultRS-ngerman.ldf

@@ -8,6 +8,8 @@
 und Statistiken über dieses Dokument.}
 \newcommand{\LanguageTitlepageName}{Titelseite}
 \newcommand{\LanguageWordSee}{Siehe}
+\newcommand{\LanguageReleaseDateName}{Abgabedatum} %% Statistiken
+
 
 \newcommand{\Language@SignatureTextWithTypesetter}{Gesetzt von \Typesetter mit dem Textsatzsystem}
 \newcommand{\Language@SignatureText}{Erstellt mit dem Textsatzsystem}

MyPackages/mathematicsRS.sty

@@ -28,6 +28,17 @@
 \RequirePackage{fp}
 \FPset\gitter{0.2}
 
+\newcommand{\PotenzValue}[2]{\setcounter{tmp}{#2}
+\temp=1
+\whiledo {\value{tmp} > 0}%
+{
+\addtocounter{tmp}{-1}
+\multiply\temp by #1
+}}
+
+\newcommand{\Potenz}[2]{\setcounter{tmp}{#2}
+\PotenzValue{#1}{#2}\the\temp}
+
 \newenvironment{mathgrobplot}[7]{
 \begin{tikzpicture}[scale=#5]
     \FPset\fxmax{#1}

scripts/converter

@@ -0,0 +1,23 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use autodie;
+use feature qw(say);
+use utf8;
+use open qw(:std :utf8);
+binmode STDOUT, ':encoding(UTF-8)';
+
+$^I = ".bak";
+
+while (<>) {
+	s{\A%% <(?:Schule|school)/([^<>]+?).tex> (?:Vorlageversion|template version) ([^<> ]+?) <Robin Schneider>}{%% <school/$1.tex> template $2 by Robin `ypid` Schneider <ypid23\@aol.de>}ms;
+    s{\A%%%Präambel\Z}{%%% preamble}ms;
+    s{\A%\\listfiles.*}{%\\listfiles %% listfiles to logfile}m;
+    s{\A%% Spet?zifische angaben\Z}{%% specific indications}msi;
+    s{\A%%%Body\Z}{%%% body}ms;
+	# if (/\A#!/) {
+	# 	$_ .= "## Copyright (C) 2011 by Yours Truly";
+	# }
+	# print <STDOUT> "$ARGV";
+	print;
+}