Initial commit

.gitignore

@@ -0,0 +1,5 @@
+lib/
+obj/
+
+*.t3
+GameInfo.txt

experiment.t

@@ -0,0 +1,42 @@
+#include <adv3.h>
+#include <en_us.h>
+
+versionInfo: GameID
+  name = 'Uncontrolled experiment'
+  byline = 'by He4eT'
+  authorEmail = 'He4eT <He4eTHb1u@gmail.com>'
+  desc = 'A simple demo for TADS 3.'
+  version = '0'
+  IFID = 'F1E9FCB6-84D5-4FFA-B7E6-74458D83018B'
+  showCredit () {"
+    Some credits here.
+  ";}
+  showAbout () {"
+    << desc >> <br>
+    Set of usefull examples for developers.
+  ";}
+;
+
+gameMain: GameMainDef
+  initialPlayerChar = me
+
+  experimentNumber = 0
+  dayNumber = 21
+
+  showIntro () {"
+    <.p>
+    <q>Experiment <<experimentNumber>>,
+    day number <<dayNumber>>,</q>
+      a cold mechanical voice suddenly interrupts
+      your restless sleep.
+    <q>Have a nice day!</q>
+    <.p>
+  ";}
+  showGoodbye () {"
+    <.p>Game over<.p>
+  ";}
+;
+
+#include "src/room/orangeRoom.t"
+
+#include "src/actor/pc.t"

experiment.t3m

@@ -0,0 +1,11 @@
+-D LANGUAGE=en_us
+-D MESSAGESTYLE=neu
+-Fy obj -Fo obj
+
+-o experiment.t3
+
+-I lib/include
+-lib lib/system
+-lib lib/adv3/adv3
+
+-source experiment

src/actor/pc.t

@@ -0,0 +1,3 @@
+me: Actor
+  location = orangeRoom
+;

src/room/orangeRoom.t

@@ -0,0 +1,57 @@
+orangeRoom: Room
+  'Orange room'
+  " You're standing in the large room.
+    <br>The walls, floors and ceiling are
+    completely covered with white plastic panels.
+    <.p>
+    In the upper left corner of the north wall
+    you can see the orange number
+    <q><<gameMain.experimentNumber>></q>
+    half a meter high.
+    <.p>
+    The room contains
+    an ascetic bed
+    and a desk against the east wall."
+;
+
++ Decoration
+  'orange digits/number'
+  'orange number'
+  " Orange, huge and neat digits
+    without additional explanation."
+;
+
++ bed: Bed, Heavy
+  'ascetic bed'
+  'ascetic bed'
+  "It has a plastic frame and an unsprung mattress."
+;
+
++ desk: Heavy, Surface
+  'white desk/table'
+  'white desk'
+  " This white desk has some marks on working surface
+    and a single drawer."
+;
+
+  ++ Decoration
+    'letters/label/mark/marks'
+    'some scratched letters'
+    "You can't make out the inscription."
+  ;
+
+  ++ drawer: Component, OpenableContainer
+    'drawer'
+    'drawer'
+    "It looks like it should open easily. "
+  ;
+
+    +++ whiteCube: Thing
+      'white cube'
+      'white cube'
+      "Small glossy white cube";
+
+    +++ blackCube: Thing
+      'black cube'
+      'black cube'
+      "Small glossy black cube";