TempleOS V5.03 Nightly (ISO SHA-1 54758c6)

Demo/AcctExample/AlienProject/AlienMain.HC

@@ -0,0 +1,17 @@
+
+Cd(__DIR__);;
+
+#include "AlienWorkingDir"
+
+
+
+U0 AlienGame()
+{
+  "This is our alien game.\n";
+  PressAKey;
+  ShowWorkingDir;
+}
+
+
+AlienGame;
+

Demo/AcctExample/LightTable.HC

@@ -0,0 +1,90 @@
+#define PTS_NUM	1024
+
+U0 LightTable()
+{
+  I64 msg_code,i,x1,y1,x2,y2,arg1,arg2;
+  CDC *dc=DCAlias;
+  CD3I32 *c=MAlloc(PTS_NUM*sizeof(CD3I32));
+
+  MenuPush(
+	"File {"
+	"  Restart(,'\n');"
+	"  Abort(,CH_SHIFT_ESC);"
+	"  Exit(,CH_ESC);"
+	"}"
+	"Edit {"
+	"  Fill(,CH_SPACE);"
+	"}"
+	);
+  SettingsPush; //See $LK,"SettingsPush",A="MN:SettingsPush"$
+  Fs->win_inhibit=WIG_TASK_DFT-WIF_SELF_FOCUS-
+	WIF_SELF_BORDER-WIF_FOCUS_TASK_MENU;
+  Fs->text_attr=BLACK<<4+WHITE;	//Current $LK,"CTask",A="MN:CTask"$ is Fs segment register.
+  AutoComplete;
+  WinBorder;
+  WinMax;
+  DocCursor;
+  DocClear;
+  try {
+    while (TRUE) {
+      msg_code=GetMsg(&arg1,&arg2,
+	    1<<MSG_KEY_DOWN+1<<MSG_MS_L_DOWN+1<<MSG_MS_R_UP);
+lt_restart:
+      switch (msg_code) {
+	case MSG_MS_R_UP:
+	  x1=arg1; y1=arg2;
+	  x2=arg1; y2=arg2;
+	  dc->color=ROP_XOR+LTRED^TRANSPARENT;
+	  do {
+	    GrLine3(dc,x1,y1,0,x2,y2,0);
+	    msg_code=GetMsg(&arg1,&arg2,1<<MSG_MS_L_UP+1<<MSG_MS_MOVE);
+	    GrLine3(dc,x1,y1,0,x2,y2,0);
+	    x2=arg1; y2=arg2;
+	  } while (msg_code!=MSG_MS_L_UP);
+	  GrLine3(dc,x1,y1,0,x2,y2,0);
+	  break;
+	case MSG_MS_L_DOWN:
+	  i=0;
+	  dc->color=ROP_XOR+WHITE^TRANSPARENT;
+	  do {
+	    c[i].x=arg1; c[i].y=arg2; c[i].z=0;
+	    Gr2BSpline(dc,c,i+1);
+	    msg_code=GetMsg(&arg1,&arg2,
+		  1<<MSG_KEY_DOWN+1<<MSG_MS_L_UP+1<<MSG_MS_MOVE+1<<MSG_MS_R_UP);
+	    Gr2BSpline(dc,c,i+1);
+	    if (msg_code==MSG_KEY_DOWN)
+	      goto lt_restart;
+	    else if (msg_code==MSG_MS_L_UP) {
+	      Noise(100,30,50);
+	      i++;
+	    }
+	  } while (i<PTS_NUM-1 && msg_code!=MSG_MS_R_UP);
+	  Gr2BSpline(dc,c,i);
+	  break;
+	case MSG_KEY_DOWN:
+	  switch (arg1) {
+	    case CH_SPACE:
+	      GrFloodFill(dc,ms.pos.x-Fs->pix_left,ms.pos.y-Fs->pix_top);
+	      break;
+	    case '\n':
+	      DCFill;
+	      break;
+	    case CH_ESC:
+	    case CH_SHIFT_ESC:
+	      goto lt_done;
+	  }
+	  break;
+      }
+    }
+lt_done:
+    GetMsg(,,1<<MSG_KEY_UP);
+  } catch
+    PutExcept;
+  DCFill;
+  Free(c);
+  DCDel(dc);
+  SettingsPop;
+  MenuPop;
+}
+
+LightTable;

