continue to cleanup

Signed-off-by: Nico Schottelius <nico@ikn.schottelius.org>
This commit is contained in:
Nico Schottelius 2009-12-28 20:19:27 +01:00
commit 4e21c23414
9 changed files with 0 additions and 59 deletions

4
old/1440disk Executable file
View file

@ -0,0 +1,4 @@
#!/bin/bash
fdformat /dev/fd0u1440
mformat -s 16 -t 80 -h 2 a:
mdir a:

4
old/720disk Executable file
View file

@ -0,0 +1,4 @@
#!/bin/bash
fdformat /dev/fd0h720
mformat -s 8 -t 80 -h 2 a:
mdir a:

44
old/ae_parser Executable file
View file

@ -0,0 +1,44 @@
# Date: 15th of March 2k+1
# Last Changed: 24th of February 2k+4
# Author: Nico Schottelius <Nico AT Schottelius DOT Org>
# Description: This script searches for the following strings
# and will substitute them with the right German Characters
#
# _ae_ = ä
# _ue_ = ü
# _oe_ = ö
# _Ae_ = Ä
# _Oe_ = Ö
# _Ue_ = Ü
# _sz_ = ß (not _ss_ like it was earlier)
#
if [ $# -lt 1 ]; then
echo `basename $0`': file(s)'
echo 'Hey, hey guy, what to convert ?'
exit 1
fi
for mfile in $@; do
if [ ! -f "$mfile" ]; then
echo "Keine Datei namens $mfile gefunden. Skip."
break
fi
# something other programs do not use
G_STR=".`date +%s%M%U`-`basename $0`-`basename $mfile`-$$"
echo "Using $G_STR to convert $mfile ..."
cat "$mfile" | sed -e 's/_ae_/ä/g' -e 's/_ue_/ü/g' -e 's/_oe_/ö/g' \
-e 's/_Ae_/Ä/g' -e 's/_Ue_/Ü/g' -e 's/_Oe_/Ö/g' -e 's/_sz_/ß/g' > "$G_STR"
if [ $? = 0 ]; then
mv "$G_STR" "$mfile"
else
echo "Replacing failed, don't replace original."
fi
done

47
old/ae_to_latex Executable file
View file

@ -0,0 +1,47 @@
# Date: 15th of March 2k+1
# Last Changed: 24th of February 2k+4
# Author: Nico Schottelius <Nico AT Schottelius DOT Org>
# Description: This script searches for the following strings
# and will substitute them with the right German Characters for Latex
#
# \"a = ä
# \"u = ü
# \"o = ö
# \"A = Ä
# \"O_ = Ö
# \"U = Ü
# \ss{} = ß (not _ss_ like it was earlier)
#
if [ $# -lt 1 ]; then
echo `basename $0`': file(s)'
echo 'Hey, hey guy, what to convert ?'
exit 1
fi
for mfile in $@; do
if [ ! -f "$mfile" ]; then
echo "Keine Datei namens $mfile gefunden. Skip."
break
fi
# something other programs do not use
G_STR=".`date +%s%M%U`-`basename $0`-`basename $mfile`-$$"
echo "Using $G_STR to convert $mfile ..."
cat "$mfile" | sed -e 's/ä/\\"a/g' -e 's/ü/\\"u/g' -e 's/ö/\\"o/g' \
-e 's/_ae_/\\"a/g' -e 's/_ue_/\\"u/g' -e 's/_oe_/\\"o/g' \
-e 's/_Ae_/\\"A/g' -e 's/_Ue_/\\"U/g' -e 's/_Oe_/\\"O/g' \
-e 's/_sz_/\ss{}/g' -e 's/ä/\\"a/g' -e 's/ü/\\"u/g' -e 's/ö/\\"o/g' \
-e 's/Ä/\\"A/g' -e 's/Ü/\\"U/g' -e 's/Ö/\\"O/g' -e 's/ß/\\ss{}/g'>"$G_STR"
if [ $? = 0 ]; then
mv "$G_STR" "$mfile"
else
echo "Replacing failed, don't replace original."
fi
done

1
old/ampersand_to_newline Executable file
View file

@ -0,0 +1 @@
cat test | perl -e 'while(<>) { s/&/\n/; print $_; }'

View file

@ -0,0 +1,21 @@
# small script, which helps to make mutt alias from netscape alias
# Author: Nico Schottelius <nico@schottelius.org>
# Date: 12th of March 2002
# Last Changed: same
#
# alias name1 name2 name3 <emailaddr> to
# alias name1name2name3 name1 name2 name3 <emailaddr>
/^alias .* <.*>$/ {
save=ORS
ORS=""
line++;
print "alias "
for(j=2;j<NF;j++)
print $j
for(i=2;i<=NF;i++)
print " " $i
ORS=save
print ""
}