moved from dev to prod

2022-11-14 10:05:42 +01:00
parent ac142715b0
commit 43d589aa9b
1364 changed files with 27705 additions and 6101 deletions
--- a/tools/texel/skripte/42.tsc
+++ b/tools/texel/skripte/42.tsc
@@ -0,0 +1,17 @@
+// Berechnet die Fl<46>che des Kreises mit dem Radius r=argv[2]
+// tm 97-11-20
+
+proc main(...)
+{
+	if (argc<3) exit(1);
+
+	datei = argv[0];
+	zelle = argv[1];
+	r     = argv[2];
+	
+	/* Fl<46>che berechnen */
+	wert = pi() * r * r;
+
+	/* R<>ckgabe des Ergebnisses */
+	Texel.ReturnCellValue(datei,zelle,wert);
+}