From ee552d007c4aa684e751dcac850cf7388b891145 Mon Sep 17 00:00:00 2001 From: emkael Date: Fri, 18 Jan 2019 01:11:54 +0100 Subject: Original code from pzbs.pl --- .htaccess | 2 + .pkle2018-test-w-nawiasie.php | 601 ++++++++++++++++++++++++++++++++++++++++ .pkle2018-test.php | 601 ++++++++++++++++++++++++++++++++++++++++ images/bkg.JPG | Bin 0 -> 885 bytes images/favicon.ico | Bin 0 -> 3638 bytes images/logo_pzbs.gif | Bin 0 -> 1693 bytes images/pkle.png | Bin 0 -> 1744 bytes index.php | 4 + pkle.php | 3 + pkle2009.php | 582 ++++++++++++++++++++++++++++++++++++++ pkle2014.php | 584 +++++++++++++++++++++++++++++++++++++++ pkle2018-test.php | 630 ++++++++++++++++++++++++++++++++++++++++++ pkle2018.php | 588 +++++++++++++++++++++++++++++++++++++++ regKLas.gif | Bin 0 -> 4702 bytes style.css | 13 + 15 files changed, 3608 insertions(+) create mode 100644 .htaccess create mode 100644 .pkle2018-test-w-nawiasie.php create mode 100644 .pkle2018-test.php create mode 100644 images/bkg.JPG create mode 100644 images/favicon.ico create mode 100644 images/logo_pzbs.gif create mode 100644 images/pkle.png create mode 100644 index.php create mode 100644 pkle.php create mode 100644 pkle2009.php create mode 100644 pkle2014.php create mode 100644 pkle2018-test.php create mode 100644 pkle2018.php create mode 100644 regKLas.gif create mode 100644 style.css diff --git a/.htaccess b/.htaccess new file mode 100644 index 0000000..3f9ced3 --- /dev/null +++ b/.htaccess @@ -0,0 +1,2 @@ +RewriteEngine On +RewriteRule ^pkle.php5(.*) pkle.php [R=301,L] diff --git a/.pkle2018-test-w-nawiasie.php b/.pkle2018-test-w-nawiasie.php new file mode 100644 index 0000000..556d782 --- /dev/null +++ b/.pkle2018-test-w-nawiasie.php @@ -0,0 +1,601 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +else*/if( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $rozdan = $_POST['rozdan']; + + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok1 = $_POST['rok1']; + $rok = $_POST['rok']; + $rtp = $_POST['rtp']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + $rgg_ = $_POST['rgg_']; + $rgp_ = $_POST['rgp_']; + $rot_ = $_POST['rot_']; + $rok1_ = $_POST['rok1_']; + $rok_ = $_POST['rok_']; + $rtp_ = $_POST['rtp_']; + $rto_ = $_POST['rto_']; + $rtk_ = $_POST['rtk_']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $mnoznikRZD = $_POST['mnoznikRZD']; + $rzd = $_POST['rzd']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min1_ = $_POST['min1_']; + $min2_ = $_POST['min2_']; + $min3_ = $_POST['min3_']; + $min4_ = $_POST['min4_']; + $min5_ = $_POST['min5_']; + $min6_ = $_POST['min6_']; + $min7_ = $_POST['min7_']; + $min8_ = $_POST['min8_']; + if(!$rozdan): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1; + break; + case 2: + $rng = $rgp; + $minpkl = $min2; + break; + case 3: + $rng = $rot; + $minpkl = $min3; + break; + case 4: + $rng = $rok1; + $minpkl = $min4; + break; + case 5: + $rng = $rok; + $minpkl = $min5; + break; + case 6: + $rng = $rtp; + $minpkl = $min6; + break; + case 7: + $rng = $rto; + $minpkl = $min7; + break; + case 8: + $rng = $rtk; + $minpkl = $min8; + break; + } + else: + switch( $rng ){ + case 1: + $rng = $rgg_; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp_; + $minpkl = $min2_; + break; + case 3: + $rng = $rot_; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1_; + $minpkl = $min4_; + break; + case 5: + $rng = $rok_; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp_; + $minpkl = $min6_; + break; + case 7: + $rng = $rto_; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk_; + $minpkl = $min8_; + break; + } + endif; + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

