TempleOS V5.03 Nightly (ISO SHA-1 aed1efc)

This commit is contained in:
Terry A. Davis authored and minexew committed 2018-09-09 11:35:02 +02:00
1 parent bbd014d8e9
commit da84afbaf7
124 files changed
+3453 -3407

No files matched your search

+5 -5
View File
@@ -35,11 +35,11 @@ U0 BgtIns(CBgtEntry *tmpb)
class CBgtEntryForm
{
U8 date[512] fmtstr "$$DA-P,A=\"Date :%s\"$$\n";
F64 amount fmtstr "Amount $$$$$$DA,A=\"%10.2f\"$$\n";
U8 credit[512] fmtstr "$$DA-P,A=\"Credit (from) Acct:%s\"$$\n";
U8 debit [512] fmtstr "$$DA-P,A=\"Debit (to) Acct:%s\"$$\n";
U8 desc [512] fmtstr "$$DA-P,A=\"Desc :%s\"$$\n";
U8 date[512] format "$$DA-P,A=\"Date :%s\"$$\n";
F64 amount format "Amount $$$$$$DA,A=\"%10.2f\"$$\n";
U8 credit[512] format "$$DA-P,A=\"Credit (from) Acct:%s\"$$\n";
U8 debit [512] format "$$DA-P,A=\"Debit (to) Acct:%s\"$$\n";
U8 desc [512] format "$$DA-P,A=\"Desc :%s\"$$\n";
};
CBgtEntry *BgtEntryPmt(CBgtEntry *dft=NULL)
+4 -4
View File
@@ -42,11 +42,11 @@ class CBgtTemplate
CBgtTemplate *next,*last;
U0 start;
U16 type fmtstr "$$LS,D=\"ST_BGT_TEMPLATE_TYPES\"$$\n";
U16 type format "$$LS,D=\"ST_BGT_TEMPLATE_TYPES\"$$\n";
U16 flags;
U8 start_date[16] fmtstr "$$DA-P,A=\"Start Date:%s\"$$\n";
U8 end_date[16] fmtstr "$$DA-P,A=\"End Date :%s\"$$\n";
F64 period fmtstr "$$DA,A=\"Period :%8.2f\"$$\n";
U8 start_date[16] format "$$DA-P,A=\"Start Date:%s\"$$\n";
U8 end_date[16] format "$$DA-P,A=\"End Date :%s\"$$\n";
F64 period format "$$DA,A=\"Period :%8.2f\"$$\n";
U0 end;
CBgtEntry b;
+3 -3
View File
@@ -13,9 +13,9 @@ class Ball
class BallDefineStruct
{
F64 radius fmtstr "$$DA-TRM,A=\"Radius :%8.3f\"$$\n";
I64 n_longitude fmtstr "$$DA-TRM,A=\"Longitude Faces:%5d\"$$\n";
I64 n_lattitude fmtstr "$$DA-TRM,A=\"Lattitude Rings:%5d\"$$\n";
F64 radius format "$$DA-TRM,A=\"Radius :%8.3f\"$$\n";
I64 n_longitude format "$$DA-TRM,A=\"Longitude Faces:%5d\"$$\n";
I64 n_lattitude format "$$DA-TRM,A=\"Lattitude Rings:%5d\"$$\n";
};
U0 BDInit(BallDefineStruct *bd)
+28 -28
View File
@@ -13,66 +13,66 @@ class Man
class ManDefineStruct
{
F64 head_rad fmtstr
F64 head_rad format
"$$DA-TRM,A=\"Head Radius :%8.3f\"$$\n";
F64 torso_len fmtstr
F64 torso_len format
"$$DA-TRM,A=\"Torso Length :%8.3f\"$$\n";
F64 arm_len fmtstr
F64 arm_len format
"$$DA-TRM,A=\"Arm Length :%8.3f\"$$\n";
F64 hand_len fmtstr
F64 hand_len format
"$$DA-TRM,A=\"Hand Length :%8.3f\"$$\n";
F64 leg_len fmtstr
F64 leg_len format
"$$DA-TRM,A=\"Leg Length :%8.3f\"$$\n";
F64 foot_len fmtstr
F64 foot_len format
"$$DA-TRM,A=\"Foot Length :%8.3f\"$$\n";
F64 torso_width fmtstr
F64 torso_width format
"$$DA-TRM,A=\"Torso Width :%8.3f\"$$\n";
F64 torso_depth fmtstr
F64 torso_depth format
"$$DA-TRM,A=\"Torso Depth :%8.3f\"$$\n";
F64 arm_rad fmtstr
F64 arm_rad format
"$$DA-TRM,A=\"Arm Radius :%8.3f\"$$\n";
F64 hand_rad fmtstr
F64 hand_rad format
"$$DA-TRM,A=\"Hand Radius :%8.3f\"$$\n";
F64 leg_rad fmtstr
F64 leg_rad format
"$$DA-TRM,A=\"Leg Radius :%8.3f\"$$\n";
F64 foot_rad fmtstr
F64 foot_rad format
"$$DA-TRM,A=\"Foot Radius :%8.3f\"$$\n\n";
F64 r_shoulder_a1 fmtstr
F64 r_shoulder_a1 format
"$$DA-TRM,A=\"R.Shoulder Front/Back Angle:%8.3f\"$$\n";
F64 l_shoulder_a1 fmtstr
F64 l_shoulder_a1 format
"$$DA-TRM,A=\"L.Shoulder Front/Back Angle:%8.3f\"$$\n";
F64 r_hip_a1 fmtstr
F64 r_hip_a1 format
"$$DA-TRM,A=\"R.Hip Front/Back Angle :%8.3f\"$$\n";
F64 l_hip_a1 fmtstr
F64 l_hip_a1 format
"$$DA-TRM,A=\"L.Hip Front/Back Angle :%8.3f\"$$\n";
F64 r_shoulder_a2 fmtstr
F64 r_shoulder_a2 format
"$$DA-TRM,A=\"R.Shoulder Side Angle :%8.3f\"$$\n";
F64 l_shoulder_a2 fmtstr
F64 l_shoulder_a2 format
"$$DA-TRM,A=\"L.Shoulder Side Angle :%8.3f\"$$\n";
F64 r_hip_a2 fmtstr
F64 r_hip_a2 format
"$$DA-TRM,A=\"R.Hip Side Angle :%8.3f\"$$\n";
F64 l_hip_a2 fmtstr
F64 l_hip_a2 format
"$$DA-TRM,A=\"L.Hip Side Angle :%8.3f\"$$\n";
F64 r_elbow_a fmtstr
F64 r_elbow_a format
"$$DA-TRM,A=\"R.Elbow Angle :%8.3f\"$$\n";
F64 l_elbow_a fmtstr
F64 l_elbow_a format
"$$DA-TRM,A=\"L.Elbow Angle :%8.3f\"$$\n";
F64 r_knee_a fmtstr
F64 r_knee_a format
"$$DA-TRM,A=\"R.Knee Angle :%8.3f\"$$\n";
F64 l_knee_a fmtstr
F64 l_knee_a format
"$$DA-TRM,A=\"L.Knee Angle :%8.3f\"$$\n";
F64 r_wrist_a fmtstr
F64 r_wrist_a format
"$$DA-TRM,A=\"R.Wrist Angle :%8.3f\"$$\n";
F64 l_wrist_a fmtstr
F64 l_wrist_a format
"$$DA-TRM,A=\"L.Wrist Angle :%8.3f\"$$\n";
F64 r_ankle_a fmtstr
F64 r_ankle_a format
"$$DA-TRM,A=\"R.Ankle Angle :%8.3f\"$$\n";
F64 l_ankle_a fmtstr
F64 l_ankle_a format
"$$DA-TRM,A=\"L.Ankle Angle :%8.3f\"$$\n";
};
-11
View File
@@ -11,14 +11,3 @@ $WW,1$$FG,5$$TX+CX,"Psalmody Help"$$FG$
* You can take the $LK,"Play",A="MN:Play"$() stmts out of a song file and place them in your programs. You can also add a song to a document with $FG,2$<CTRL-l>$FG$, but you should do it after pressing $FG,2$<CTRL-t>$FG$ because the clip-insert in $FG,2$<CTRL-l>$FG$ is screwy. See this $SO,"<Song>",A="4qG5EC4BeGG5qCeFD4sB5G4B5G4qG5EC4BeGG5qCeFD4sB5G4B5GqEeEFqE4BeG5FetC4A5GqFCEeEFqE4BeG5FetC4A5GqFC"$ after pressing $FG,2$<CTRL-t>$FG$, now.
* You can call $LK,"JukeBox",A="FF:::/Apps/Psalmody/JukeBox.HC,JukeBox"$("~/Psalmody"); to play your songs.
* To create a $FG,2$.SND$FG$ file which can be exported and played under Windows, set the $FG,2$Bool$FG$ $LK,"snd.record",A="MN:CSndGlbls"$ to $FG,2$TRUE$FG$, play music, and set it to $FG,2$FALSE$FG$. Then, call $LK,"SndFileCreate",A="MN:SndFileCreate"$(). You might wish to make a $FG,2$<CTRL-ALT-key>$FG$ to toggle this system level recording feat. See $LK,"Snd",A="MN:Snd"$(). Add this code to your $LK,"~/HomeKeyPlugIns.HC"$ file.
$FG,5$U0 CtrlAltR(I64)
{
snd.record=!snd.record;
}
CtrlAltCBSet('R',&CtrlAltR,"Cmd /Toggle snd.record");$FG$
* When calling $LK,"SndFileCreate",A="MN:SndFileCreate"$() you can set a waveform. The PC speaker is $LK,"WF_SQUARE",A="MN:WF_SQUARE"$. You can sel reverb and averaging, also.
+1 -1
View File
@@ -71,7 +71,7 @@ U0 JukeSongPuppet(CTask *juke_task,I64 passes,I64 song_num,U8 *name)
}
public U0 JukeSongsPuppet(U8 *dirname="~/Psalmody",I64 passes=2,
I64 start_song=0,I64 end_song=I64_MAX)
I64 start_song=0,I64 end_song=I64_MAX)
{//Help make music video by puppeting JukeBox task.
I64 i;
CDirEntry *tmpde,*tmpde1;