/*
 * Verrückte Turing-Maschinen — A turing complete game
 * Copyright (C) 2016 Christian Fraß <vidofnir@folksprak.org>
 * 
 * This program 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.
 * 
 * This program 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 this program.  If not, see <https://www.gnu.org/licenses/>.
 */

module mod_vtm
	{
		
		export module mod_aufbau
			{
				
				export module mod_aktor
					{
						
						export module mod_schreiber
							{
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								let art : string = "schreiber";
				
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								export type typ_schreiber =
									{
										richtung : mod_richtung.typ_richtung;
										symbol : mod_symbol.typ_symbol;
									}
								;
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function erstellen
									(
										richtung : mod_richtung.typ_richtung,
										symbol : mod_symbol.typ_symbol
									)
									: typ_schreiber
									{
										return {
											"richtung": richtung,
											"symbol": symbol,
										};
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								export function erstellen_aktor
									(
										richtung : mod_richtung.typ_richtung,
										symbol : mod_symbol.typ_symbol
									)
									: mod_aktor.typ_aktor
									{
										return lib_aufruf.einpacken(art, erstellen(richtung, symbol));
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function beispiel
									(
									)
									: typ_schreiber
									{
										return erstellen(0, 0);
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								export function richtung_lesen
									(
										schreiber : typ_schreiber
									)
									: mod_richtung.typ_richtung
									{
										return schreiber.richtung;
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								export function symbol_lesen
									(
										schreiber : typ_schreiber
									)
									: mod_symbol.typ_symbol
									{
										return schreiber.symbol;
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function drehen
									(
										schreiber : typ_schreiber,
										inkrement : int = +1
									)
									: void
									{
										schreiber.richtung = mod_richtung.addieren(schreiber.richtung, inkrement);
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function verwenden
									(
										schreiber : typ_schreiber,
										figur : mod_figur.typ_figur
									)
									: void
									{
										mod_figur.schreiben(figur, schreiber.symbol);
										mod_figur.bewegen(figur, schreiber.richtung);
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function exportieren
									(
										schreiber : typ_schreiber
									)
									: any
									{
										return {
											"richtung": mod_richtung.exportieren(schreiber.richtung),
											"symbol": mod_symbol.exportieren(schreiber.symbol),
										};
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								function importieren
									(
										roh : any
									)
									: typ_schreiber
									{
										return (
											erstellen
												(
													mod_richtung.importieren(roh["richtung"]),
													mod_symbol.importieren(roh["symbol"])
												)
										);
									}
								
								
								/**
								 * @author kcf <vidofnir@folksprak.org>
								 */
								lib_brauch.umsetzen<signatur_aktor>
									(
										brauch_aktor,
										art,
										{
											"beispiel": () => lib_aufruf.einpacken(art, beispiel()),
											"drehen": (aktor, inkrement) => drehen(lib_aufruf.auspacken(aktor), inkrement),
											"verwenden": (aktor, figur) => verwenden(lib_aufruf.auspacken(aktor), figur),
											"exportieren": (aktor) => ({"art": art, "angaben": exportieren(aktor.angaben)}),
											"importieren": (roh) => lib_aufruf.einpacken(art, importieren(roh["angaben"])),
										}
									)
								;
								
							}
						
					}
				
			}
		
	}