TempleOSTS_131005.ISO

This commit is contained in:
Terry A. Davis authored and minexew committed 2018-09-08 21:45:52 +02:00
1 parent 1343005a29
commit 2d2a65d572
547 files changed
+33608 -12549

No files matched your search

+2 -2
View File
@@ -64,7 +64,7 @@ U0 MPAdd()
dc->color=BLUE;
for (i=MAX_PERCENT/10;i<MAX_PERCENT;i+=MAX_PERCENT/10) {
GrPrintF(dc,0,v-ToF64(i)/MAX_PERCENT*v-FONT_HEIGHT,"%3d%%",i);
GrPrint(dc,0,v-ToF64(i)/MAX_PERCENT*v-FONT_HEIGHT,"%3d%%",i);
GrLine(dc,0,v-ToF64(i)/MAX_PERCENT*v,h,v-ToF64(i)/MAX_PERCENT*v);
}
@@ -74,7 +74,7 @@ U0 MPAdd()
GrLine3(dc,i*h/(NUM_TESTS-1), v-results[i ]/MAX_PERCENT*v,0,
(i+1)*h/(NUM_TESTS-1),v-results[i+1]/MAX_PERCENT*v,0);
dc->color=GREEN;
GrPrintF(dc,i*h/(NUM_TESTS-1),v-FONT_HEIGHT,"10e%d",i+MIN_TEST);
GrPrint(dc,i*h/(NUM_TESTS-1),v-FONT_HEIGHT,"10e%d",i+MIN_TEST);
GrLine(dc,i*h/(NUM_TESTS-1),0,i*h/(NUM_TESTS-1),v);
}
PressAKey;
@@ -2,11 +2,11 @@ U0 Job(CDoc *doc)
{
I64 i;
for (i=0;i<2;i++)
DocPrintF(doc,"$$FG,%d$$CPU%d ",Gs->num,Gs->num);
DocPrint(doc,"$$FG,%d$$CPU%d ",Gs->num,Gs->num);
}
U0 MPPrintFDemo()
U0 MPPrintDemo()
{
I64 i;
for (i=0;i<500;i++)
@@ -15,4 +15,4 @@ U0 MPPrintFDemo()
"$$FG$$\n";
}
MPPrintFDemo;
MPPrintDemo;
+3 -3
View File
@@ -28,10 +28,10 @@ U0 PDAnswer(U8 *a,I64 len)
{
DocLock(doc);
a-=(len-1)/2;
DocPrintF(doc,"CPU:%d Len:%2d ",Gs->num,len);
DocPrint(doc,"CPU:%d Len:%2d ",Gs->num,len);
while (len--)
DocPrintF(doc,"%C",*a++); //%C is toupper char
DocPutS(doc,"\n");
DocPrint(doc,"%C",*a++); //%C is toupper char
DocPrint(doc,"\n");
DocUnlock(doc);
}