moved from dev to prod

tools/texel/skripte/0.tsc

@@ -0,0 +1,24 @@
+// Texel-Demoskript (f<>r Scripter von Holger Weets und Christian Wempe)
+// als Argumente werden immer <20>bergeben:
+//    Dateiname (z.B. "C:\Texel\balmer.txl")
+//    Zellreferenz (z.B. "B52")
+// danach k<>nnen noch beliebig viele Parameter (auch Bereichsangaben
+// der Form "A1:C23") folgen
+// die R<>ckgabe an Texel *mu<6D>* mit dem GEMScript-Kommando
+// ReturnCellValue(datei,zelle,wert) erfolgen; die Zielzelle
+// mu<6D> die aufrufende Zelle sein ("=SkriptNr(...)")
+
+
+proc main(...)
+{
+	if (argc<2) exit(1);
+
+	datei = argv[0];
+	zelle = argv[1];
+	wert  = 0.0;
+	
+	/* hier beginnt das eigentliche "Makro" */
+
+	/* R<>ckgabe des Ergebnisses */
+	Texel.ReturnCellValue(datei,zelle,wert);
+}