ЭВМ openair: Пермские Васюки

[siril]

кодируйте в qr-код!

UDG-символами можно кодировать по 4 бита в знакоместе, или 1 байт в 2-х знакоместах. Что даёт нам ту же самую плотность, что и при использовании 16-ричного дампа (байт на 2 знакоместа).

[Advertiser]

[diver]

UDG-символами можно кодировать по 4 бита в знакоместе, или 1 байт в 2-х знакоместах. Что даёт нам ту же самую плотность, что и при использовании 16-ричного дампа (байт на 2 знакоместа).

Простой конвертер на бейсике?

[siril]

Простой конвертер на бейсике?

ага, просто в этой строчке: 9999 for f = 23755 to (23755 + len): let p = peek f: print chr$(65+p/16); chr$(65+p-(INT(p/16)*16); : next f

заменить 65 на 128 и будет тебе полная иллюзия QR-кода, по 2 знакоместа на байт =) (но, разумеется, без всяких там контрольных сумм ^_^)

9999 for f = 23755 to (23755 + len): let p = peek f: print chr$(128+p/16); chr$(128+p-(INT(p/16)*16); : next f

выглядеть будет красивее, но толку нуль. (распознавать сложнее будет).

[diver]

ага, просто в этой строчке: 9999 for f = 23755 to (23755 + len): let p = peek f: print chr$(65+p/16); chr$(65+p-(INT(p/16)*16); : next f

заменить 65 на 128 и будет тебе полная иллюзия QR-кода, по 2 знакоместа на байт =) (но, разумеется, без всяких там контрольных сумм ^_^)

9999 for f = 23755 to (23755 + len): let p = peek f: print chr$(128+p/16); chr$(128+p-(INT(p/16)*16); : next f

выглядеть будет красивее, но толку нуль. (распознавать сложнее будет).

Извращенец Пока что способ с дампом 768-бит спрайтов в из пикселей в атрибуты наиболее реален.

[siril]

Извращенец Пока что способ с дампом 768-бит спрайтов в из пикселей в атрибуты наиболее реален.

атрибуты? если я правильно понял - то тут фиг выловишь flash - и как минимум один бит потеряется.

см. красоту во вложении.