373:         /* VIDEOMODE */
374:         putTC(str, n++, mode + 1);
375: 
376:         /* X size */
377:         if (x >= 1000) putTC(str, n++, TK_0 + (x / 1000) % 10);
378:         if (x >=  100) putTC(str, n++, TK_0 + (x /  100) % 10);
379:         if (x >=   10) putTC(str, n++, TK_0 + (x /   10) % 10);
380:                         putTC(str, n++, TK_0 +  x         % 10);
381: 
382:         putTC(str, n++, TK_MULT);      // (multiplication symbol in TC)
383: 
384:         /* Y size */
385:         if (y >= 1000) putTC(str, n++, TK_0 + (y / 1000) % 10);
386:         if (y >=  100) putTC(str, n++, TK_0 + (y /  100) % 10);
387:         if (y >=   10) putTC(str, n++, TK_0 + (y /   10) % 10);
388:                         putTC(str, n++, TK_0 +  y         % 10);
389: 
390:         putTC(str, n++, TK_COLN);      // : (TC)
391: 
393:         if (bpp == 4) {
394:                 putTC(str, n++, TK_1);
395:                 putTC(str, n++, TK_6);
396:                 putTC(str, n++, TK_C);
397:         } else if (bpp == 8) {
398:                 putTC(str, n++, TK_2);
399:                 putTC(str, n++, TK_5);
400:                 putTC(str, n++, TK_6);
401:                 putTC(str, n++, TK_C);
402:         } else if (bpp == 16) {
403:                 putTC(str, n++, TK_6);
404:                 putTC(str, n++, TK_4);
405:                 putTC(str, n++, TK_K);
406:                 putTC(str, n++, TK_C);
407:         } else if (bpp == 24 || bpp == 32) {
408:                 putTC(str, n++, TK_1);
409:                 putTC(str, n++, TK_6);
410:                 putTC(str, n++, TK_M);
411:                 putTC(str, n++, TK_C);
412:         }
416:                 for (; n < MODESTR_SIZE && *desc != TC_NULL; n++, desc++) {
417:                         putTC(str, n, *desc);
418:                 }
421:         /* padding to make the string length constant */
422:         for (; n < MODESTR_SIZE; n++) putTC(str, n, TK_KSP);
423:  fin0: