function genpack($set) { $pack = array(); $card = 0; $ndx = -1; $list = setList($set); drShuffle($list); while ($card < 1) { $ndx++; if ($list[$ndx]["isw"] == 1 && $list[$ndx]["name"] != "") { $pack[$card] = $list[$ndx]["name"]; $card++; } } while ($card < 2) { $ndx++; if ($list[$ndx]["isg"] == 1 && $list[$ndx]["name"] != "") { $pack[$card] = $list[$ndx]["name"]; $card++; } } while ($card < 3) { $ndx++; if ($list[$ndx]["isu"] == 1 && $list[$ndx]["name"] != "") { $pack[$card] = $list[$ndx]["name"]; $card++; } } while ($card < 4) { $ndx++; if ($list[$ndx]["isr"] == 1 && $list[$ndx]["name"] != "") { $pack[$card] = $list[$ndx]["name"]; $card++; } } while ($card < 5) { $ndx++; if ($list[$ndx]["isb"] == 1 && $list[$ndx]["name"] != "") { $pack[$card] = $list[$ndx]["name"]; $card++; } } while ($card < 11) { if ($list[$ndx]["name"] != "") { $ndx++; $pack[$card] = $list[$ndx]["name"]; $card++; } } return $pack; }
echo "<script> alert('" . $writer->getError() . "'); window.history.go(-1); </script>\n"; exit; } mosRedirect("index2.php?option=com_chordbase&task=writerList"); break; case "removeWriter": remove($cid, "writers", "writer_id", "writerList"); break; case "publishWriter": publish($cid, 1, "writers", "writerList", "published", "writer_id"); break; case "unpublishWriter": publish($cid, 0, "writers", "writerList", "published", "writer_id"); break; case "setList": setList(); break; case "newSet": HTML_chordbase::cb_header("Sets"); $set = new cbSet($database, "#__cb_"); $set->published = 1; $set->form("index2.php?option=com_chordbase&task=saveSet"); break; case "editSet": HTML_chordbase::cb_header("Set Editor"); $set = new cbSet($database, "#__cb_"); $set->load($set_id); $set->form("index2.php?option=com_chordbase&task=saveSet"); break; case "saveSet": $set = new cbSet($database, "#__cb_");