|
| Посл.отвђт | Сообщенiе |
|
|
Дата: Ноя 30, 2002 18:30:50 На старом форуме был макрос для Unicode, повторите. |
|
|
Дата: Дек 1, 2002 13:02:28 Не знаю какой макрос ты имеешь в виду, но в архиве статье "Драйверы режима ядра" есть файлик Strings.mac. Надеюсь будет те полезен. Тока имей ввиду, что Unicode-строка не должна быть > 47 символов. Может потом я это и пофиксю. http://wasm.ru/pub/21/files/kmd2.zip http://wasm.ru/pub/21/files/kmd2.zip |
|
|
Дата: Дек 1, 2002 14:59:36 unicode macro page,string,zero irpc c,<string> db '&c', page endm ifnb <zero> dw zero endif endm uszPhysdikalDrv: unicode 0,<\DosDevices\PhysicalDrive0>,0 |
|
|
Дата: Дек 1, 2002 17:10:16 Большое спасибо. С Уважением Dust112 |
|
|
Дата: Дек 4, 2002 14:20:12 Dust112 Предлагаю более рулёзный набор макро для УНИКОД в windows.mac (првда под MASM) Хотя я ещё не предусмотрел возможность ввода больших строк... но это не сложно сделать... http://wasm.ru/tools/11/winmac.zip |
|
|
Дата: Дек 4, 2002 17:40:54 ;============================================== ; E-Z Unicode By NaN, 2002 ;============================================== UNICODE_TEXT TEXTEQU <LABEL BYTE> LL macro btext LOCAL cnt, va, vb, LineText, data1 LineText TEXTEQU < dw > va = 1 vb = 1 cnt equ @SizeStr(<btext> )+1 WHILE va LT cnt if vb LT 20 data1 SUBSTR <btext>, va, 1 LineText CATSTR LineText, <'>, data1, <',> else vb = 1 LineText SUBSTR LineText, 1, @SizeStr(%LineText)-1 &LineText LineText TEXTEQU < dw > data1 SUBSTR <btext>, va, 1 LineText CATSTR LineText, <'>, data1, <',> endif vb = vb + 1 va = va + 1 ENDM LineText SUBSTR LineText, 1, @SizeStr(%LineText)-1 &LineText endm szexpert UNICODE_TEXT LL <stroka_dlja_unikoda> dw 0 |
|
|
Дата: Дек 10, 2002 14:35:14 [Edmond: Предлагаю более рулёзный набор макро для УНИКОД в windows.mac ] Мммда... Надо мне тоже кириллицу пофиксить. А в остальном ничего такого рулезного я не заметил. Или не прав? |