Abbaye des Morts FINAL VERSION

[Alex Rider]

я собрал все вот это вот такой вот загогулиной

Сбываются пророчества... Стоило положить на всеобщее обозрение кривой сборщик, как внезапно начали появляться кривые сборки, даже несмотря на то, что собрщик без контрольной суммы был обозван кривым. Собрайте в TRD - SjASM оно умеет искаропки, без кучи кода и проблем с совместимостью.

[Advertiser]

[denpopov]

Стоило положить на всеобщее обозрение кривой сборщик

Ну кривой поправлен вообще-то, просто тему не пофиксили..

[jerri]

Alex Rider, но там то кривой сборщик, а тут просто ручками создается дамп файла. лень просто фиксер писать

[denpopov]

лень просто фиксер писать

он написан вроде:
http://zx-pk.ru/showpost.php?p=718285&postcount=16

[jerri]

denpopov, как ты собираешь файлы в пб?
мои ексешники ( для работы с графикой) под вистой падают
что я делаю не так?

[denpopov]

denpopov, как ты собираешь файлы в пб?

версия 5.11 x86
Compiler->Create Executable..
и все под семеркой робит.
кстати, только недавно узнал, что CanvasGadget введен с 4.60

А как падают хоть? может, просто при коде есть косячок? Пуревасик не обрабатывает ошибки.

[jerri]

Сигнатура проблемы:
Имя события проблемы: APPCRASH
Имя приложения: scrrec.exe
Версия приложения: 0.0.0.0
Штамп времени приложения: 52791328
Имя модуля с ошибкой: ntdll.dll
Версия модуля с ошибкой: 6.0.6002.18881
Штамп времени модуля с ошибкой: 51da3e27
Код исключения: c0000005
Смещение исключения: 00023fa4
Версия ОС: 6.0.6002.2.2.0.768.2
Код языка: 1049
Дополнительные сведения 1: c43c
Дополнительные сведения 2: 68439ef9a9b48b2b291a661dcd50924e
Дополнительные сведения 3: 5e2d
Дополнительные сведения 4: e89f09a8c3a8cedd242af998f4199bc4

вот такое пишет
вот такая программа
https://www.dropbox.com/s/wnebyb7zckmbgtp/scrrec.exe
https://www.dropbox.com/s/zd7gsuv0ocm87n9/scrrec.pb

[denpopov]

Антивирус не дает скомпилировать, считает, что вирус, наверное.
вот тут:
Global filename.s=ProgramParameter()
а указывается номер параметра командной строки:
ProgramParameter([Index])

и еще:
If CreateFile(0,filename) ; we create a new text file...
WriteData(0,*out,ptr)
CloseFile(0) ; close the previously opened file and store the written data this way
Else
PrintN("Can't create "+filename)
Delay(1000)
EndIf
т.е., после сообщения об ошибки лучше указать End как выход из программы.

Да и проще, если понять, в чём проблема проще гонять под Бейсиком, нужно будет только передать параметры, тогда ошибка сама высветится.

---------- Post added at 08:50 ---------- Previous post was at 08:50 ----------

нужен будет проблемный файл, тогда гляну, что не нравится.

[jerri]

Антивирус не дает скомпилировать, считает, что вирус, наверное.
вот тут:
Global filename.s=ProgramParameter()
а указывается номер параметра командной строки:
ProgramParameter([Index])

и еще:
If CreateFile(0,filename) ; we create a new text file...
WriteData(0,*out,ptr)
CloseFile(0) ; close the previously opened file and store the written data this way
Else
PrintN("Can't create "+filename)
Delay(1000)
EndIf
т.е., после сообщения об ошибки лучше указать End как выход из программы.

Да и проще, если понять, в чём проблема проще гонять под Бейсиком, нужно будет только передать параметры, тогда ошибка сама высветится.

---------- Post added at 08:50 ---------- Previous post was at 08:50 ----------

нужен будет проблемный файл, тогда гляну, что не нравится.

проблема не с антивирусом
1- на ХР работает программа собиралась на ХР
2- я забираю очередной параметр там допустимо.

а спотыкается на доступе к памяти

https://www.dropbox.com/s/z05gf2woh3ucigg/title.scr

[denpopov]

а спотыкается на доступе к памяти

мне вот это не нравится:
WriteData(0,*out,ptr)

ща попробую

---------- Post added at 10:03 ---------- Previous post was at 09:36 ----------

Не люблю виртуальную память в венде, подсказали вот что:
*pack=AllocateMemory(size+1)
*out=AllocateMemory(size+1)

и объявление Global лучше вынести.

Странно, у меня есть две проги, где одна переменная используется как указатель на память, и все работает..