All pastes #428345 Raw Edit

Stuff

public text v1 · immutable
·published 2007-04-07 14:34 UTC
rendered paste body
[00:32] <elle_mcpherson> !quadratic 1 5 -6
[00:32] <calc> 1. -2.5 ; 2. -2.5 ; 3. 0 ; 4. 0


on *:TEXT:!quadratic *:#: {
  set %a $2
  set %b $3
  set %c $4

  %part1 = $calc( -1 * %b )
  %part2 = $calc( %b * %b )
  %part3 = $calc( 4 * %a * %c )
  %part4 = $calc( %part2 - %part3 )
  %part5 = $calc( 2 * %a )


  %quad1 = $calc( ( ( -1 * %b ) + $sqrt( ( %b * %b ) - ( 4 * %a * %c ) ) ) / 2 * %a )
  %quad2 = $calc( ( ( -1 * %b ) - $sqrt( ( %b * %b ) - ( 4 * %a * %c ) ) ) / 2 * %a )
  %quad3 = $calc(( %part1 + sqrt( %part4 )) / %part5 )
  %quad4 = $calc(( %part1 - sqrt( %part4 )) / %part5 )

  /msg $chan 1. %quad1 ; 2. %quad2 ; 3.  %quad3 ; 4. %quad4  
}