execute_form.php

<?php
// This file is part of Moodle - https://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle.  If not, see <https://www.gnu.org/licenses/>.

/**
 * Provides {@see local_amos_execute_form} class.
 *
 * @package     local_amos
 * @copyright   2011 David Mudrak <david@moodle.com>
 * @license     https://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */

defined('MOODLE_INTERNAL') || die();

require_once($CFG->libdir . '/formslib.php');

/**
 * AMOScript execution form.
 *
 * @package     local_amos
 * @copyright   2011 David Mudrák <david@moodle.com>
 * @license     https://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 */
class local_amos_execute_form extends moodleform {

    /**
     * Define form fields.
     */
    public function definition() {

        $mform = $this->_form;

        $mform->addElement('select', 'version', get_string('version', 'local_amos'), $this->_customdata['versions']);
        $mform->setDefault('version', $this->_customdata['versioncurrent']);
        $mform->addRule('version', null, 'required', null, 'client');

        $mform->addElement('textarea', 'script', get_string('script', 'local_amos'), array('cols' => 60, 'rows' => 10));
        $mform->setDefault('script', "AMOS BEGIN\n \nAMOS END");
        $mform->setType('script', PARAM_RAW);
        $this->add_action_buttons(false, get_string('scriptexecute', 'local_amos'));
    }
}