« vorheriges nächstes »
Seiten: 1 2 [3]   Nach unten

Autor Thema: EM 2012 Tippspiel  (Gelesen 18230 mal)

Glombi

  • Gast
Re: EM 2012 Tippspiel
« Antwort #40 am: 25.06.12 - 08:56:30 »
Gleiche Teilmaske, gleiches Feld. Alles ohne Gewähr  ;D
Das funktioniert aber nur, wenn auch schon die Datums- und Uhrzeitfelder im Result-Dokument fürs 1/2 Finale ausgefüllt sind.

REM {+++++++ G R U P P E N A R I T H M E T I K};
g11 := 1; p11 := 1;   g12 := 2; p12 := 2;   REM {1.A vs 2.B};
g21 := 2; p21 := 1;   g22 := 1; p22 := 2;   REM {1.B vs 2.A};
g31 := 3; p31 := 1;   g32 := 4; p32 := 2;   REM {1.C vs 2.D};
g41 := 4; p41 := 1;   g42 := 3; p42 := 2;   REM {1.D vs 2.C};


REM {+++++++ B A S I S L I S T E N};
flist := @Implode( f_list; z );
glist := @Implode( g_tab; z );
c := @If( f_choice = ""; 1; @TextToNumber( f_choice ) );

REM {+++++++ E I N G A B E D A T E N};
tmp1 := @Text( s_dat_b1 ) : @Text( s_tim_b1; "T1" ) : t_b1_e : e_b1_1 : e_b1_2;
tmp2 := @Text( s_dat_b2 ) : @Text( s_tim_b2; "T1" ) : t_b2_e : e_b2_1 : e_b2_2;
tmp3 := @Text( s_dat_b3 ) : @Text( s_tim_b3; "T1" ) : t_b3_e : e_b3_1 : e_b3_2;
tmp4 := @Text( s_dat_b4 ) : @Text( s_tim_b4; "T1" ) : t_b4_e : e_b4_1 : e_b4_2;
tmp5 := @Text( s_dat_b5 ) : @Text( s_tim_b5; "T1" ) : t_b5_e : e_b5_1 : e_b5_2;
tmp6 := @Text( s_dat_b6 ) : @Text( s_tim_b6; "T1" ) : t_b6_e : e_b6_1 : e_b6_2;
tmp7 := @Text( s_dat_b7 ) : @Text( s_tim_b7; "T1" ) : t_b7_e : e_b7_1 : e_b7_2;
tmp8 := @Text( s_dat_b8 ) : @Text( s_tim_b8; "T1" ) : t_b8_e : e_b8_1 : e_b8_2;

REM {+++++++ A L T E   W E R T E};
vo := @Word( flist; z; 1 );
vo1 := @Right( @Right( @Word( vo; y; 1 ); x ); x );
vo2 := @Right( @Right( @Word( vo; y; 2 ); x ); x );
vo3 := @Right( @Right( @Word( vo; y; 3 ); x ); x );
vo4 := @Right( @Right( @Word( vo; y; 4 ); x ); x );

ho := @Word( flist; z; 2 );
ho1 := @Right( @Right( @Word( ho; y; 1 ); x ); x );
ho2 := @Right( @Right( @Word( ho; y; 2 ); x ); x );

fo := @Word( flist; z; 3 );
fo1 := @Right( @Right( @Word( fo; y; 1 ); x ); x );
fo2 := @Right( @Right( @Word( fo; y; 2 ); x ); x );


REM {+++++++ V I E R T E L F I N A L E};
vm11 := @Left( @Word( @Word( glist; z; g11 ); y; p11 ); x );
vm12 := @Left( @Word( @Word( glist; z; g12 ); y; p12 ); x );
vm21 := @Left( @Word( @Word( glist; z; g21 ); y; p21 ); x );
vm22 := @Left( @Word( @Word( glist; z; g22 ); y; p22 ); x );
vm31 := @Left( @Word( @Word( glist; z; g31 ); y; p31 ); x );
vm32 := @Left( @Word( @Word( glist; z; g32 ); y; p32 ); x );
vm41 := @Left( @Word( @Word( glist; z; g41 ); y; p41 ); x );
vm42 := @Left( @Word( @Word( glist; z; g42 ); y; p42 ); x );
vm1 := vm11 + x + vm12;
vm2 := vm21 + x + vm22;
vm3 := vm31 + x + vm32;
vm4 := vm41 + x + vm42;