Demo/AcctExample/PersonalNotes.DD

@@ -466,6 +466,10 @@ Zinger		$HC,"<center><img src=\"http://media.shopwell.com/gladson/00041300000031
 Dianna Throne	$HC,"<center><img src=\"http://i.imgur.com/RtcK6iX.jpg%EF%BB%BF\" width=\"640\" height=\"746\" alt=\"\"></center>"$
 170310 Terry	$HC,"<center><img src=\"http://www.templeos.org/images/170310TerryADavis.jpg\" width=\"640\" height=\"640\" alt=\"\"></center>"$
 
+$TX,"Linus Torvalds (Dec 28, 1969)",HTML="https://en.wikipedia.org/wiki/Linus_Torvalds"$
+$TX,"John Carmack   (Aug 20, 1970)",HTML="https://en.wikipedia.org/wiki/John_Carmack"$
+$TX,"Terry A. Davis (Dec 15, 1969)",HTML="https://motherboard.vice.com/en_us/article/gods-lonely-programmer"$
+
 $TX,"SimStructure",HTML="http://www.templeos.org/files/SimStrSetUp.zip"$
 $TX,"ASU_Transcripts",HTML="http://www.templeos.org/files/ASU_Transcripts.pdf"$      $TX,"ASU Course Catalog (See page 261)",HTML="https://catalog.asu.edu/files/shared/archives/1994-1996/general/UG1994-1996.pdf/1994-1996-UG-241-267.pdf"$
 $TX,"Dr. David Pheanis",HTML="https://webapp4.asu.edu/directory/person/77201"$	$TX,"Dr. Konstantinos S. Tsakalis",HTML="http://ecee.engineering.asu.edu/directory/tenured-and-tenure-track-faculty/kostantinos-s-tsakalis"$	$TX,"Dr. Walter Higgins",HTML="https://webapp4.asu.edu/directory/directorysearch?cn=Walter+Higgins"$
@@ -473,6 +477,8 @@ $TX,"Peter Gadwa",HTML="http://www.wired.com/magazine/2010/11/mf_ticketmaster/al
 $TX,"Tom Foley",HTML="http://web.gccaz.edu/~tfoley/perspage.html"$
 $TX,"Graphic Technologies",HTML="https://web.archive.org/web/20020811060541/http://www.graphic-technologies.com/"$	$TX,"Lexmark vs Static Control",HTML="https://en.wikipedia.org/wiki/Lexmark_International,_Inc._v._Static_Control_Components,_Inc."$
 
+
+
 $TX,"Stephen Davis",HTML="https://photos.google.com/share/AF1QipM4HI3mb_9qe8wDQ--nRfjIzOKyGG8heqWH-tbGBIIoxChWe4GeBegNzgHRy4Z1Qw?key=eGR0R0tyZG5tenRWd0tDN2RHRFRNTmI4NXdhc25B"$
 
 3qEeEGCAsBABAqFDBeE2G33qEeEGCAsBABAqFDBeE2G33qCsBDBDq2G3s2G3F2G3FqAet2G32G3AEDAqF3qCsBDBDq2G3s2G3F2G3FqAet2G32G3AEDAqF

Demo/AcctExample/Registry.HC

@@ -62,7 +62,7 @@ $ID,-2$$TR,"Titanium"$
 $ID,2$I64 best_score=16469;
 $ID,-2$$TR,"TOSRegen"$
 $ID,2$progress1_tf=0.000;progress2_tf=0.000;
-progress3_tf=0.000;progress4_tf=196.886;
+progress3_tf=0.000;progress4_tf=196.786;
 $ID,-2$$TR,"TempleTetris"$
 $ID,2$I64 hiscore=1000;
 $ID,-2$$ID,-2$$TR,"Once"$