vtm/quelldatein/aufbau/figur.ts

module mod_vtm_aufbau
	{
		
		/**
		 * @author kcf <vidofnir@folksprak.org>
		 */
		export class klasse_figur
			{
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				private zustand : typ_zustand;
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				private band : Array<typ_symbol>;
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				private stelle : typ_stelle;
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public constructor(band : Array<typ_symbol> = [], stelle : typ_stelle = stelle_null())
					{
						this.zustand = zustand_normal;
						this.band = band;
						this.stelle = stelle;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public zustand_lesen() : typ_zustand
					{
						return this.zustand;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public band_lesen() : Array<typ_symbol>
					{
						return this.band;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public stelle_lesen() : typ_stelle
					{
						return this.stelle;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public bewegen(richtung : typ_richtung) : void
					{
						let summand : typ_stelle = stelle_von_richtung(richtung);
						this.stelle = stelle_addieren(this.stelle, summand);
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public schreiben(symbol : typ_symbol) : void
					{
						this.band.push(symbol);
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public lesen() : schnittstelle_fehlermonade<typ_symbol>
					{
						if (this.band.length <= 0)
							{
								return (new klasse_nichts<typ_symbol>());
							}
						else
							{
								return (new klasse_schlicht<typ_symbol>(this.band[0]));
							}
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public schieben() : void
					{
						if (this.band.length <= 0)
							{
								let meldung : string = "Band ist leer";
								throw (new Error(meldung));
							}
						else
							{
								this.band.shift();
							}
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public annehmen() : void
					{
						this.zustand = zustand_fertig;
					}
				
				
				/**
				 * @author kcf <vidofnir@folksprak.org>
				 */
				public verwerfen() : void
					{
						this.zustand = zustand_tot;
					}
				
			}
		
	}