@temp = $blocks[$blockcount][4];
$blocks[$blockcount][4] = $blocks[$blockcount][5];
$blocks[$blockcount][5] = @temp;