All pastes #951548 Raw Edit

Someone

public text v1 · immutable
·published 2008-03-21 14:08 UTC
rendered paste body
on *:text:!seeds*:#:{
  if ( $2 !isnum ) { notice $nick Syntax: !seeds <number> <seed> | halt }
  var %1 $calc( $2 * $read(seeds.txt, s, $3 )) | var %total $calc( %1 + 0 ),bd)
  if ( $4 == $null ) { goto end }
  var %2 $calc( $4 * $read(seeds.txt, s, $5 )) | var %total $calc( %total + %2 ),bd)
  if ( $6 == $null ) { goto end }
  var %3 $calc( $6 * $read(seeds.txt, s, $7 )) | var %total $calc( %total + %3 ),bd) 
  if ( $8 == $null ) { goto end }
  var %4 $calc( $8 * $read(seeds.txt, s, $9 )) | var %total $calc( %total + %4 ),bd)
  if ( $10 == $null ) { goto end }
  var %5 $calc( $10 * $read(seeds.txt, s, $11 )) | var %total $calc( %total + %5 ),bd)
  if ( $12 == $null ) { goto end }
  var %6 $calc( $12 * $read(seeds.txt, s, $13 )) | var %total $calc( %total + %6 ),bd)
  if ( $14 == $null ) { goto end }
  var %7 $calc( $14 * $read(seeds.txt, s, $15 )) | var %total $calc( %total + %7 ),bd)
  if ( $16 == $null ) { goto end }
  var %8 $calc( $16 * $read(seeds.txt, s, $17 )) |  var %total $calc( %total + %8 ),bd)
  if ( $18 == $null ) { goto end }
  var %9 $calc( $18 * $read(seeds.txt, s, $19 )) |  var %total $calc( %total + %9 ),bd)
  if ( $20 == $null ) { goto end }
  var %10 $calc( $20 * $read(seeds.txt, s, $21 )) | var %total $calc( %total + %10 ),bd)
  if ( $22 == $null ) { goto end }
  var %11 $calc( $22 * $read(seeds.txt, s, $23 )) | var %total $calc( %total + %11 ),bd)
  if ( $24 == $null ) { goto end }
  var %12 $calc( $24 * $read(seeds.txt, s, $25 )) | var %total $calc( %total + %12 ),bd)
  if ( $26 == $null ) { goto end }
  var %13 $calc( $26 * $read(seeds.txt, s, $27 )) | var %total $calc( %total + %13 ),bd)
  if ( $28 == $null ) { goto end }
  var %14 $calc( $28 * $read(seeds.txt, s, $29 )) | var %total $calc( %toal + %14 ),bd)
  if ( $30 == $null ) { goto end }
  var %15 $calc( $30 * $read(seeds.txt, s, $31 )) |  var %total $calc( %total + %15 ),bd)
  if ( $32 == $null ) { goto end }
  var %16 $calc( $32 * $read(seeds.txt, s, $33 )) |  var %total $calc( %total + %16 ),bd)
  if ( $34 == $null ) { goto end }
  var %17 $calc( $34 * $read(seeds.txt, s, $35 )) | var %total $calc( %total + %17 ),bd)
  if ( $36 == $null ) { goto end }
  :end
  msg $chan 4 $+ $3 12,00 $+ $bytes(%1,bd) 4 $+ $5 12,00 $+ $bytes(%2,bd) 4 $+ $7 12,00 $+ $bytes(%3,bd) 4 $+ $9 12,00 $+ $bytes(%4,bd) 4 $+ $11 12,00 $+ $bytes(%5,bd) 4 $+ $13 12,00 $+ $bytes(%6,bd) 4 $+ $15 12,00 $+ $bytes(%7,bd) 4 $+ $17 12,00 $+ $bytes(%8,bd) 4 $+ $19 12,00 $+ $bytes(%9,bd) 4 $+ $21 12,00 $+ $bytes(%10,bd) 4 $+ $23 12,00 $+ $bytes(%11,bd) 4 $+ $25 12,00 $+ $bytes(%12,bd) 4 $+ $27 12,00 $+ $bytes(%13,bd) 4 $+ $29 12,00 $+ $bytes(%14,bd) 4 $+ $31 12,00 $+ $bytes(%15,bd) 4 $+ $33 12,00 $+ $bytes(%16,bd) 4 $+ $35 12,00 $+ $bytes(%17,bd) 4Total: 12 $+ $bytes(%total,bd) 
}