X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=direct.c;h=900c629a3b686d392b207cf4e36bad04adab8991;hp=6a41e82ed9991b9b9a5cd6f8506f42b5b0494b7d;hb=a3feec3b2d24d0f4685549a5059a210e074c2b99;hpb=ff2052bcaa1428a33a202822a81a6f9b8e567ef4 diff --git a/direct.c b/direct.c index 6a41e82..900c629 100644 --- a/direct.c +++ b/direct.c @@ -982,15 +982,28 @@ int d_dc(WORD siz) for(;; tok++) { // dc.b 'string' [,] ... - if (siz == SIZB && *tok == STRING && (tok[2] == ',' || tok[2] == EOL)) + if (siz == SIZB && (*tok == STRING || *tok == STRINGA8) && (tok[2] == ',' || tok[2] == EOL)) { uint32_t i = strlen(string[tok[1]]); if ((challoc - ch_size) < i) chcheck(i); - for(p=string[tok[1]]; *p!=EOS; p++) - D_byte(*p); + if (*tok == STRING) + { + for(p=string[tok[1]]; *p!=EOS; p++) + D_byte(*p); + } + else if(*tok == STRINGA8) + { + for(p=string[tok[1]]; *p!=EOS; p++) + D_byte(strtoa8[*p]); + } + else + { + error("String format not supported... yet"); + } + tok += 2; goto comma;