LMS 2012
 All Data Structures Files Functions Variables Typedefs Enumerations Enumerator Macros Pages
p12.c
Go to the documentation of this file.
1 
7 //
8 //
9 // (VMTHREAD1--WRITE--START(2)--------------WRITE(One)--DELAY(1)--LOOP10)-----)
10 // \ ^ |
11 // \ | |
12 // \ `----------------------'
13 // \
14 // (VMTHREAD2--WRITE(One)--DELAY(1)--LOOP10)-----)
15 // ^ |
16 // | |
17 // `----------------------'
18 //
19 UBYTE prg[] = // p12.c
20 { //
21  PROGRAMHeader(0,2,0), // VersionInfo,NumberOfObjects,GlobalBytes
22  VMTHREADHeader(40,5), // OffsetToInstructions,LocalBytes
23  VMTHREADHeader(106,5), // OffsetToInstructions,LocalBytes
24  //
25  // VMTHREAD1
26  // {
27  opUI_WRITE,LC0(PUT_STRING),LCS,' ',' ',' ',' ','P', // UI_WRITE(STRING," Parallel programming\r\n");
28  'a','r','a','l','l','e','l',' ','p','r','o', //
29  'g','r','a','m','m','i','n','g','\r','\n',0, //
30  opUI_FLUSH, // UI_FLUSH
31  opOBJECT_START,LC0(2), // START_OBJECT(2)
32  //
33  opMOVE8_8,LC0(10),LV0(4), // LV4 = 10
34  // do
35  // {
36  opUI_WRITE,LC0(PUT_STRING),LCS,' ',' ',' ',' ','O', // UI_WRITE(STRING," One\r\n");
37  'n','e','\r','\n',0, //
38  opUI_FLUSH, // UI_FLUSH
39  opTIMER_WAIT,LC2(1000),LV0(0), // DELAY(1)
40  opTIMER_READY,LV0(0), //
41  // }
42  opSUB8,LV0(4),LC0(1),LV0(4), // while(--LV4)
43  opJR_NEQ8,LV0(4),LC0(0),LC0(-29), //
44  opOBJECT_END, // }
45  //
46  // VMTHREAD2
47  // {
48  opMOVE8_8,LC0(10),LV0(4), // LV4 = 10
49  // do
50  // {
51  opUI_WRITE,LC0(PUT_STRING),LCS,' ',' ',' ',' ','T', // UI_WRITE(STRING," Two\r\n");
52  'w','o','\r','\n',0, //
53  opUI_FLUSH, // UI_FLUSH
54  opTIMER_WAIT,LC2(1000),LV0(0), // DELAY(1)
55  opTIMER_READY,LV0(0), //
56  // }
57  opSUB8,LV0(4),LC0(1),LV0(4), // while(--LV4)
58  opJR_NEQ8,LV0(4),LC0(0),LC0(-29), //
59  opOBJECT_END, // }
60  //
61 };
62 
63 /* \endverbatim
64 */
#define LC2(v)
Definition: bytecodes.h:1617
UBYTE prg[]
Definition: p0.c:1
#define VMTHREADHeader(OffsetToInstructions, LocalBytes)
Definition: bytecodes.h:1573
#define PROGRAMHeader(VersionInfo, NumberOfObjects, GlobalBytes)
Definition: bytecodes.h:1570
#define LCS
Definition: bytecodes.h:1611
#define LC0(v)
Definition: bytecodes.h:1615
#define LV0(i)
Definition: bytecodes.h:1621
unsigned char UBYTE
Basic Type used to symbolise 8 bit unsigned values.
Definition: lmstypes.h:29