TempleOS V5.03 Nightly (ISO SHA-1 a27f9ed)
This commit is contained in:
1 parent
93181651aa
commit
ba39ca450d
25 files changed
+325
-240
No files matched your search
@@ -154,7 +154,7 @@ U0 PsmRecalcNoteXY()
|
||||
break;
|
||||
else {
|
||||
if (tmpn->type!=PSMT_METER) {
|
||||
if (tmpn->ona!=ONA_REST) {
|
||||
if (tmpn->ona) {
|
||||
ona=tmpn->ona;
|
||||
if (Bt(&tmpn->flags,PSMf_SHARP))
|
||||
ona--;
|
||||
@@ -230,7 +230,7 @@ U0 DrawIt(CTask *task,CDC *dc)
|
||||
} else if (tmpn->flags&PSMF_SEL)
|
||||
dc->color=RED;
|
||||
else {
|
||||
if (tmpn->ona!=ONA_REST)
|
||||
if (tmpn->ona)
|
||||
dc->color=BLACK;
|
||||
else
|
||||
dc->color=LTGRAY;
|
||||
|
||||
@@ -164,7 +164,7 @@ U0 PsmLoadSongStr(U8 *st,I64 *psm_octave,F64 *psm_duration)
|
||||
}
|
||||
tmpn->ona=Note2Ona(note,*psm_octave);
|
||||
} else
|
||||
tmpn->ona=ONA_REST;
|
||||
tmpn->ona=0;
|
||||
if (*psm_duration<=2*.25/3)
|
||||
i=0;
|
||||
else if (*psm_duration<=.25)
|
||||
@@ -263,7 +263,7 @@ U8 *PsmCvtSong()
|
||||
*dst++='/';
|
||||
*dst++=tmpn->meter_bottom+'0';
|
||||
} else {
|
||||
if (tmpn->ona!=ONA_REST) {
|
||||
if (tmpn->ona) {
|
||||
ona=tmpn->ona;
|
||||
if (Bt(&tmpn->flags,PSMf_SHARP))
|
||||
ona--;
|
||||
@@ -275,7 +275,7 @@ U8 *PsmCvtSong()
|
||||
}
|
||||
if (Bt(&tmpn->flags,PSMf_TIE))
|
||||
*dst++='(';
|
||||
if (octave!=last_octave && tmpn->ona!=ONA_REST) {
|
||||
if (octave!=last_octave && tmpn->ona) {
|
||||
*dst++=octave+'0';
|
||||
last_octave=octave;
|
||||
}
|
||||
@@ -286,7 +286,7 @@ U8 *PsmCvtSong()
|
||||
*dst++=src[1];
|
||||
last_duration=tmpn->duration;
|
||||
}
|
||||
if (tmpn->ona!=ONA_REST) {
|
||||
if (tmpn->ona) {
|
||||
src=LstSub(note,psm_note_lst);
|
||||
*dst++=src[0];
|
||||
if (src[1])
|
||||
|
||||
@@ -42,10 +42,10 @@ U0 PsmRightClick(I64 x,I64 y)
|
||||
switch (i) {
|
||||
case PSMR_REST:
|
||||
if (tmpn->type==PSMT_NOTE)
|
||||
tmpn->ona=ONA_REST;
|
||||
tmpn->ona=0;
|
||||
break;
|
||||
case PSMR_SHARP:
|
||||
if (tmpn->type==PSMT_NOTE && tmpn->ona!=ONA_REST) {
|
||||
if (tmpn->type==PSMT_NOTE && tmpn->ona) {
|
||||
if (Btr(&tmpn->flags,PSMf_FLAT))
|
||||
tmpn->ona++;
|
||||
if (Btc(&tmpn->flags,PSMf_SHARP))
|
||||
@@ -55,7 +55,7 @@ U0 PsmRightClick(I64 x,I64 y)
|
||||
}
|
||||
break;
|
||||
case PSMR_FLAT:
|
||||
if (tmpn->type==PSMT_NOTE && tmpn->ona!=ONA_REST) {
|
||||
if (tmpn->type==PSMT_NOTE && tmpn->ona) {
|
||||
if (Btr(&tmpn->flags,PSMf_SHARP))
|
||||
tmpn->ona--;
|
||||
if (Btc(&tmpn->flags,PSMf_FLAT))
|
||||
@@ -350,7 +350,7 @@ U0 PsmPopMode()
|
||||
U0 Psalmody(U8 *dirname="~/Psalmody")
|
||||
{
|
||||
Bool was_playing,is_null=TRUE,was_null=TRUE;
|
||||
I64 arg1,arg2,msg_code=0,col,ona=ONA_REST,last_ona=ONA_REST,
|
||||
I64 arg1,arg2,msg_code=0,col,ona=0,last_ona=0,
|
||||
psm_octave=4,timeout_val,timeout_val2,old_doc_flags;
|
||||
U8 *filename=NULL,*st,*st2;
|
||||
PsmNote *tmpn;
|
||||
@@ -504,7 +504,7 @@ mo_got_msg:
|
||||
case '[': ona+=8; break;
|
||||
case '\'': ona+=9; break;
|
||||
case ']': ona+=10; break;
|
||||
case CH_SPACE: ona=ONA_REST; break;
|
||||
case CH_SPACE: ona=0; break;
|
||||
end:
|
||||
is_null=FALSE;
|
||||
break;
|
||||
@@ -742,9 +742,9 @@ mo_got_msg:
|
||||
PsmRightClick(arg1,arg2);
|
||||
}
|
||||
if (is_null)
|
||||
ona=ONA_REST;
|
||||
ona=0;
|
||||
if (ona!=last_ona || is_null!=was_null) {
|
||||
if (ona==ONA_REST) {
|
||||
if (!ona) {
|
||||
if (is_null)
|
||||
st="";
|
||||
else
|
||||
|
||||
+83
-44
@@ -26,7 +26,7 @@ class Unit
|
||||
{
|
||||
I64 x,y,best_dd;
|
||||
F64 é,phase;
|
||||
Bool friendly,dead,tank,pad[5];
|
||||
Bool friendly,dead,tank,CIA,pad[4];
|
||||
} u[U_NUM];
|
||||
|
||||
#define ET_MAN 0
|
||||
@@ -83,18 +83,15 @@ U8 *friendly_imgs[4]={$IB,"<5>",BI=5$,$IB,"<4>",BI=4$,$IB,"<5>",BI=5$,$IB,"<6>",
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<8>",BI=8$
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<9>",BI=9$
|
||||
|
||||
|
||||
|
||||
|
||||
U8 *friendly_hacking_imgs[4]={$IB,"<7>",BI=7$,$IB,"<8>",BI=8$,$IB,"<7>",BI=7$,$IB,"<9>",BI=9$};
|
||||
U8 *CIA_neeger_imgs[4]={$IB,"<8>",BI=8$,$IB,"<7>",BI=7$,$IB,"<8>",BI=8$,$IB,"<9>",BI=9$};
|
||||
|
||||
|
||||
|
||||
@@ -103,15 +100,18 @@ U8 *friendly_hacking_imgs[4]={$IB,"<7>",BI=7$,$IB,"<8>",BI=8$,$IB,"<7>",BI=7$,$I
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<11>",BI=11$
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<12>",BI=12$
|
||||
|
||||
|
||||
|
||||
U8 *enemy_imgs[4]={$IB,"<11>",BI=11$,$IB,"<10>",BI=10$,$IB,"<11>",BI=11$,$IB,"<12>",BI=12$};
|
||||
|
||||
U8 *friendly_hacking_imgs[4]={$IB,"<10>",BI=10$,$IB,"<11>",BI=11$,$IB,"<10>",BI=10$,$IB,"<12>",BI=12$};
|
||||
|
||||
|
||||
|
||||
@@ -120,20 +120,15 @@ U8 *enemy_imgs[4]={$IB,"<11>",BI=11$,$IB,"<10>",BI=10$,$IB,"<11>",BI=11$,$IB,"<1
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<14>",BI=14$
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<15>",BI=15$
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
U8 *enemy_imgs[4]={$IB,"<14>",BI=14$,$IB,"<13>",BI=13$,$IB,"<14>",BI=14$,$IB,"<15>",BI=15$};
|
||||
|
||||
|
||||
|
||||
@@ -143,19 +138,6 @@ U8 *enemy_imgs[4]={$IB,"<11>",BI=11$,$IB,"<10>",BI=10$,$IB,"<11>",BI=11$,$IB,"<1
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
U8 *enemy_hacking_imgs[4]={$IB,"<14>",BI=14$,$IB,"<13>",BI=13$,$IB,"<14>",BI=14$,$IB,"<15>",BI=15$};
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<17>",BI=17$
|
||||
|
||||
|
||||
@@ -170,16 +152,51 @@ U8 *enemy_hacking_imgs[4]={$IB,"<14>",BI=14$,$IB,"<13>",BI=13$,$IB,"<14>",BI=14$
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<19>",BI=19$
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
U8 *enemy_hacking_imgs[4]={$IB,"<17>",BI=17$,$IB,"<16>",BI=16$,$IB,"<17>",BI=17$,$IB,"<18>",BI=18$};
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<20>",BI=20$
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<21>",BI=21$
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<22>",BI=22$
|
||||
|
||||
|
||||
|
||||
|
||||
$SP,"<23>",BI=23$
|
||||
|
||||
|
||||
|
||||
|
||||
$BG$
|
||||
#define LS_APTS_NUM 20
|
||||
#define LS_MOUNTAINS_NUM 3
|
||||
@@ -192,7 +209,7 @@ class LandScapeItem
|
||||
|
||||
#define LS_TYPES 4
|
||||
U8 *landscape_imgs[LS_TYPES]=
|
||||
{$IB,"<17>",BI=17$,$IB,"<18>",BI=18$,$IB,"<19>",BI=19$,$IB,"<20>",BI=20$};
|
||||
{$IB,"<20>",BI=20$,$IB,"<21>",BI=21$,$IB,"<22>",BI=22$,$IB,"<23>",BI=23$};
|
||||
|
||||
U0 ExplosionDraw(CDC *dc,Explosion *tmpe,I64 y)
|
||||
{
|
||||
@@ -283,7 +300,7 @@ U0 MPMenDraw(CDC *dc2)
|
||||
Mat4x4RotX(r,ã/6);
|
||||
Mat4x4Scale(r,0.3);
|
||||
if (tmpu->tank)
|
||||
Sprite3Mat4x4B(dc,tmpu->x,yy,GR_Z_ALL,$IB,"<16>",BI=16$,r);
|
||||
Sprite3Mat4x4B(dc,tmpu->x,yy,GR_Z_ALL,$IB,"<19>",BI=19$,r);
|
||||
else {
|
||||
if (tmpu->best_dd<(2*HACK_DIST)*(2*HACK_DIST)) {//It's neat so times 2
|
||||
if (tmpu->friendly)
|
||||
@@ -292,9 +309,12 @@ U0 MPMenDraw(CDC *dc2)
|
||||
_tmps=enemy_hacking_imgs;
|
||||
tt=4*Wrap(tmpu->phase+20*ts,0)/(2*ã);
|
||||
} else {
|
||||
if (tmpu->friendly)
|
||||
_tmps=friendly_imgs;
|
||||
else
|
||||
if (tmpu->friendly) {
|
||||
if (tmpu->CIA && Blink)
|
||||
_tmps=CIA_neeger_imgs;
|
||||
else
|
||||
_tmps=friendly_imgs;
|
||||
} else
|
||||
_tmps=enemy_imgs;
|
||||
tt=4*Wrap(tmpu->phase+5*ts,0)/(2*ã);
|
||||
}
|
||||
@@ -562,6 +582,10 @@ U0 Init()
|
||||
xx=(Fs->pix_width-200)*RandU32/U32_MAX;
|
||||
yy=(MAP_HEIGHT-200)*RandU32/U32_MAX;
|
||||
}
|
||||
if (!(i&63))
|
||||
tmpu->CIA=TRUE;
|
||||
else
|
||||
tmpu->CIA$PB$=FALSE;
|
||||
} else {
|
||||
tmpu->friendly=FALSE;
|
||||
if (!(i&31)) {
|
||||
@@ -929,7 +953,7 @@ to_done:
|
||||
MenuPop;
|
||||
RegWrite("TempleOS/Titanium","I64 best_score=%d;\n",best_score);
|
||||
}
|
||||
| ||||