v1 := @Implode( vm1 : @If( f_switch = 1; tmp1; vo1 ); x );
v2 := @Implode( vm2 : @If( f_switch = 1; tmp2; vo2 ); x );
v3 := @Implode( vm3 : @If( f_switch = 1; tmp3; vo3 ); x );
v4 := @Implode( vm4 : @If( f_switch = 1; tmp4; vo4 ); x );
v := @Implode( v1 : v2 : v3 : v4; y );

vh1 := @Word( v; y; 1 );
vh2 := @Word( v; y; 2 );
vh3 := @Word( v; y; 3 );
vh4 := @Word( v; y; 4 );


REM {+++++++ H A L B F I N A L E};
ht11 := @TextToNumber( @Word( vh1; x; 6 ) );
ht12 := @TextToNumber( @Word( vh1; x; 7 ) );
ht21 := @TextToNumber( @Word( vh2; x; 6 ) );
ht22 := @TextToNumber( @Word( vh2; x; 7 ) );
ht31 := @TextToNumber( @Word( vh3; x; 6 ) );
ht32 := @TextToNumber( @Word( vh3; x; 7 ) );
ht41 := @TextToNumber( @Word( vh4; x; 6 ) );
ht42 := @TextToNumber( @Word( vh4; x; 7 ) );
hm1 := @If( ht11 = "" | ht12 = ""; ""; ht11 > ht12; @Word( vh1; x; 1 ); @Word( vh1; x; 2 ) ) + x +
       @If( ht31 = "" | ht32 = ""; ""; ht21 > ht22; @Word( vh2; x; 1 ); @Word( vh2; x; 2 ) );
hm2 := @If( ht21 = "" | ht22 = ""; ""; ht31 > ht32; @Word( vh3; x; 1 ); @Word( vh3; x; 2 ) ) + x +
       @If( ht41 = "" | ht42 = ""; ""; ht41 > ht42; @Word( vh4; x; 1 ); @Word( vh4; x; 2 ) );

h1 := @Implode( hm1 : @If( f_switch = 2; tmp1; ho1 ); x );
h2 := @Implode( hm2 : @If( f_switch = 2; tmp2; ho2 ); x );
h := @Implode( h1 : h2; y );

hf1 := @Word( h; y; 1 );
hf2 := @Word( h; y; 2 );


REM {+++++++ F I N A L E};
ft11 := @TextToNumber( @Word( hf1; x; 6 ) );
ft12 := @TextToNumber( @Word( hf1; x; 7 ) );
ft21 := @TextToNumber( @Word( hf2; x; 6 ) );
ft22 := @TextToNumber( @Word( hf2; x; 7 ) );
fm1 := @If( ft11 = "" | ft12 = ""; ""; ft11 > ft12; @Word( hf1; x; 1 ); @Word( hf1; x; 2 ) ) + x +
       @If( ft21 = "" | ft22 = ""; ""; ft21 > ft22; @Word( hf2; x; 1 ); @Word( hf2; x; 2 ) );
fm2 := @If( ft11 = "" | ft12 = ""; ""; ft11 < ft12; @Word( hf1; x; 1 ); @Word( hf1; x; 2 ) ) + x +
       @If( ft21 = "" | ft22 = ""; ""; ft21 < ft22; @Word( hf2; x; 1 ); @Word( hf2; x; 2 ) );

f1 := @Implode( fm1 : @If( f_switch = 3; tmp1; fo1 ); x );
f2 := @Implode( fm2 : @If( f_switch = 3; tmp2; fo2 ); x );
f := @Implode( f1 : f2; y );


_orig := @If( f_list = "";
  y : y : y;
  v : h : f );
_viertel := @ReplaceSubstring(_orig;"Russland";"Griechenland");

_alt := "Portugal+++Deutschland+++27.06.2012+++20:45+++++++++#####Spanien+++Italien+++28.06.2012+++20:45";
_neu := "Portugal+++Spanien+++27.06.2012+++20:45+++++++++#####Deutschland+++Italien+++28.06.2012+++20:45";
_halb := @ReplaceSubstring(_viertel;_alt;_neu);
_halb
« Letzte Änderung: 25.06.12 - 08:58:06 von Glombi »
Gespeichert

Offline manneS04

  • Frischling
  • *
  • Beiträge: 0
Re: EM 2012 Tippspiel
« Antwort #41 am: 25.06.12 - 10:05:30 »
Zitat von: Glombi am 25.06.12 - 08:56:30
Gleiche Teilmaske, gleiches Feld. Alles ohne Gewähr  ;D
Das funktioniert aber nur, wenn auch schon die Datums- und Uhrzeitfelder im Result-Dokument fürs 1/2 Finale ausgefüllt sind.

REM {+++++++ G R U P P E N A R I T H M E T I K};
g11 := 1; p11 := 1;   g12 := 2; p12 := 2;   REM {1.A vs 2.B};
g21 := 2; p21 := 1;   g22 := 1; p22 := 2;   REM {1.B vs 2.A};
g31 := 3; p31 := 1;   g32 := 4; p32 := 2;   REM {1.C vs 2.D};
g41 := 4; p41 := 1;   g42 := 3; p42 := 2;   REM {1.D vs 2.C};


REM {+++++++ B A S I S L I S T E N};
flist := @Implode( f_list; z );
glist := @Implode( g_tab; z );
c := @If( f_choice = ""; 1; @TextToNumber( f_choice ) );

REM {+++++++ E I N G A B E D A T E N};
tmp1 := @Text( s_dat_b1 ) : @Text( s_tim_b1; "T1" ) : t_b1_e : e_b1_1 : e_b1_2;
tmp2 := @Text( s_dat_b2 ) : @Text( s_tim_b2; "T1" ) : t_b2_e : e_b2_1 : e_b2_2;
tmp3 := @Text( s_dat_b3 ) : @Text( s_tim_b3; "T1" ) : t_b3_e : e_b3_1 : e_b3_2;
tmp4 := @Text( s_dat_b4 ) : @Text( s_tim_b4; "T1" ) : t_b4_e : e_b4_1 : e_b4_2;
tmp5 := @Text( s_dat_b5 ) : @Text( s_tim_b5; "T1" ) : t_b5_e : e_b5_1 : e_b5_2;
tmp6 := @Text( s_dat_b6 ) : @Text( s_tim_b6; "T1" ) : t_b6_e : e_b6_1 : e_b6_2;
tmp7 := @Text( s_dat_b7 ) : @Text( s_tim_b7; "T1" ) : t_b7_e : e_b7_1 : e_b7_2;
tmp8 := @Text( s_dat_b8 ) : @Text( s_tim_b8; "T1" ) : t_b8_e : e_b8_1 : e_b8_2;

REM {+++++++ A L T E   W E R T E};
vo := @Word( flist; z; 1 );
vo1 := @Right( @Right( @Word( vo; y; 1 ); x ); x );
vo2 := @Right( @Right( @Word( vo; y; 2 ); x ); x );
vo3 := @Right( @Right( @Word( vo; y; 3 ); x ); x );
vo4 := @Right( @Right( @Word( vo; y; 4 ); x ); x );

ho := @Word( flist; z; 2 );
ho1 := @Right( @Right( @Word( ho; y; 1 ); x ); x );
ho2 := @Right( @Right( @Word( ho; y; 2 ); x ); x );

fo := @Word( flist; z; 3 );
fo1 := @Right( @Right( @Word( fo; y; 1 ); x ); x );
fo2 := @Right( @Right( @Word( fo; y; 2 ); x ); x );


REM {+++++++ V I E R T E L F I N A L E};
vm11 := @Left( @Word( @Word( glist; z; g11 ); y; p11 ); x );
vm12 := @Left( @Word( @Word( glist; z; g12 ); y; p12 ); x );
vm21 := @Left( @Word( @Word( glist; z; g21 ); y; p21 ); x );
vm22 := @Left( @Word( @Word( glist; z; g22 ); y; p22 ); x );
vm31 := @Left( @Word( @Word( glist; z; g31 ); y; p31 ); x );
vm32 := @Left( @Word( @Word( glist; z; g32 ); y; p32 ); x );
vm41 := @Left( @Word( @Word( glist; z; g41 ); y; p41 ); x );
vm42 := @Left( @Word( @Word( glist; z; g42 ); y; p42 ); x );
vm1 := vm11 + x + vm12;
vm2 := vm21 + x + vm22;
vm3 := vm31 + x + vm32;
vm4 := vm41 + x + vm42;

