| … | |
… | |
| 1605 | $self->{isInSet} = \%isInSet; |
1605 | $self->{isInSet} = \%isInSet; |
| 1606 | my $jj; |
1606 | my $jj; |
| 1607 | ########## Top part |
1607 | ########## Top part |
| 1608 | print '<span><button id="gridifyButton" onclick="gridify();">Gridify!!</button>'; |
1608 | print '<span><button id="gridifyButton" onclick="gridify();">Gridify!!</button>'; |
| 1609 | print '<span>Hover Magnification: <button type="button" onclick="increaseMagnification();">+</button><span id="magnification">1</span><button type="button" onclick="decreaseMagnification();">-</button></span></span>'; |
1609 | print '<span>Hover Magnification: <button type="button" onclick="increaseMagnification();">+</button><span id="magnification">1</span><button type="button" onclick="decreaseMagnification();">-</button></span></span>'; |
|
|
1610 | print '<button type="button" onclick="toggleHelp(this);" value="false">Help</button>'; |
|
|
1611 | print '<div id="help" style="display:none;position:absolute;z-index:1500;background:white;" class="shadowed">', |
|
|
1612 | '<h1>What can you do?</h1>', |
|
|
1613 | '<p>Drag a problem from the library to the target set to add.</p>', |
|
|
1614 | '<p>Drag a problem set off the target set to remove.</p>', |
|
|
1615 | '<p>If you have a local problem set in the library<br/>you can shift drag to move a problem from there to the target set.<br/>This will remove the problem from one set and add it to the other</p>', |
|
|
1616 | '<h1>Legend</h1>', |
|
|
1617 | '<p><div class="problem" style="width:16px;height:16px;border:solid 1px;"></div><span>Normal problem</span></p>', |
|
|
1618 | '<p><div class="used" style="width:16px;height:16px;border:solid 1px;"></div><span>Problem already in set</span></p>', |
|
|
1619 | '<p><div class="libProblem" style="width:16px;height:16px;border:solid 1px;"></div><span>Problem will be added to target on next update</span></p>', |
|
|
1620 | '<p><div class="removedProblem" style="width:16px;height:16px;border:solid 1px;"></div><span>Problem will be deleted from target on next update</span></p>', |
|
|
1621 | '<p><div class="ResultsWithError" style="width:16px;height:16px;border:solid 1px;"></div><span>Errors</span></p>', |
|
|
1622 | '</div>'; |
|
|
1623 | #'<p>In the target set you can drag problems to reorder them.<br/>The problem will be placed in front of the one you drop it on,<br/>or at the end of the list if you drop it on an empty space in the table.</p>', |
| 1610 | print '<div id="editor-form">'; |
1624 | print '<div id="editor-form">'; |
| 1611 | print CGI::start_form({-method=>"POST", -action=>$r->uri, -name=>'mainform'}), |
1625 | print CGI::start_form({-method=>"POST", -action=>$r->uri, -name=>'mainform'}), |
| 1612 | $self->hidden_authen_fields; |
1626 | $self->hidden_authen_fields; |
|
|
1627 | |
| 1613 | print '<div id="control_panel">'; |
1628 | print '<div id="control_panel">'; |
| 1614 | print '<div id="myset_control" class="mysets control">'; |
1629 | print '<div id="myset_control" class="mysets control">'; |
| 1615 | $self->make_mysets_row('all_db_sets'=>\@all_db_sets); |
1630 | $self->make_mysets_row('all_db_sets'=>\@all_db_sets); |
| 1616 | print '<p><button type="button" onclick="increasMysetsAcross();">+</button><span id="mysetsAcross">1</span><button type="button" onclick="decreaseMysetsAcross();">-</button><span> problems across</span></p>'; |
1631 | print '<p><button type="button" onclick="increasMysetsAcross();">+</button><span id="mysetsAcross">1</span><button type="button" onclick="decreaseMysetsAcross();">-</button><span> problems across</span></p>'; |
| 1617 | print '</div>'; |
1632 | print '</div>'; |
| … | |
… | |
| 1621 | print '</div>'; |
1636 | print '</div>'; |
| 1622 | print '</div>'; |
1637 | print '</div>'; |
| 1623 | print '<div style="clear:both;padding:0px;margin:0px;"></div>'; |
1638 | print '<div style="clear:both;padding:0px;margin:0px;"></div>'; |
| 1624 | ######### Table of mysets problems |
1639 | ######### Table of mysets problems |
| 1625 | print '<div id="problem_container">'; |
1640 | print '<div id="problem_container">'; |
|
|
1641 | print '<div id="mysets_problems_box" class="mysets">'; |
|
|
1642 | print '<h1>Target Set</h1>'; |
| 1626 | print '<div id="mysets_problems" class="problemList mysets">'; |
1643 | print '<div id="mysets_problems" class="problemList">'; |
| 1627 | for ($jj=0; $jj<scalar(@myset_html); $jj++) { |
1644 | for ($jj=0; $jj<scalar(@myset_html); $jj++) { |
| 1628 | $myset_files[$jj] =~ s|^$ce->{courseDirs}->{templates}/?||; |
1645 | $myset_files[$jj] =~ s|^$ce->{courseDirs}->{templates}/?||; |
| 1629 | $self->make_myset_data_row($myset_files[$jj+$first_shown], $myset_html[$jj], $jj+1, $self->{past_marks}->[$jj]); |
1646 | $self->make_myset_data_row($myset_files[$jj+$first_shown], $myset_html[$jj], $jj+1, $self->{past_marks}->[$jj]); |
| 1630 | } |
1647 | } |
| 1631 | print '</div>'; |
1648 | print '</div>'; |
| 1632 | |
1649 | print '</div>'; |
| 1633 | print '<div id="size_slider"><p>||</p></div>'; |
1650 | print '<div id="size_slider"><p>||</p></div>'; |
| 1634 | |
1651 | |
| 1635 | print '<div id="setmaker_library_box" class="setmaker_library">'; |
1652 | print '<div id="setmaker_library_box" class="setmaker_library">'; |
|
|
1653 | print '<h1>Library</h1>'; |
| 1636 | print CGI::hidden(-name=>'browse_which', -value=>$browse_which,-override=>1), |
1654 | print CGI::hidden(-name=>'browse_which', -value=>$browse_which,-override=>1), |
| 1637 | CGI::hidden(-name=>'problem_seed', -value=>$problem_seed, -override=>1); |
1655 | CGI::hidden(-name=>'problem_seed', -value=>$problem_seed, -override=>1); |
| 1638 | for ($j = 0 ; $j < scalar(@pg_files) ; $j++) { |
1656 | for ($j = 0 ; $j < scalar(@pg_files) ; $j++) { |
| 1639 | print CGI::hidden(-name=>"all_past_list$j", -value=>$pg_files[$j],-override=>1); |
1657 | print CGI::hidden(-name=>"all_past_list$j", -value=>$pg_files[$j],-override=>1); |
| 1640 | } |
1658 | } |