projects
/
lectures
/
dfb-slides.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
eb02395
)
jop
author
hunz
<hunz>
Sat, 22 Mar 2003 01:21:20 +0000
(
01:21
+0000)
committer
hunz
<hunz>
Sat, 22 Mar 2003 01:21:20 +0000
(
01:21
+0000)
parse.pl
patch
|
blob
|
history
diff --git
a/parse.pl
b/parse.pl
index
d5695f2
..
a25052f
100755
(executable)
--- a/
parse.pl
+++ b/
parse.pl
@@
-5,11
+5,18
@@
chomp @content;
@slide=();
@slide=();
-print "<?xml version='1.0'?>\n";
-print "<slides effect=\"slide top left, blend\"
- bgcolor=\"#000000\" fgcolor=\"#FFFFFF\"
+@actions=( "slide top",
+ "slide top right",
+ "slide top left",
+ "slide bottom",
+ "slide bottom left",
+ "slide bottom right",
+ "slide left",
+ "slide right");
+
+print "<?xml version='1.0' encoding='iso-8859-1'?>\n";
+print "<slides bgcolor=\"#222266\" fgcolor=\"#9999ff\"
face=\"../ttf/decker.ttf\" size=\"15\"
face=\"../ttf/decker.ttf\" size=\"15\"
- bgimage=\"../img/bg.png\"
bullet=\"../img/bullet.png\"
screen_width=\"1024\" screen_height=\"768\">\n";
bullet=\"../img/bullet.png\"
screen_width=\"1024\" screen_height=\"768\">\n";
@@
-20,12
+27,20
@@
foreach(@content) {
s/&/&/g;
s/</</;
s/>/>/;
s/&/&/g;
s/</</;
s/>/>/;
+
+ #s/ue/ü/g;
+ #s/ae/ä/g;
+ #s/oe/ö/g;
+
+ s/Ue/Ü/g;
+ s/Ae/Ä/g;
+ s/Oe/Ö/g;
# unterpunkt
if(/^ \d/) {
if(@slide) {
print "<slide>\n";
pop(@slide);
# unterpunkt
if(/^ \d/) {
if(@slide) {
print "<slide>\n";
pop(@slide);
- print "<header size=\"20\">$topic</header>\n<text></text>\n";
+ print "<header size=\"20\"
fgcolor=\"#22FF22\"
>$topic</header>\n<text></text>\n";
foreach(@slide) {
if(/ \+ /) {
s/\+//;
foreach(@slide) {
if(/ \+ /) {
s/\+//;