Перевод с visual basic на пайтон

@Def_80 · Регистрация: 02.09.2022

Студворк — интернет-сервис помощи студентам

Добрый день.. всем.. ~~я новичёк.. пока многово низнаю.~~. я - новичок и пока многого не знаю.
Интересуюсь пайтоном..
Хотелось бы перевести этот код на пайтон.. очень рад был бы помощи..

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Sub Main
  Sc.Verbose = False
   For N = &h00 To &hFE
 
 
          Sc.Write("80 00 00 00 05")
          Sc.Read(1)
          Sc.Write("59 33 82 00")
          Sc.Write(H(N))
          Sc.Write("FF 60 30 51 00 72 FE F7 00 00 00 00 00 00 00")
          Sc.Write(H(N))
          Sc.Write("FF 60 30 51 00 72 FE F7 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 02 7F")
          Sc.Read(2)
 
          If Sc.GetByte(1) = &h5 Then
             Sc.Write("00 C0 00 00 05")
             Sc.Read(8)
             Sc.Print("no ")
 
          End If
 
 
          If Sc.GetByte(1) = &h7 Then
             Sc.Write("00 C0 00 00 07")
             Sc.Read(10)
             Sc.Print("" & H(N) & "")
             Sc.Print("del ")
 
         End If
 
 
 
     Next
End Sub
 
Function H(X)
  H = Hex(X)
  If Len(H) < 2 Then H = "0" & H
End Function

Пробовал найти онлайн конвертор .. толком ничего грамотного не нашёл..
Спасибо..

@Def_80 · 05.09.2022, 23:40 **[ТС]**

Древняя ещё.. 2.7.18

@iSmokeJC · 05.09.2022, 23:44

О Боже!

Поставь третий!!!

@Def_80 · 06.09.2022, 00:02 **[ТС]**

Да я бы и рад.. но на этом оборудовоние пока не получиться.. большее количество пользователей сидят на этой..

@Def_80 · 06.09.2022, 15:35 **[ТС]**

Нашёл кое какой пример кода.. сейчас попробую что нибуть сворганить..

Новые блоги и статьи Все статьи Все блоги /
Debian 13: Установка Lazarus QT5 ВитГо 09.05.2026 Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .	Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .	Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .
Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .	Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .	Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .

@Def_80 0 / 0 / 0 Регистрация: 02.09.2022 Сообщений: 13
	05.09.2022, 23:40 [ТС]
	Древняя ещё.. 2.7.18 0

@iSmokeJC 19530 / 11067 / 2931 Регистрация: 21.10.2017 Сообщений: 23,294
	05.09.2022, 23:44
	О Боже! Поставь третий!!! 0

@Def_80 0 / 0 / 0 Регистрация: 02.09.2022 Сообщений: 13
	06.09.2022, 00:02 [ТС]
	Да я бы и рад.. но на этом оборудовоние пока не получиться.. большее количество пользователей сидят на этой.. 0

@Def_80 0 / 0 / 0 Регистрация: 02.09.2022 Сообщений: 13
	06.09.2022, 15:35 [ТС]
	Нашёл кое какой пример кода.. сейчас попробую что нибуть сворганить.. 0

Опции темы