KALKULATOR PKLI W TURNIEJACH PZBS
+ zgodny z nowa propozycja - mnożnik rozdaniowy tylko na śr.WKxWAGA

+ Przejdź do wersji z mnoznikiem nakładanym na całość! +

+
 
turniej do 39 rozdańturniej od 40 rozdań
WAGA
turnieju		MINIMUM
za 1sze miejsce		WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		 + OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = śr.WK×WAGA + il.zaw×WSP




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ > +

LICZBA ROZDAŃ
+ >
+ > + 		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.		Liczba rozdań
+ 0 ){echo ' value="'.$rzd.'"';}?>>
+ Podaj liczbę rozdań
30 jest po staremu.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.($swk/$izw > 0.15 ? $swk/$izw : 0.15).'"';}?>>
+ 		Mnożnik rozdaniowy (LiczbaRozdań/30):  + 0 ){echo ' value="'.($rzd/30.0 > 1.0 ? $rzd/30.0 : 1.0).'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + $max = ceil(($mnoznikRZD*(($swk/$izw)*$rng) + $izw*$zaw)); + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-6; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=0; + if( ($p>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   
'.$i.''.$p.' 
SUMA PKL'.$typ*$sumn.'
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/.pkle2018-test.php b/.pkle2018-test.php new file mode 100644 index 0000000..958ab50 --- /dev/null +++ b/.pkle2018-test.php @@ -0,0 +1,601 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +else*/if( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $rozdan = $_POST['rozdan']; + + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok1 = $_POST['rok1']; + $rok = $_POST['rok']; + $rtp = $_POST['rtp']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + $rgg_ = $_POST['rgg_']; + $rgp_ = $_POST['rgp_']; + $rot_ = $_POST['rot_']; + $rok1_ = $_POST['rok1_']; + $rok_ = $_POST['rok_']; + $rtp_ = $_POST['rtp_']; + $rto_ = $_POST['rto_']; + $rtk_ = $_POST['rtk_']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $mnoznikRZD = $_POST['mnoznikRZD']; + $rzd = $_POST['rzd']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min1_ = $_POST['min1_']; + $min2_ = $_POST['min2_']; + $min3_ = $_POST['min3_']; + $min4_ = $_POST['min4_']; + $min5_ = $_POST['min5_']; + $min6_ = $_POST['min6_']; + $min7_ = $_POST['min7_']; + $min8_ = $_POST['min8_']; + if(!$rozdan): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1; + break; + case 2: + $rng = $rgp; + $minpkl = $min2; + break; + case 3: + $rng = $rot; + $minpkl = $min3; + break; + case 4: + $rng = $rok1; + $minpkl = $min4; + break; + case 5: + $rng = $rok; + $minpkl = $min5; + break; + case 6: + $rng = $rtp; + $minpkl = $min6; + break; + case 7: + $rng = $rto; + $minpkl = $min7; + break; + case 8: + $rng = $rtk; + $minpkl = $min8; + break; + } + else: + switch( $rng ){ + case 1: + $rng = $rgg_; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp_; + $minpkl = $min2_; + break; + case 3: + $rng = $rot_; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1_; + $minpkl = $min4_; + break; + case 5: + $rng = $rok_; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp_; + $minpkl = $min6_; + break; + case 7: + $rng = $rto_; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk_; + $minpkl = $min8_; + break; + } + endif; + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

KALKULATOR PKLI W TURNIEJACH PZBS
+ zgodny z nowa propozycja - mnożnik rozdaniowy nakłądany (śr.WKxWAGA+il.zawXWSP)

+ Przejdź do wersji z mnoznikiem nakładanym tylko na śr.WKxWAGA! +

+
 
turniej do 39 rozdańturniej od 40 rozdań
WAGA
turnieju		MINIMUM
za 1sze miejsce		WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		 + OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = śr.WK×WAGA + il.zaw×WSP




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ > +

LICZBA ROZDAŃ
+ >
+ > + 		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.		Liczba rozdań
+ 0 ){echo ' value="'.$rzd.'"';}?>>
+ Podaj liczbę rozdań
30 jest po staremu.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.($swk/$izw > 0.15 ? $swk/$izw : 0.15).'"';}?>>
+ 		Mnożnik rozdaniowy (LiczbaRozdań/30):  + 0 ){echo ' value="'.($rzd/30.0 > 1.0 ? $rzd/30.0 : 1.0).'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + $max = ceil($mnoznikRZD*(($swk/$izw)*$rng + $izw*$zaw)); + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-6; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=0; + if( ($p>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   
'.$i.''.$p.' 
SUMA PKL'.$typ*$sumn.'
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/images/bkg.JPG b/images/bkg.JPG new file mode 100644 index 0000000..fd04a6f Binary files /dev/null and b/images/bkg.JPG differ diff --git a/images/favicon.ico b/images/favicon.ico new file mode 100644 index 0000000..0edfe3a Binary files /dev/null and b/images/favicon.ico differ diff --git a/images/logo_pzbs.gif b/images/logo_pzbs.gif new file mode 100644 index 0000000..8d57c1b Binary files /dev/null and b/images/logo_pzbs.gif differ diff --git a/images/pkle.png b/images/pkle.png new file mode 100644 index 0000000..597ad54 Binary files /dev/null and b/images/pkle.png differ diff --git a/index.php b/index.php new file mode 100644 index 0000000..60e3e88 --- /dev/null +++ b/index.php @@ -0,0 +1,4 @@ + + + + diff --git a/pkle.php b/pkle.php new file mode 100644 index 0000000..8159e28 --- /dev/null +++ b/pkle.php @@ -0,0 +1,3 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +elseif( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok = $_POST['rok']; + $r40 = $_POST['r40']; + $rtp = $_POST['rtp']; + $rtd = $_POST['rtd']; + $rtr = $_POST['rtr']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min9 = $_POST['min9']; + switch( $rng ){ + case 20: + $rng = $rgg; + $xrng = $xrgg; + $minpkl = $min1; + break; + case 16: + $rng = $rgp; + $xrng = $xrgp; + $minpkl = $min2; + break; + case 12: + $rng = $rot; + $xrng = $xrot; + $minpkl = $min3; + break; + case 9: + $rng = $rok; + $xrng = $xrok; + $minpkl = $min4; + break; + case 8: + $rng = $r40; + $xrng = $xr40; + $minpkl = $min5; + break; + case 7: + $rng = $rtp; + $xrng = $xrtp; + $minpkl = $min6; + break; + case 6: + $rng = $rtd; + $xrng = $xrtd; + $minpkl = $mind; + break; + case 5: + $rng = $rtr; + $xrng = $xrtr; + $minpkl = $min7; + break; + case 3: + $rng = $rto; + $xrng = $xrto; + $minpkl = $min8; + break; + case 2: + $rng = $rtk; + $xrng = $xrtk; + $minpkl = $min9; + break; + } + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

KALKULATOR PKLI W TURNIEJACH PZBS
+ zgodny ze starym regulaminem (01.10.2009 - 31.03.2014)

+ Przejdź do kalkulatora zgodnego z nowym regulaminem! +

+ Możesz eksperymentować ze wszystkimi (prawie) parametrami.
+ Dla przywrócenia stanu regulaminowego otwórz ponownie stronę.
 
WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP: >
+ OTP krótki: >
+ Regionalny∗: >
+ Regionalny+40r: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = śr.WK×WAGA + il.zaw×WSP




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ >		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.$swk/$izw.'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + $max = ceil(($swk/$izw)*$rng + $izw*$zaw); + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + switch( $rng ){ + case $rgg: + case $rgp: + $prcold = 0.1; + break; + case $rot: + $prcold = 0.1; + break; + case $rok: + case $r40: + $prcold = 0.06; + break; + case $rtp: + case $rtr: + $prcold = 0.06; + if( $dajp ){ + $prem = 3; + } + break; + case $rto: + $prcold = 0.05; + break; + case $rtk: + $prcold = 0.04; + break; + } + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-15; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=0; + if( ($p>0) || ($maxold>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + if( $maxold>0 ){ + echo ''; + if( $maxold<10 ){ + switch( $typ ){ + case 4: + $zni = 2; + break; + case 2: + $zni = 1; + break; + } + } + $maxold = $maxold - $zni; + if( $prem>0 ){ + if( $prem==3 ){ + $d = 1; + } else { + if( $prem==1 ){ + $d = 0; + } + } + $prem = $prem - 1; + } + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   dotychczas
'.$i.''.$p.' '; + if( $i>($iuc/2) ){ + echo ' '; + } else { + $sumo = $sumo + $maxold + $d; + } + echo ($maxold + $d); + if( $i>($iuc/2) ){ + echo ' '; + } + echo ' 
SUMA PKL'.$typ*$sumn.''.$typ*$sumo.'
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/pkle2014.php b/pkle2014.php new file mode 100644 index 0000000..8f0bbc7 --- /dev/null +++ b/pkle2014.php @@ -0,0 +1,584 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +else*/if( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $rozdan = $_POST['rozdan']; + + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok1 = $_POST['rok1']; + $rok = $_POST['rok']; + $rtp = $_POST['rtp']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + $rgg_ = $_POST['rgg_']; + $rgp_ = $_POST['rgp_']; + $rot_ = $_POST['rot_']; + $rok1_ = $_POST['rok1_']; + $rok_ = $_POST['rok_']; + $rtp_ = $_POST['rtp_']; + $rto_ = $_POST['rto_']; + $rtk_ = $_POST['rtk_']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min1_ = $_POST['min1_']; + $min2_ = $_POST['min2_']; + $min3_ = $_POST['min3_']; + $min4_ = $_POST['min4_']; + $min5_ = $_POST['min5_']; + $min6_ = $_POST['min6_']; + $min7_ = $_POST['min7_']; + $min8_ = $_POST['min8_']; + if(!$rozdan): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1; + break; + case 2: + $rng = $rgp; + $minpkl = $min2; + break; + case 3: + $rng = $rot; + $minpkl = $min3; + break; + case 4: + $rng = $rok1; + $minpkl = $min4; + break; + case 5: + $rng = $rok; + $minpkl = $min5; + break; + case 6: + $rng = $rtp; + $minpkl = $min6; + break; + case 7: + $rng = $rto; + $minpkl = $min7; + break; + case 8: + $rng = $rtk; + $minpkl = $min8; + break; + } + else: + switch( $rng ){ + case 1: + $rng = $rgg_; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp_; + $minpkl = $min2_; + break; + case 3: + $rng = $rot_; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1_; + $minpkl = $min4_; + break; + case 5: + $rng = $rok_; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp_; + $minpkl = $min6_; + break; + case 7: + $rng = $rto_; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk_; + $minpkl = $min8_; + break; + } + endif; + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

KALKULATOR PKLI W TURNIEJACH PZBS
+ zgodny z starym regulaminem (obowiązującym do 01.11.2018)

+ Przejdź do kalkulatora zgodnego z nowym regulaminem! +

+ Możesz eksperymentować ze wszystkimi (prawie) parametrami.
+ Dla przywrócenia stanu regulaminowego otwórz ponownie stronę.
 
turniej do 39 rozdańturniej od 40 rozdań
WAGA
turnieju		MINIMUM
za 1sze miejsce		WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		 + OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = śr.WK×WAGA + il.zaw×WSP




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ > +

LICZBA ROZDAŃ
+ >
+ > + 		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.($swk/$izw > 0.15 ? $swk/$izw : 0.15).'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + $max = ceil(($swk/$izw)*$rng + $izw*$zaw); + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-6; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=0; + if( ($p>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   
'.$i.''.$p.' 
SUMA PKL'.$typ*$sumn.'
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/pkle2018-test.php b/pkle2018-test.php new file mode 100644 index 0000000..9e60c70 --- /dev/null +++ b/pkle2018-test.php @@ -0,0 +1,630 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +else*/if( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $rozdan = $_POST['rozdan']; + + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok1 = $_POST['rok1']; + $rok = $_POST['rok']; + $rtp = $_POST['rtp']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + $rgg_ = $_POST['rgg_']; + $rgp_ = $_POST['rgp_']; + $rot_ = $_POST['rot_']; + $rok1_ = $_POST['rok1_']; + $rok_ = $_POST['rok_']; + $rtp_ = $_POST['rtp_']; + $rto_ = $_POST['rto_']; + $rtk_ = $_POST['rtk_']; + $rozdan3 = $_POST['rozdan3']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min1_ = $_POST['min1_']; + $min2_ = $_POST['min2_']; + $min3_ = $_POST['min3_']; + $min4_ = $_POST['min4_']; + $min5_ = $_POST['min5_']; + $min6_ = $_POST['min6_']; + $min7_ = $_POST['min7_']; + $min8_ = $_POST['min8_']; + if($rozdan == 0): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1; + break; + case 2: + $rng = $rgp; + $minpkl = $min2; + break; + case 3: + $rng = $rot; + $minpkl = $min3; + break; + case 4: + $rng = $rok1; + $minpkl = $min4; + break; + case 5: + $rng = $rok; + $minpkl = $min5; + break; + case 6: + $rng = $rtp; + $minpkl = $min6; + break; + case 7: + $rng = $rto; + $minpkl = $min7; + break; + case 8: + $rng = $rtk; + $minpkl = $min8; + break; + } + + elseif ($rozdan == 2): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp; + $minpkl = $min2_; + break; + case 3: + $rng = $rot; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1; + $minpkl = $min4_; + break; + case 5: + $rng = $rok; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp; + $minpkl = $min6_; + break; + case 7: + $rng = $rto; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk; + $minpkl = $min8_; + break; + } + + else: + switch( $rng ){ + case 1: + $rng = $rgg_; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp_; + $minpkl = $min2_; + break; + case 3: + $rng = $rot_; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1_; + $minpkl = $min4_; + break; + case 5: + $rng = $rok_; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp_; + $minpkl = $min6_; + break; + case 7: + $rng = $rto_; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk_; + $minpkl = $min8_; + break; + } + endif; + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

PROPOZYCJA KALKULATORA
+ zgodnego z propozycją aktualzacji Regulaminu Klasyfikacyjnego

+
+ W "LICZBA ROZDAŃ" wybierz opcję "nowyRK" i podaj liczbę
rozdań żeby skorzystać z nowych zasad + +
 
turniej do 39 rozdań
(wagi w nowyRK)		turniej od 40 rozdań
(minimum w nowyRK)
WAGA
turnieju		MINIMUM
za 1sze miejsce		WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		 + OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = sprawdź w mailu




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ > +

LICZBA ROZDAŃ
+ >
+ >
+ > + 0 ){echo ' value="'.$rozdan3.'"';}?>> + 		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.($swk/$izw > 0.15 ? $swk/$izw : 0.15).'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + if ($rozdan == 2) { + $max = ceil(($swk/$izw)*$rng + $izw*$zaw); + $max = pow(log(($rozdan3/2-5),10),2)*$max; + } + else { + $max = ceil(($swk/$izw)*$rng + $izw*$zaw); + } + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-6; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=0; + if( ($p>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   
'.$i.''.$p.' 
SUMA PKL'.$typ*$sumn.'+ dla reszty po 1
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/pkle2018.php b/pkle2018.php new file mode 100644 index 0000000..a851ead --- /dev/null +++ b/pkle2018.php @@ -0,0 +1,588 @@ +2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + if( $l > 3 ) $tab = 1; +} +else*/if( $_SERVER['REQUEST_METHOD'] == 'POST' ){ + $rozdan = $_POST['rozdan']; + + $progu1 = $_POST['pru1']; // dla pierwszych progu1% uczestników + $progp1 = $_POST['prp1']; // ostatni dostaje progp1% maximum punktów + $progu2 = $_POST['pru2']; // dla kolejnych (progu2-progu1)% uczestników + $progp2 = $_POST['prp2']; // ostatni dostaje 10*progp2% maximum punktów + $progu3 = $_POST['pru3']; // dla kolejnych (progu3-progu2)% uczestników + $rgg = $_POST['rgg']; + $rgp = $_POST['rgp']; + $rot = $_POST['rot']; + $rok1 = $_POST['rok1']; + $rok = $_POST['rok']; + $rtp = $_POST['rtp']; + $rto = $_POST['rto']; + $rtk = $_POST['rtk']; + $rgg_ = $_POST['rgg_']; + $rgp_ = $_POST['rgp_']; + $rot_ = $_POST['rot_']; + $rok1_ = $_POST['rok1_']; + $rok_ = $_POST['rok_']; + $rtp_ = $_POST['rtp_']; + $rto_ = $_POST['rto_']; + $rtk_ = $_POST['rtk_']; + + $typ = $_POST['typ']; + $rng = $_POST['rng']; + $zaw = $_POST['zaw']; + $min1 = $_POST['min1']; + $min2 = $_POST['min2']; + $min3 = $_POST['min3']; + $min4 = $_POST['min4']; + $min5 = $_POST['min5']; + $min6 = $_POST['min6']; + $min7 = $_POST['min7']; + $min8 = $_POST['min8']; + $min1_ = $_POST['min1_']; + $min2_ = $_POST['min2_']; + $min3_ = $_POST['min3_']; + $min4_ = $_POST['min4_']; + $min5_ = $_POST['min5_']; + $min6_ = $_POST['min6_']; + $min7_ = $_POST['min7_']; + $min8_ = $_POST['min8_']; + if(!$rozdan): + switch( $rng ){ + case 1: + $rng = $rgg; + $minpkl = $min1; + break; + case 2: + $rng = $rgp; + $minpkl = $min2; + break; + case 3: + $rng = $rot; + $minpkl = $min3; + break; + case 4: + $rng = $rok1; + $minpkl = $min4; + break; + case 5: + $rng = $rok; + $minpkl = $min5; + break; + case 6: + $rng = $rtp; + $minpkl = $min6; + break; + case 7: + $rng = $rto; + $minpkl = $min7; + break; + case 8: + $rng = $rtk; + $minpkl = $min8; + break; + } + else: + switch( $rng ){ + case 1: + $rng = $rgg_; + $minpkl = $min1_; + break; + case 2: + $rng = $rgp_; + $minpkl = $min2_; + break; + case 3: + $rng = $rot_; + $minpkl = $min3_; + break; + case 4: + $rng = $rok1_; + $minpkl = $min4_; + break; + case 5: + $rng = $rok_; + $minpkl = $min5_; + break; + case 6: + $rng = $rtp_; + $minpkl = $min6_; + break; + case 7: + $rng = $rto_; + $minpkl = $min7_; + break; + case 8: + $rng = $rtk_; + $minpkl = $min8_; + break; + } + endif; + $iuc = $_POST['iuc']; + if( $typ>2 ) $typ = 4; + $izw = $typ*$iuc; + if( $izw > 99 ){ + $dajp = 1; + } + $swk = $_POST['swk']; + $tab = 1; +} +?> + + + + + + +Kargulator PKLi + + + + + + +
+ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +

KALKULATOR PKLI W TURNIEJACH PZBS
+ zgodny z nowym regulaminem (obowiązującym od 01.11.2018)

+ Przejdź do kalkulatora zgodnego ze starym regulaminem! +

+ Możesz eksperymentować ze wszystkimi (prawie) parametrami.
+ Dla przywrócenia stanu regulaminowego otwórz ponownie stronę.
 
turniej do 39 rozdańturniej od 40 rozdań
WAGA
turnieju		MINIMUM
za 1sze miejsce		WAGA
turnieju		MINIMUM
za 1sze miejsce		WSP:
+ OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		 + OTP∗∗∗∗: >
+ OTP∗∗∗: >
+ OTP∗∗: >
+ OTP∗: >
+ OTP: >
+ Regionalny: >
+ Okręgowy: >
+ Klubowy: >		 + >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		>PKL za 1 m = śr.WK×WAGA + il.zaw×WSP




>%
>%
 
>%>%>%
 
TYP ZAWODÓW
+ >
+ >
+ > +

LICZBA ROZDAŃ
+ >
+ > + 		RANGA ZAWODÓW
+ >
+ >
+ >
+ >
+ >
+ >
+ >
+ >		UCZESTNIKÓW
+ 0 ){echo ' value="'.$iuc.'"';}?>>
+ W zależności od typu
ilość indywidualistów,
par lub teamów		ZAWODNIKÓW
+ 0 ){echo ' value="'.$izw.'"';}?>>
+ To pole jest wyliczane
automatycznie.		SUMA WK
+ 0 ){echo ' value="'.$swk.'"';}?>>
+ Suma WK wszystkich
zawodników.
Średnie WK zawodnika w turnieju:  + 0 ){echo ' value="'.($swk/$izw > 0.15 ? $swk/$izw : 0.15).'"';}?>>
+
 
