public function moveby($count) { $this->_position += $count; if ($this->_position < 0) { die("Error in instruction " . WhirlParser::instance()->getInstructionNumber() . ": Memory index out of bounds. The memory index was decreased beyond zero."); } if (!isset($this->_values[$this->_position])) { $this->_values[$this->_position] = 0; } }
protected function RINGFUNC_AscIO() { if ($this->_getValue() === 0) { WhirlMemory::instance()->setValue((int) ord(WhirlParser::instance()->input())); } else { WhirlParser::instance()->output(chr(WhirlMemory::instance()->getValue())); } }