// **************************************************************
// ** 3x+1 and x/2 Testsoftware
// **************************************************************

daten[200] = 11;    // Testvalue, variable
daten[201] = 0;     // Counter

daten[0] = 0xF000;    // NOP

daten[1] = 0x1800;		// LDAM
daten[2] = 200;

daten[3] = 0x3440;		//ADD - 1
daten[4] = 0xFFFF;

daten[5] = 0x4018;		// BZ 100 to the end
daten[6] = 100;

daten[7] = 0x3440;		//ADD 1
daten[8] = 0x0001;

daten[9] = 0x4020;		//BE
daten[10] = 21;          // divide by 2

daten[11] = 0x2800;		// STAM
daten[12] = 16;

daten[13] = 0x35C0;		// SHL
daten[14] = 0x0000;

daten[15] = 0x3440;		//ADD value
daten[16] = 0x0;

daten[17] = 0x3440;		//ADD 1
daten[18] = 0x0001;

daten[19] = 0x4000;		//BA
daten[20] = 23;

daten[21] = 0x3580;    // SHR
daten[22] = 0;

daten[23] = 0x2800;		// STAM     // Save new value
daten[24] = 200;

daten[25] = 0x1800;		// LDAM
daten[26] = 201;

daten[27] = 0x3440;		//ADD 1
daten[28] = 0x0001;

daten[29] = 0x2800;		// STAM     // Save new value
daten[30] = 201;

daten[31] = 0x4000;		//BA
daten[32] = 1;

daten[100] = 0x1800;		// LDAM
daten[101] = 201;