v1 := @Implode( vm1 : @If( f_switch = 1; tmp1; vo1 ); x );
v2 := @Implode( vm2 : @If( f_switch = 1; tmp2; vo2 ); x );
v3 := @Implode( vm3 : @If( f_switch = 1; tmp3; vo3 ); x );
v4 := @Implode( vm4 : @If( f_switch = 1; tmp4; vo4 ); x );
v := @Implode( v1 : v2 : v3 : v4; y );

vh1 := @Word( v; y; 1 );
vh2 := @Word( v; y; 2 );
vh3 := @Word( v; y; 3 );
vh4 := @Word( v; y; 4 );


REM {+++++++ H A L B F I N A L E};
ht11 := @TextToNumber( @Word( vh1; x; 6 ) );
ht12 := @TextToNumber( @Word( vh1; x; 7 ) );
ht21 := @TextToNumber( @Word( vh2; x; 6 ) );
ht22 := @TextToNumber( @Word( vh2; x; 7 ) );
ht31 := @TextToNumber( @Word( vh3; x; 6 ) );
ht32 := @TextToNumber( @Word( vh3; x; 7 ) );
ht41 := @TextToNumber( @Word( vh4; x; 6 ) );
ht42 := @TextToNumber( @Word( vh4; x; 7 ) );
hm1 := @If( ht11 = "" | ht12 = ""; ""; ht11 > ht12; @Word( vh1; x; 1 ); @Word( vh1; x; 2 ) ) + x +
       @If( ht31 = "" | ht32 = ""; ""; ht21 > ht22; @Word( vh2; x; 1 ); @Word( vh2; x; 2 ) );
hm2 := @If( ht21 = "" | ht22 = ""; ""; ht31 > ht32; @Word( vh3; x; 1 ); @Word( vh3; x; 2 ) ) + x +
       @If( ht41 = "" | ht42 = ""; ""; ht41 > ht42; @Word( vh4; x; 1 ); @Word( vh4; x; 2 ) );

h1 := @Implode( hm1 : @If( f_switch = 2; tmp1; ho1 ); x );
h2 := @Implode( hm2 : @If( f_switch = 2; tmp2; ho2 ); x );
h := @Implode( h1 : h2; y );

hf1 := @Word( h; y; 1 );
hf2 := @Word( h; y; 2 );


REM {+++++++ F I N A L E};
ft11 := @TextToNumber( @Word( hf1; x; 6 ) );
ft12 := @TextToNumber( @Word( hf1; x; 7 ) );
ft21 := @TextToNumber( @Word( hf2; x; 6 ) );
ft22 := @TextToNumber( @Word( hf2; x; 7 ) );
fm1 := @If( ft11 = "" | ft12 = ""; ""; ft11 > ft12; @Word( hf1; x; 1 ); @Word( hf1; x; 2 ) ) + x +
       @If( ft21 = "" | ft22 = ""; ""; ft21 > ft22; @Word( hf2; x; 1 ); @Word( hf2; x; 2 ) );
fm2 := @If( ft11 = "" | ft12 = ""; ""; ft11 < ft12; @Word( hf1; x; 1 ); @Word( hf1; x; 2 ) ) + x +
       @If( ft21 = "" | ft22 = ""; ""; ft21 < ft22; @Word( hf2; x; 1 ); @Word( hf2; x; 2 ) );

f1 := @Implode( fm1 : @If( f_switch = 3; tmp1; fo1 ); x );
f2 := @Implode( fm2 : @If( f_switch = 3; tmp2; fo2 ); x );
f := @Implode( f1 : f2; y );


_orig := @If( f_list = "";
  y : y : y;
  v : h : f );
_viertel := @ReplaceSubstring(_orig;"Russland";"Griechenland");

_alt := "Portugal+++Deutschland+++27.06.2012+++20:45+++++++++#####Spanien+++Italien+++28.06.2012+++20:45";
_neu := "Portugal+++Spanien+++27.06.2012+++20:45+++++++++#####Deutschland+++Italien+++28.06.2012+++20:45";
_halb := @ReplaceSubstring(_viertel;_alt;_neu);
_halb

