Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

Как сделать такой текст? Видел видео, в названии был такой текст croissant. Как сделать такой шрифт?

nikita zugunov Ученик (202), закрыт 6 лет назад
Лучший ответ
Mr. Perfectly Fine Оракул (62995) 6 лет назад
Создай файл *.vbs с таким содержимым – это конвертер текста в this shit

Option Explicit
Dim strInput : strInput = InputBox("Введите текст на английском", "Ввод", "")
Dim iStrLen : iStrLen = Len(strInput)
If iStrLen = 0 Then WScript.Quit
Dim strResult : strResult = ""
Dim i, ch
For i = 1 to iStrLen
ch = AscW(Mid(strInput, i, 1))
If ch > 32 And ch < 129 Then
strResult = strResult & ChrW(ch + 65248)
ElseIf ch = 32 Then
strResult = strResult & ChrW(8195)
Else
strResult = strResult & ChrW(ch)
End If
Next
strInput = InputBox("Скопируйте результат", "Вывод", strResult)
Остальные ответы
Похожие вопросы