202 |
202 |
203 $cost = ($amount * $costkg) / 1000; |
203 $cost = ($amount * $costkg) / 1000; |
204 $cost_hops += $cost; |
204 $cost_hops += $cost; |
205 $total_hops += $amount; |
205 $total_hops += $amount; |
206 |
206 |
207 $fmoment = 1.0; |
|
208 $moment = hop_useat_names($useat); |
207 $moment = hop_useat_names($useat); |
209 if (($useat == "Dry Hop") || ($useat == "Dry hop")) { |
208 if ($useat == "Boil") { |
210 $fmoment = 0.0; |
|
211 } else if ($useat == "Whirlpool") { |
|
212 $fmoment = 0.0; |
|
213 } else if ($useat == "Mash") { |
|
214 $fmoment = 0.7; // Brouwhulp |
|
215 } else if (($useat == "First Wort") || ($useat == "First wort")) { |
|
216 $fmoment = 1.1; // Brouwhulp, Louis, Ozzie |
|
217 } else if ($useat == "Aroma") { |
|
218 $fmoment = 0.0; // Brouwhulp 1.0 redeneert vlamuit. |
|
219 } else if ($useat == "Boil") { |
|
220 $fmoment = 1.0; |
|
221 $moment = "Kook@".$time; |
209 $moment = "Kook@".$time; |
222 } |
210 } |
223 |
211 $ibu = calc_IBU($useat, $form, floatval($row['est_og']), floatval($row['batch_size']), $mass, $time, $alpha, $row['ibu_method']); |
224 $pfactor = 1.0; |
|
225 if ($form == "Pellet") { |
|
226 $pfactor = 1.1; |
|
227 } |
|
228 |
|
229 /* Tinseth only for now */ |
|
230 $AddedAlphaAcids = (($alpha / 100) * $mass * 1000) / floatval($row['batch_size']); |
|
231 $Bigness_factor = 1.65 * pow( 0.000125, floatval($row['est_og']) - 1); |
|
232 $BoilTime_factor = ((1 - exp(-0.04 * $time)) / 4.15); |
|
233 $utiisation = $Bigness_factor * $BoilTime_factor; |
|
234 $ibu = (round($utiisation * $AddedAlphaAcids * $fmoment * $pfactor * 10) / 10.0); |
|
235 |
212 |
236 $this->Cell($vul,5,$name,0,0,'L',true); |
213 $this->Cell($vul,5,$name,0,0,'L',true); |
237 $this->Cell(35,5,$origin,0,0,'L',true); |
214 $this->Cell(35,5,$origin,0,0,'L',true); |
238 $this->Cell(15,5,hop_form_names($form),0,0,'L',true); |
215 $this->Cell(15,5,hop_form_names($form),0,0,'L',true); |
239 $this->Cell(20,5,$moment,0,0,'L',true); |
216 $this->Cell(20,5,$moment,0,0,'L',true); |