Someone

/ch { var %crimson = 4Crimson: $2 ( $+ $bytes($calc( $2 * %vermelho ),db) $+ )
  var %gold = 7Gold: $1 ( $+ $bytes($calc( $1 * %dourado ),db) $+ )
  var %green = 3Green: $3 ( $+ $bytes($calc( $3 * %verde ),db) $+ )
  var %blue = 10Blue: $4 ( $+ $bytes($calc( $4 * %azul ),db) $+ )
  var %total = $bytes($calc( ( $1 * %dourado) + ( $2 * %vermelho ) + ( $4 * %azul ) + ( $3 * %verde) ),db)
/say Charms: %gold %crimson %green %blue - %total overall exp. Ending up with7 $bytes($calc( %currentxp + (  $2 * %vermelho ) + ( $1 * %dourado ) + ( $3 * %verde ) + ( $4 * %azul ) ),db) $+  Summoning experience. }
/setgreen /set %verde $1
/setcrimson /set %vermelho $1
/setblue /set %azul $1
/setgold /set %dourado $1
/setall /set %dourado $1 | /set %vermelho $2 | /set %verde $3 | /set %azul $4 | notice $me You set your exp for:7 %dourado each Gold charm;4 %vermelho each Crimson charm;3 %verde each Green charm and10 %azul each Blue charm
/setxp /set %currentxp $1 | notice $me You set your current Summoning experience to7 $bytes($calc( %currentxp * 1 ),db) $+ .