Someone

on *:text:!tletters:#:{ 
  notice $nick 4Trigger Letters for !maxhit - 
  notice $nick 4-s 12Salve Amulet 4-w12 Salve Amulet(e) 4-b12 Black Mask
  notice $nick 4-u 12Ultimate Str Prayer 4-p12 Superhuman Str 4-q12 Burst of Str
  notice $nick 12Also you must specify 4-c12 for controlled attack 4-a12 for aggresive
  notice $nick 12or 4-o12 to do other attack 
}

ON *:TEXT:!maxhit*:#:{ 
  set %return [ $+ [ $nick ] ] notice $nick
  if ($2 == $null) { 
    %return [ $+ [ $nick ] ] 4Syntax Error12 type !maxhit (Trigger Letters) (Str Lvl) (Str Bonus) 
    %return [ $+ [ $nick ] ] 12Something like this !maxhit -aq 54 90
    %return [ $+ [ $nick ] ] 12Type !tletters to see Trigger Letters
    halt 
  } 
  if (- isin $2) { 
    set %b [ $+ [ $nick ] ] 1 
    if (s isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.20 ) } 
    if (w isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.15 ) } 
    if (b isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.15 ) } 
    if (u isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.15 ) } 
    if (p isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.10 ) } 
    if (q isin $2) { set %b [ $+ [ $nick ] ] $calc( %b [ $+ [ $nick ] ] + 0.05 ) } 
    if (c isin $2) { set %a [ $+ [ $nick ] ] $calc( %a [ $+ [ $nick ] ] + 1 ) } 
    if (a isin $2) { set %a [ $+ [ $nick ] ] $calc( %a [ $+ [ $nick ] ] + 3 ) } 
    if (o isin $2) { set %a [ $+ [ $nick ] ] $calc( %a [ $+ [ $nick ] ] + 0 ) } 
    set %a [ $+ [ $nick ] ] $3 
    set %d [ $+ [ $nick ] ] $4 
    set %c [ $+ [ $nick ] ] $calc( %a [ $+ [ $nick ] ] * %b [ $+ [ $nick ] ] ) 
    set %e [ $+ [ $nick ] ] $log( %c [ $+ [ $nick ] ] ) 
    set %e [ $+ [ $nick ] ] $calc( %e [ $+ [ $nick ] ] * 0.1085 ) 
    inc %e [ $+ [ $nick ] ] 
    set %e [ $+ [ $nick ] ] $calc( %e [ $+ [ $nick ] ] * %d [ $+ [ $nick ] ] ) 
    set %e [ $+ [ $nick ] ] $calc( %e [ $+ [ $nick ] ] / 100 ) 
    set %e [ $+ [ $nick ] ] $calc( %c [ $+ [ $nick ] ] * %e [ $+ [ $nick ] ] ) 
    set %e [ $+ [ $nick ] ] $calc( %e [ $+ [ $nick ] ] + %c [ $+ [ $nick ] ] ) 
    set %e [ $+ [ $nick ] ] $calc( %e [ $+ [ $nick ] ] / 10 ) 
    %return [ $+ [ $nick ] ] 12Maxhit4 - $+ $floor( %e [ $+ [ $nick ] ] ) 
  } 
  else { %return [ $+ [ $nick ] ] 4Error 12- Type 4!maxhit12 for help!
  }
}