diff --git a/image/rx.muri b/image/rx.muri index 53ec341..4ef9415 100644 --- a/image/rx.muri +++ b/image/rx.muri @@ -1180,6 +1180,8 @@ i feju.... d 0 : interpret:prefix +i ........ +i ........ i lifezr.. r prefix:handler i lifeliad @@ -1205,6 +1207,9 @@ i liju.... r choose : interpret +i liju.... +r _interpret +: _interpret i dulistli r input:source r prefix? diff --git a/ngaImage b/ngaImage index 1c50a81..bcf5593 100644 Binary files a/ngaImage and b/ngaImage differ diff --git a/vm/nga-c/retro-image.c b/vm/nga-c/retro-image.c index dd8228a..b8b2802 100644 --- a/vm/nga-c/retro-image.c +++ b/vm/nga-c/retro-image.c @@ -20,40 +20,40 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 2049,197,2049,158,459023,131,285282049,3,2,134287105,124,276,524545,1793,105,16846593,3,0,105,8, 659201,3,524545,25,110,17043201,3,7,2049,110,2049,105,268505092,124,1642241,124,656131,659201,3,524545, 7,110,2049,105,459009,19,110,459009,54,110,459009,15,110,459009,17,110,1793,5,10,524546, - 158,134284303,160,1807,1025,1642241,227,285282049,343,1,459012,338,117509889,177,338,134287105,343,197,16845825,0, - 351,335,1793,64,17826050,343,247,8,117506305,344,354,64,2116,11340,11700,11400,13685,13104,12432,12402, - 9603,9801,11514,11413,11110,12528,11948,10302,13340,9700,13455,12753,10500,10670,12654,13320,11960,13908,10088,10605, - 11865,11025,0,2049,197,987393,1,1793,105,524546,439,2049,437,2049,437,17891588,2,439,8,17045505, - -24,-16,17043736,-8,1118488,1793,105,17043202,1,169021201,2049,56,25,33883396,101450758,6404,459011,429,34668804,2, - 2049,426,524545,371,429,302056196,371,659969,1,0,9,150,100,117,112,0,448,11,150,100, - 114,111,112,0,455,13,150,115,119,97,112,0,463,21,150,99,97,108,108,0, - 471,26,150,101,113,63,0,479,28,150,45,101,113,63,0,486,30,150,108,116, - 63,0,494,32,150,103,116,63,0,501,34,150,102,101,116,99,104,0,508,36, - 150,115,116,111,114,101,0,517,38,150,43,0,526,40,150,45,0,531,42,150, - 42,0,536,44,150,47,109,111,100,0,541,46,150,97,110,100,0,549,48,150, - 111,114,0,556,50,150,120,111,114,0,562,52,150,115,104,105,102,116,0,569, - 329,156,112,117,115,104,0,578,332,156,112,111,112,0,586,326,156,48,59,0, - 593,56,144,102,101,116,99,104,45,110,101,120,116,0,599,59,144,115,116,111, - 114,101,45,110,101,120,116,0,613,218,144,115,58,116,111,45,110,117,109,98, - 101,114,0,627,93,144,115,58,101,113,63,0,642,79,144,115,58,108,101,110, - 103,116,104,0,651,64,144,99,104,111,111,115,101,0,663,72,150,105,102,0, - 673,70,144,45,105,102,0,679,258,156,112,114,101,102,105,120,58,40,0,686, - 124,131,67,111,109,112,105,108,101,114,0,698,3,131,72,101,97,112,0,710, - 105,144,44,0,718,119,144,115,44,0,723,125,156,59,0,729,285,156,91,0, - 734,301,156,93,0,739,2,131,68,105,99,116,105,111,110,97,114,121,0,744, - 157,144,100,58,108,105,110,107,0,758,158,144,100,58,120,116,0,768,160,144, - 100,58,99,108,97,115,115,0,776,162,144,100,58,110,97,109,101,0,787,144, - 144,99,108,97,115,115,58,119,111,114,100,0,797,156,144,99,108,97,115,115, - 58,109,97,99,114,111,0,811,131,144,99,108,97,115,115,58,100,97,116,97, - 0,826,164,144,100,58,97,100,100,45,104,101,97,100,101,114,0,840,259,156, - 112,114,101,102,105,120,58,35,0,856,265,156,112,114,101,102,105,120,58,58, - 0,868,279,156,112,114,101,102,105,120,58,38,0,880,263,156,112,114,101,102, - 105,120,58,36,0,892,316,156,114,101,112,101,97,116,0,904,318,156,97,103, - 97,105,110,0,914,363,144,105,110,116,101,114,112,114,101,116,0,923,197,144, - 100,58,108,111,111,107,117,112,0,936,150,144,99,108,97,115,115,58,112,114, - 105,109,105,116,105,118,101,0,948,4,131,86,101,114,115,105,111,110,0,967, - 408,144,105,0,978,105,144,100,0,983,128,156,988,402,144,114,0,991,335,144, - 101,114,114,58,110,111,116,102,111,117,110,100,0,0,0,0,0,0,0,0, + 158,134284303,160,1807,1025,0,0,1642241,227,285282049,343,1,459012,338,117509889,177,338,134287105,343,197, + 16845825,0,353,335,1793,64,1793,367,17826050,343,247,8,117506305,344,356,64,2116,11340,11700,11400, + 13685,13104,12432,12402,9603,9801,11514,11413,11110,12528,11948,10302,13340,9700,13455,12753,10500,10670,12654,13320, + 11960,13908,10088,10605,11865,11025,0,2049,197,987393,1,1793,105,524546,443,2049,441,2049,441,17891588, + 2,443,8,17045505,-24,-16,17043736,-8,1118488,1793,105,17043202,1,169021201,2049,56,25,33883396,101450758,6404, + 459011,433,34668804,2,2049,430,524545,375,433,302056196,375,659969,1,0,9,150,100,117,112,0, + 452,11,150,100,114,111,112,0,459,13,150,115,119,97,112,0,467,21,150,99, + 97,108,108,0,475,26,150,101,113,63,0,483,28,150,45,101,113,63,0,490, + 30,150,108,116,63,0,498,32,150,103,116,63,0,505,34,150,102,101,116,99, + 104,0,512,36,150,115,116,111,114,101,0,521,38,150,43,0,530,40,150,45, + 0,535,42,150,42,0,540,44,150,47,109,111,100,0,545,46,150,97,110,100, + 0,553,48,150,111,114,0,560,50,150,120,111,114,0,566,52,150,115,104,105, + 102,116,0,573,329,156,112,117,115,104,0,582,332,156,112,111,112,0,590,326, + 156,48,59,0,597,56,144,102,101,116,99,104,45,110,101,120,116,0,603,59, + 144,115,116,111,114,101,45,110,101,120,116,0,617,218,144,115,58,116,111,45, + 110,117,109,98,101,114,0,631,93,144,115,58,101,113,63,0,646,79,144,115, + 58,108,101,110,103,116,104,0,655,64,144,99,104,111,111,115,101,0,667,72, + 150,105,102,0,677,70,144,45,105,102,0,683,258,156,112,114,101,102,105,120, + 58,40,0,690,124,131,67,111,109,112,105,108,101,114,0,702,3,131,72,101, + 97,112,0,714,105,144,44,0,722,119,144,115,44,0,727,125,156,59,0,733, + 285,156,91,0,738,301,156,93,0,743,2,131,68,105,99,116,105,111,110,97, + 114,121,0,748,157,144,100,58,108,105,110,107,0,762,158,144,100,58,120,116, + 0,772,160,144,100,58,99,108,97,115,115,0,780,162,144,100,58,110,97,109, + 101,0,791,144,144,99,108,97,115,115,58,119,111,114,100,0,801,156,144,99, + 108,97,115,115,58,109,97,99,114,111,0,815,131,144,99,108,97,115,115,58, + 100,97,116,97,0,830,164,144,100,58,97,100,100,45,104,101,97,100,101,114, + 0,844,259,156,112,114,101,102,105,120,58,35,0,860,265,156,112,114,101,102, + 105,120,58,58,0,872,279,156,112,114,101,102,105,120,58,38,0,884,263,156, + 112,114,101,102,105,120,58,36,0,896,316,156,114,101,112,101,97,116,0,908, + 318,156,97,103,97,105,110,0,918,365,144,105,110,116,101,114,112,114,101,116, + 0,927,197,144,100,58,108,111,111,107,117,112,0,940,150,144,99,108,97,115, + 115,58,112,114,105,109,105,116,105,118,101,0,952,4,131,86,101,114,115,105, + 111,110,0,971,412,144,105,0,982,105,144,100,0,987,128,156,992,406,144,114, + 0,995,335,144,101,114,114,58,110,111,116,102,111,117,110,100,0,0,0,0, 0,0,0,0,0,0,105,109,97,103,101,58,115,97,118,101,0,103,101,0, 116,0,110,103,45,119,105,116,104,0,104,0,79,85,78,68,0,125,126,0, 72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,0, @@ -79,7 +79,7 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0, - 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,996,1543,144, + 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1000,1543,144, 69,79,77,0,1,-3,15,10,1536,1556,144,100,101,112,116,104,0,1,-1,15, 10,1547,1570,144,100,58,108,97,115,116,0,1,2,15,10,1560,1588,144,100,58, 108,97,115,116,60,120,116,62,0,2049,1570,2049,158,15,10,1574,1611,144,100,58, @@ -95,8 +95,8 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 2049,105,2049,105,10,1761,1799,144,99,111,109,112,105,108,101,58,114,101,116,0, 1,10,2049,105,10,1784,1818,144,99,111,109,112,105,108,105,110,103,63,0,1, 124,15,10,1804,1834,156,112,114,101,102,105,120,58,96,0,2049,218,2049,105,10, - 1822,1851,156,112,114,101,102,105,120,58,92,0,2049,408,10,1839,1866,156,112,114, - 101,102,105,120,58,94,0,2049,402,10,1854,1877,144,104,101,114,101,0,1,3, + 1822,1851,156,112,114,101,102,105,120,58,92,0,2049,412,10,1839,1866,156,112,114, + 101,102,105,120,58,94,0,2049,406,10,1854,1877,144,104,101,114,101,0,1,3, 15,10,1869,1893,156,112,114,101,102,105,120,58,64,0,2049,197,2049,158,15,2049, 1818,1793,1909,1,3841,2049,105,2049,105,10,1,1902,1793,1915,15,10,1,1913,2049,64, 10,1881,1932,156,112,114,101,102,105,120,58,33,0,2049,197,2049,158,15,2049,1818, @@ -432,8 +432,8 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 8497,8535,144,99,111,117,110,116,45,116,111,107,101,110,115,0,1793,8541,1,32, 11,10,1,8537,2049,4315,2049,79,10,8519,8562,144,110,101,120,116,45,116,111,107, 101,110,0,1,32,2049,6141,10,8548,8585,144,112,114,111,99,101,115,115,45,116, - 111,107,101,110,115,0,1793,8611,2049,8562,4,1793,8604,2,2049,79,2049,2583,1,363, - 1,11,2049,64,10,1,8592,2049,2106,2049,2893,10,1,8587,2049,2281,2049,363,10,8460, + 111,107,101,110,115,0,1793,8611,2049,8562,4,1793,8604,2,2049,79,2049,2583,1,365, + 1,11,2049,64,10,1,8592,2049,2106,2049,2893,10,1,8587,2049,2281,2049,365,10,8460, 8632,144,115,58,101,118,97,108,117,97,116,101,0,2049,8513,2049,4562,2049,8513,2, 2049,8535,2049,8585,10,8618,8652,131,70,108,97,103,0,0,8644,8664,144,99,111,109, 112,97,114,101,0,67440386,184946434,10,8653,8677,144,108,101,110,103,116,104,0,659202,10, @@ -455,7 +455,7 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 17,1,2,18,15,10,8970,9006,144,116,105,109,101,115,60,119,105,116,104,45, 105,110,100,101,120,62,0,2049,8918,4,1793,9022,25,33886721,1,2053,1542,2049,8902,1, 9011,7,10,1,9011,8,3,2049,8939,10,8985,9037,156,104,111,111,107,0,2049,3667, - 108,105,106,117,46,46,46,46,0,1,9039,2049,408,2049,1877,2049,2893,2049,105,10, + 108,105,106,117,46,46,46,46,0,1,9039,2049,412,2049,1877,2049,2893,2049,105,10, 9029,9071,144,115,101,116,45,104,111,111,107,0,2049,2893,16,10,9059,9085,144,117, 110,104,111,111,107,0,2049,2893,2,2049,2893,4,16,10,9075,9109,144,105,111,58, 101,110,117,109,101,114,97,116,101,0,27,10,9093,9123,144,105,111,58,113,117, @@ -715,7 +715,7 @@ CELL ngaImage[] = { 1793,14340,14884,14926,202004,0,10,1,10,2,10,3,10,4,10,5,10, 144,114,101,97,100,45,116,111,107,101,110,0,1793,14207,1793,14202,2049,14146,2049,14128, 2049,13989,10,1,14195,2049,2256,10,1,14193,2049,14162,2049,3745,10,14177,14223,144,105,110, 112,117,116,0,2049,14191,2049,14028,10,14214,14239,144,112,114,111,99,101,115,115,0, - 1,363,1,11,2049,64,10,13951,14256,144,98,97,110,110,101,114,0,2049,13974,2049, + 1,365,1,11,2049,64,10,13951,14256,144,98,97,110,110,101,114,0,2049,13974,2049, 3667,82,69,84,82,79,32,49,50,32,40,37,110,46,37,110,41,92,110,0, 1,14260,2049,6548,2049,9257,2049,1543,2049,1877,18,2049,1877,2049,1543,2049,3667,37,110,32, 77,97,120,44,32,37,110,32,85,115,101,100,44,32,37,110,32,70,114,101,