Hat super funktioniert - Vielen Dank!!!
Gespeichert

Offline hylli

  • Frischling
  • *
  • Beiträge: 47
Re: EM 2012 Tippspiel
« Antwort #42 am: 25.06.12 - 12:25:39 »
Ebenfalls herzlichen Dank für die Lösung.

Hylli :)
Gespeichert

Offline Rossi

  • Junior Mitglied
  • **
  • Beiträge: 82
  • Ich liebe dieses Forum!
Re: EM 2012 Tippspiel
« Antwort #43 am: 25.06.12 - 15:05:46 »
Hi es funktioniert leider noch nicht ganz.
Denn wenn man als admin das Endergebnis im Halbfinale eintragen möchte, wechseln die Bezeichnungen  und
es stehen dort Portugal : Deutschland und Spanien : Italien
Gespeichert

Glombi

  • Gast
Re: EM 2012 Tippspiel
« Antwort #44 am: 25.06.12 - 17:55:57 »
Dann muss man es nach dem HF wieder ändern. Ist halt lästig...
Gespeichert

Offline pedsola

  • Aktives Mitglied
  • ***
  • Beiträge: 128
  • Geschlecht: Männlich
    • anders und sehr GmbH - Internetagentur und eCollaboration
Re: EM 2012 Tippspiel
« Antwort #45 am: 26.06.12 - 12:55:47 »
Hallo Manfred,

in dieser Formel hier ist ein Bug:
REM {+++++++ H A L B F I N A L E};
...
hm1 := @If( ht11 = "" | ht12 = ""; ""; ht11 > ht12; @Word( vh1; x; 1 ); @Word( vh1; x; 2 ) ) + x +
       @If( ht31 = "" | ht32 = ""; ""; ht21 > ht22; @Word( vh2; x; 1 ); @Word( vh2; x; 2 ) );
hm2 := @If( ht21 = "" | ht22 = ""; ""; ht31 > ht32; @Word( vh3; x; 1 ); @Word( vh3; x; 2 ) ) + x +
       @If( ht41 = "" | ht42 = ""; ""; ht41 > ht42; @Word( vh4; x; 1 ); @Word( vh4; x; 2 ) );

das muss so heissen (Änderungen rot markiert):
hm1 := @If( ht11 = "" | ht12 = ""; ""; ht11 > ht12; @Word( vh1; x; 1 ); @Word( vh1; x; 2 ) ) + x +
       @If( ht31 = "" | ht32 = ""; ""; ht31 > ht32; @Word( vh3; x; 1 ); @Word( vh3; x; 2 ) );

typischer Cut&Paste Fehler
Gespeichert
Gruß
Pedro

Offline pedsola

  • Aktives Mitglied
  • ***
  • Beiträge: 128
  • Geschlecht: Männlich
    • anders und sehr GmbH - Internetagentur und eCollaboration
Re: EM 2012 Tippspiel
« Antwort #46 am: 26.06.12 - 12:59:50 »
Zitat von: Batped am 26.06.12 - 12:55:47

hm2 := @If( ht21 = "" | ht22 = ""; ""; ht31 > ht32; @Word( vh3; x; 1 ); @Word( vh3; x; 2 ) ) + x +
   

oops, diese Zeile muss auch analog angepasst werden in
hm2 := @If( ht21 = "" | ht22 = ""; ""; ht21 > ht22; @Word( vh2; x; 1 ); @Word( vh2; x; 2 ) ) + x +
Gespeichert
Gruß
Pedro

Offline Fitz

  • Senior Mitglied
  • ****
  • Beiträge: 274
  • Geschlecht: Männlich
Re: EM 2012 Tippspiel
« Antwort #47 am: 26.06.12 - 21:49:13 »
auch von mir ein herzliches Dankeschön an Pedro und Manfred für die Unterstützung!

Ich könnt euch beide  :knuddel:

Gruß
Bernd

P.S.
Ich habe 82 Tippscheine in der DB und alle warten schon dass es weiter geht.....
Gespeichert
9x Domino Server 11.0.1
BlackBerry UEM12 Server
IBM Content Manager, ICC4Mail, eDiscovery Manager
Sametime 11.5
Seiten: 1 2 [3]   Nach oben
« vorheriges nächstes »
 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz