version 1.49, 2010/12/03 00:52:59
|
version 1.52, 2011/01/26 20:20:50
|
Line 108 sub init_script {
|
Line 108 sub init_script {
|
$script.="if (param=='applet_$id') { loaded_$id=true; }\n"; |
$script.="if (param=='applet_$id') { loaded_$id=true; }\n"; |
} |
} |
$script.="if (".join(' && ',map { "loaded_$_" } (@Apache::functionplotresponse::callscripts)). |
$script.="if (".join(' && ',map { "loaded_$_" } (@Apache::functionplotresponse::callscripts)). |
") { setTimeout('ggbInitAll()',20) }"; |
") { setTimeout('ggbInitAll()',200) }"; |
my $calls=join("\n",map { "ggbInit_$_();" } (@Apache::functionplotresponse::callscripts)); |
my $calls=join("\n",map { "ggbInit_$_();" } (@Apache::functionplotresponse::callscripts)); |
return (<<ENDGGBINIT); |
return (<<ENDGGBINIT); |
<script type="text/javascript"> |
<script type="text/javascript"> |
Line 184 sub set_slope_coordinate {
|
Line 184 sub set_slope_coordinate {
|
my $mult=($fixed?'a*':''); |
my $mult=($fixed?'a*':''); |
return (<<ENDSETSVARIABLE); |
return (<<ENDSETSVARIABLE); |
document.ggbApplet_$id.evalCommand("a=1"); |
document.ggbApplet_$id.evalCommand("a=1"); |
document.ggbApplet_$id.evalCommand("$xvariable=Slider[0,$domain,$xinterval]"); |
document.ggbApplet_$id.evalCommand("$xvariable=Slider[$xinterval,$domain,$xinterval]"); |
document.ggbApplet_$id.setVisible("$xvariable", false); |
document.ggbApplet_$id.setVisible("$xvariable", false); |
document.ggbApplet_$id.evalCommand("$xvariable=$xrel"); |
document.ggbApplet_$id.evalCommand("$xvariable=$xrel"); |
document.ggbApplet_$id.evalCommand("$yvariable=Slider[-$range,$range,$yinterval]"); |
document.ggbApplet_$id.evalCommand("$yvariable=Slider[-$range,$range,$yinterval]"); |
Line 816 sub start_functionplotresponse {
|
Line 816 sub start_functionplotresponse {
|
.'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Question').'</span></td>' |
.'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Question').'</span></td>' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.&Apache::edit::deletelist($target,$token).' ' |
.&Apache::edit::deletelist($target,$token).' ' |
.&Apache::edit::insertlist($target,$token) |
.&Apache::edit::insertlist($target,$token).' ' |
|
.&Apache::loncommon::help_open_topic('Function_Plot_Response_Question','Function Plot Responses') |
.'</span></td>' |
.'</span></td>' |
."<td> " |
."<td> " |
.&Apache::edit::end_row() |
.&Apache::edit::end_row() |
Line 1100 sub start_functionplotruleset {
|
Line 1101 sub start_functionplotruleset {
|
'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Rule Set').'</span></td>' |
'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Rule Set').'</span></td>' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.&Apache::edit::deletelist($target,$token).' '. |
.&Apache::edit::deletelist($target,$token).' '. |
&Apache::edit::insertlist($target,$token) |
&Apache::edit::insertlist($target,$token).' ' |
|
.&Apache::loncommon::help_open_topic('Function_Plot_Response_Rule_Set','Function Plot Rules') |
.'</span></td>' |
.'</span></td>' |
."<td> " |
."<td> " |
.&Apache::edit::end_row() |
.&Apache::edit::end_row() |
Line 1278 sub start_functionplotelements {
|
Line 1280 sub start_functionplotelements {
|
'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Elements').'</span></td>' |
'<tr><td><span class="LC_nobreak">'.&mt('Function Plot Elements').'</span></td>' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.&Apache::edit::deletelist($target,$token).' '. |
.&Apache::edit::deletelist($target,$token).' '. |
&Apache::edit::insertlist($target,$token) |
&Apache::edit::insertlist($target,$token).' ' |
|
.&Apache::loncommon::help_open_topic('Function_Plot_Response_Elements','Function Plot Elements') |
.'</span></td>' |
.'</span></td>' |
."<td> " |
."<td> " |
.&Apache::edit::end_row() |
.&Apache::edit::end_row() |