+ +0 ){ + echo ' + '; +} else { + echo ' '; +} +?> +
+0 ){ + unset( $tabpkl ); + $lasti = 0; + echo ''; + echo ''; + // #zmiany2018 - poprzednie brzmienie: $max = ceil(($swk/$izw)*$rng + $izw*$zaw); + $max = ($swk/$izw)*$rng + $izw*$zaw; + if($typ == 4) $max = $max*1.25; // mnożnik 1.25 dla teamów UCHWAŁA Zarządu NR 52/2018/2016–2020 + $max = ceil($max); + // #zmiany2018 - koniec zmienionego fragmentu + if( $max<$minpkl ) $max = $minpkl; + $prem = 0; + $zni = 1; + switch( $typ ){ + case 2: + $zni = 2; + break; + case 4: + $zni = 4; + break; + } + if( $prem>0 ){ + $d = 2; + } else { + $d = 0; + } + $maxold = ceil($prcold*$izw + 0.05*$swk); + $progu1 = $progu1*$iuc*0.01+1; + $progu2 = $progu2*$iuc*0.01+1; + $progu3 = $progu3*$iuc*0.01+1; // 0 pkl za ostatnie punktowane+1 + $progp1 = $max*$progp1*0.01; + $progp2 = $max*$progp2*0.01; + $sumn = 0 ; + $sumo = 0; + $i = 0; + $dok = 1 - 1e-6; // unikamy błędu ceil(2)=3; + do{ + $i++; + if( $i<=$progu1 ){ + $p = $progp1+($max-$progp1)*($progu1-$i)/($progu1-1); + } + elseif( $i<=$progu2 ){ + $p = $progp2+($progp1-$progp2)*($progu2-$i)/($progu2-$progu1); + } + elseif( $i<$progu3 ){ + $p = $progp3+($progp2-$progp3)*($progu3-$i)/($progu3-$progu2); + } + else $p=1; // #zmiany2018 - zmiana wartości z 0 na 1, UCHWAŁA Zarządu NR 67/2018/2016–2020 + if( ($p>0) ){ + echo ''; + if( $p>0 ){ + $pkl_temp = ceil($p); + if (($pkl_temp - $p) < $dok){ + $p = $pkl_temp; + } else { + $p = round($p); + } + $tabkl[$i] = $p; + $lasti = $i; + echo ''; + $sumn = $sumn + $p; + } else { + echo ''; + } + echo ''; + } + } while( (($p>0) || ($maxold>0)) && ($i<$iuc) ); + echo ''; + echo '
Miejsce   PKL   
'.$i.''.$p.' 
SUMA PKL'.$typ*$sumn.'
'; +} else { + echo ' '; +} +?> +
©'2009, Jan Romański dla PZBS
+
+ + diff --git a/regKLas.gif b/regKLas.gif new file mode 100644 index 0000000..d4cff64 Binary files /dev/null and b/regKLas.gif differ diff --git a/style.css b/style.css new file mode 100644 index 0000000..f226e5b --- /dev/null +++ b/style.css @@ -0,0 +1,13 @@ +body {background-color: #FFFFCC; background-image: url("images/bkg.JPG")} +a:link { color: #336699; font-family: Arial; text-decoration: underline; } +a:visited { color: #336699; font-family: Arial; text-decoration: underline; } +a:hover { color: #990000; font-family: Arial; text-decoration: underline; } +a:active { color: #336699; font-family: Arial; text-decoration: underline; } +input, textarea, select { font-size: 10pt; font-family: Arial } +td {padding: 1px 12px 1px 12px; font-family: Arial; font-size: 10pt; white-space: nowrap} +td.t {padding: 1px; border: 1px solid #008000; text-align: center; font-size: 10pt; white-space: nowrap} +td.s {padding: 1px; border: 1px solid #A0A0A0; text-align: center; font-size: 10pt; white-space: nowrap; color: #A0A0A0} +td.p {padding: 1px; font-size: 10pt} +hr {color: #0000A0} +/* Copyright */ +.copyright {padding: 0px; color: #555555; font-size: 8pt; font-family: Arial; text-align: center; border: 1px dotted #004000} -- cgit v1.2.3