Паскаль ошибка 200

Лучший ответ Сообщение было отмечено theone как решение

Решение

theone

Assembler
1
2
3
4
5
seg000:00B1                 mov     ax, word_1129A
seg000:00B4                 cwd
seg000:00B5                 mov     cx, 2
seg000:00B8                 idiv    cx
seg000:00BA                 mov     word_1129E, ax

При изменении делителя на 2 подключается знаковое деление(idiv).

При использовании longint подключается процедура:

Assembler
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
seg003:0769 @$brdiv$q7Longintt1 proc far
seg003:0769                 cmp     byte_112AE, 2
seg003:076E                 jb      loc_10F37
seg003:0770                 shl     eax, 10h
seg003:0774                 shrd    eax, edx, 10h
seg003:0779                 shl     ecx, 10h
seg003:077D                 shrd    ecx, ebx, 10h
seg003:0782                 jz      loc_10F82
seg003:0784                 cdq
seg003:0786                 idiv    ecx
seg003:0789                 mov     ecx, edx
seg003:078C                 shld    edx, eax, 10h
seg003:0791                 shld    ebx, ecx, 10h
seg003:0796                 retf
seg003:0797 loc_10F37:
seg003:0797                 push    bp
seg003:0798                 xor     bp, bp
seg003:079A                 or      dx, dx
seg003:079C                 jns     loc_10F46
seg003:079E                 inc     bp
seg003:079F                 neg     ax
seg003:07A1                 adc     dx, 0
seg003:07A4                 neg     dx
seg003:07A6 loc_10F46:
seg003:07A6                 or      bx, bx
seg003:07A8                 jz      loc_10F88
seg003:07AA                 jns     loc_10F57
seg003:07AC                 inc     bp
seg003:07AD                 inc     bp
seg003:07AE                 neg     cx
seg003:07B0                 adc     bx, 0
seg003:07B3                 neg     bx
seg003:07B5                 jz      loc_10F8A
seg003:07B7 loc_10F57:
seg003:07B7                 push    bp
seg003:07B8                 mov     si, cx
seg003:07BA                 mov     di, bx
seg003:07BC                 xor     bx, bx
seg003:07BE                 mov     cx, dx
seg003:07C0                 mov     dx, ax
seg003:07C2                 xor     ax, ax
seg003:07C4                 mov     bp, 10h
seg003:07C7 loc_10F67:
seg003:07C7                 shl     ax, 1
seg003:07C9                 rcl     dx, 1
seg003:07CB                 rcl     cx, 1
seg003:07CD                 rcl     bx, 1
seg003:07CF                 inc     ax
seg003:07D0                 sub     cx, si
seg003:07D2                 sbb     bx, di
seg003:07D4                 jnb     loc_10F7B
seg003:07D6                 dec     ax
seg003:07D7                 add     cx, si
seg003:07D9                 adc     bx, di
seg003:07DB loc_10F7B:
seg003:07DB                 dec     bp
seg003:07DC                 jnz     loc_10F67
seg003:07DE                 pop     bp
seg003:07DF                 jmp     short loc_10F97
seg003:07E1 loc_10F81:
seg003:07E1                 pop     bp
seg003:07E2 loc_10F82:
seg003:07E2                 mov     ax, 0C8h ; 'L'
seg003:07E5                 jmp     loc_108AF
seg003:07E8 loc_10F88:
seg003:07E8                 jcxz    loc_10F81
seg003:07EA loc_10F8A:
seg003:07EA                 xchg    ax, bx
seg003:07EB                 xchg    ax, dx
seg003:07EC                 div     cx
seg003:07EE                 xchg    ax, bx
seg003:07EF                 div     cx
seg003:07F1                 mov     cx, dx
seg003:07F3                 mov     dx, bx
seg003:07F5                 xor     bx, bx
seg003:07F7 loc_10F97:
seg003:07F7                 shr     bp, 1
seg003:07F9                 jnb     loc_10FA3
seg003:07FB                 neg     cx
seg003:07FD                 adc     bx, 0
seg003:0800                 neg     bx
seg003:0802                 inc     bp
seg003:0803 loc_10FA3:
seg003:0803                 dec     bp
seg003:0804                 jnz     loc_10FAD
seg003:0806                 neg     ax
seg003:0808                 adc     dx, 0
seg003:080B                 neg     dx
seg003:080D loc_10FAD:
seg003:080D                 pop     bp
seg003:080E                 retf
seg003:080E @$brdiv$q7Longintt1 endp

Ваше прерывание выглядит так:

Assembler
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
seg000:001C                 push    ax
seg000:001D                 push    bx
seg000:001E                 push    cx
seg000:001F                 push    dx
seg000:0020                 push    si
seg000:0021                 push    di
seg000:0022                 push    ds
seg000:0023                 push    es
seg000:0024                 push    bp
seg000:0025                 mov     bp, sp
seg000:0027                 sub     sp, 4
seg000:002A                 mov     ax, seg dseg
seg000:002D                 mov     ds, ax
seg000:002F                 mov     word ptr [bp-4], 0Ah
seg000:0034                 mov     word ptr [bp-2], 0
seg000:0039                 mov     ax, [bp-4]
seg000:003C                 mov     dx, [bp-2]
seg000:003F                 mov     cx, 1
seg000:0042                 xor     bx, bx
seg000:0044                 call    @$brdiv$q7Longintt1
seg000:0049                 mov     ax, cx
seg000:004B                 mov     dx, bx
seg000:004D                 or      ax, dx
seg000:004F                 jnz     $+2
seg000:0051                 mov     sp, bp
seg000:0053                 pop     bp
seg000:0054                 pop     es
seg000:0055                 pop     ds
seg000:0056                 pop     di
seg000:0057                 pop     si
seg000:0058                 pop     dx
seg000:0059                 pop     cx
seg000:005A                 pop     bx
seg000:005B                 pop     ax
seg000:005C                 iret

Но оно вызывает функцию @$brdiv$q7Longintt1, где используются 32-х битные регистры, ладно младшие 16-ть бит востанавливаются(куча push и pop вначале и в конце), но старшая часть регистра перезаписывается 18,2 раза в секунду(в прерывании), плюс ещё программа вносит свои изменения в цикле.

До тех пор, пока Вы не раскажите о хитрых ходах: a mod 1 = 0 и newtick div 1 смысла разговаривать нет.

Добавлено через 15 минут
Ваша программа выполненяет newtick div 1 в цикле и прерывается прерыванием и выполняя a mod 1 = 0 заходит в общую функцию, при этом портит сами регистры(старшую часть) именно это приводит к ошибке.
Я бы посоветовал использовать критические секции, но в этом паскале/ассемблере, кроме как запрета прерываний ничего нет.



2



I’ve FreeDos OS installed on VirtualBox on a windows xp, dual core, host machine. I installed FreeDos because I wanted to run a Pascal code using Turbo Pascal. When I run the code, it throws error ‘Error 200: Division by zero.’. How can I solve this?

-Turbo Pascal 7.0, Free DOS 1.1, Virtual Box 4.3.6, Windows XP Service Pack 3 Host machine
-This error is unfortunately caused by fast Pentium CPUs and I found a patch on the internet that will resolve the error. (www.filewatcher.com/m/bp7patch.zip.62550-0.html) Now the other problem is, when i was tracing the code, it hangs at ‘RxWait procedure when trying to execute while not odd(port[RXTX + 5]) do;’

uses crt;

const
{ COM1: RS232 port address }
RXTX = $3F8; { $2F8 if COM2: is used }
ACK = 6;
NAK = 21;
ESC = 27;

var
dummy,
checkSum : integer;
key : char;
protocol : integer;

procedure InitComm;
{ Set baudrate to 9600, 8 bits, no parity, 1 stop bit }
var i : integer;
begin
i := 1843200 div 9600 div 16;
port[RXTX + 3] := $80;
port[RXTX + 1] := hi(i);
port[RXTX]:= lo(i);
port[RXTX + 3] := 3;
port[RXTX + 4] := $A;
while odd(port[RXTX + 5]) do
begin
dummy := port[RXTX];
delay(10);
end;
end; { InitComm }

procedure Tx(data : integer);
{ Transmit a character on serial channel }
begin
while port[RXTX + 5] and $20 = 0 do;
port[RXTX] := data and $FF;
end; { Tx }

function RxWait : integer;
{ Waits for a character from serial channel }
begin
while not odd(port[RXTX + 5]) do;
RxWait := port[RXTX];
end; { RxWait }

procedure Tx2(data : integer);
{ Transmit a char on serial channel + Calculate check sum }
begin
Tx(data);
checkSum := (checkSum + data) and $FF;
end; { Tx2 }

procedure TxCommand(c1, c2 : char;
sendCheckSum : boolean);
{ Transmit command (no data) on serial channel }
begin
Tx(ESC);
checkSum := 0;
Tx2(ord(c1));
Tx2(ord(c2));
if sendCheckSum then
begin
Tx2(checkSum);
dummy := RxWait;
end;
end; { TxCommand }

function ReadNumber(n : integer) : real;
{ Read n bytes from serial channel }
var
number: real;
i : integer;
begin
number := 0;
checkSum := 0;
for i := 1 to n do
number := number * 256 + RxWait;
dummy := RxWait;
ReadNumber := number;
end; { ReadNumber }

procedure Revisions;
var
tmp : integer;
sw,
prot : real;
begin
TxCommand('P', 'R', FALSE);
checkSum := 0;
tmp := RxWait;
sw := tmp + RxWait / 100.0;
protocol := RxWait;
prot := protocol + RxWait / 100.0;
dummy := RxWait;
tmp := RxWait;
writeln('Software revision: ', sw:4:2);
writeln('Protocol revision: ', prot:4:2);
end; { Revisions }

procedure ReadCountReg;
begin
TxCommand('R', 'C', FALSE);
writeln(ReadNumber(4):11:0, ' coins counted.');
dummy := RxWait;
end; { ReadCountReg }

procedure ReadAccReg;
begin
TxCommand('R', 'A', FALSE);
writeln(ReadNumber(4):11:0, ' coins in accumulator.');
dummy := RxWait;
end; { ReadAccReg }

procedure Setbatch(limit : longint);
begin
TxCommand('W', 'L', FALSE);
case protocol of
1 : begin
Tx2(limit div 256);
Tx2(limit mod 256);
end;
2 : begin
Tx2( limit div 16777216);
Tx2((limit div 65536) mod 256);
Tx2((limit div 256) mod 256);
Tx2( limit mod 256);
end;
end; { case protocol }
Tx2(checkSum);
dummy := RxWait;
end; { Setbatch }

ЧАСТЬ
5. ПРИЛОЖЕНИЯ  
ПРИЛОЖЕНИЕ
А. 

СООБЩЕНИЯ
ОБ ОШИБКАХ


 Предыдущая
страница     |     Следующая
страница



Сообщения об ошибках компиляции.

      Приведенные ниже
списки возможных сообщений об  ошибках  можно получить  
от  компилятора  при  разработке  программы. 
Когда  это возможно,  компилятор  будет  выводить 
на  дисплей  дополнительную диагностическую  информацию  в виде имени идентификатора или файла, например :

         Error 15 : File not found (Window.TPU)

         (Ошибка 15 : Файл не найден)

     Когда ошибка  
обнаружена,  Turbo  Pascal  (в  интегрированной
среде) автоматически загружает исходный файл и  помещает 
курсор  в позицию  ошибки.  Компилятор  командной 
строки  выводит на дисплей сообщение  об  ошибке 
и  ее  номер,  а  также  исходную  строку 
и использует  знак  вставки  (^)  для  указания
места,  где произошла ошибка.

     Тем не  менее 
заметим,  что  некоторые  ошибки обнаруживаются несколько
позже в исходном тексте. Например, несоответствие типов в операторе 
присваивания  не может быть обнаружено до тех пор,  пока все
выражение после «:=» не будет вычислено.  В таких случаях
ищите ошибку слева или выше от курсора.

      1. Out of memory
(не хватает памяти)

      Эта ошибка 
происходит,  когда  компилятору не хватает памяти. Есть несколько
возможных решений этой проблемы:

     — если  опция 
Compile/Destination  имеет значение Memory,  то измените ее
значение на Disk в интегрированной среде.

     — если  опция 
Options/Compiler /Link buffer в интегрированной среде имеет значение
Memory ,  то измените  ее  значение  на  Disk.
В компиляторе  командной  строки  для  редактирования
на диск нужно использовать опцию /L.

     — если  используются 
любые  утилиты,  находящиеся  в  памяти, например
SideKick и SuperKey, то их нужно удалить из памяти.

     — если  используется 
Turbo.EXE,  то постарайтесь использовать вместо Turbo.EXE TPC.EXE,
эта программа использует меньше памяти.

     Если ни один вариант
не помогает, то эта программа или модуль, возможно,  просто слишком
большие для компиляции в доступном объеме памяти.  В  этом 
случае  нужно  разбить  модуль на два или большее количество
меньших модулей.

     2. Identifier expected
(ожидается идентификатор)

     В этой  точке 
предполагался   идентификатор.   Возможно,   Вы пытаетесь повторно объявить зарезервированное слово.

     3. Unknown identifier
(неизвестный идентификатор)

     Этот идентификатор 
не  объявлен  или  невидим  внутри текущей сферы
действия.

      4. Duplicate identifier
(дублируемый идентификатор)

      Этот идентификатор
уже был использован в текущем блоке.  

     5. Syntax error (синтаксическая
ошибка)

      В исходном тексте
был найден неправильный символ. Возможно, Вы забыли кавычки вокруг строковой
константы.

     6. Error  in 
real  constant (ошибка в константе вещественного типа)

      Синтаксис констант
вещественного  типа  определен  в  главе  1
«Лексемы и константы».

      7. Error  in integer constant (ошибка в константе целого типа)

      Синтаксис констант 
целого типа определен в главе 1 «Лексемы и константы». 
Заметим,  что за целыми  числами  вещественного 
типа, лежащими   за  пределами  максимального 
целого  диапазона,  должна следовать десятичная точка и ноль;
например :

            12345678912.0

     8. String constant exceeds
line (строковая  константа  выходит за пределы строки)

      Наиболее вероятно,  
что   Вы  забыли  закрывающую  кавычку  в строковой константе.

     9. Too many nested files
(слишком много вложенных файлов)  

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

     10. Unexpected end of
file (неожиданный конец файла)

     Можно получить 
такое  сообщение  об  ошибке  из-за  следующих
причин:

     — исходный  файл 
заканчивается  перед  последним  end главной операторной
части.  Наиболее вероятно,  что  количество  операторов
begin и end несбалансировано.

     — включенный файл заканчивается
в середине  операторной части. Каждая  операторная  часть 
должна  полностью  содержаться  в одном файле.

     — не закрыт комментарий.

      11. Line too long
(строка слишком длинная)

      Максимальная длина
строки равна 126 символам.

      12. Type identifier
expected (ожидается тип идентификатора)

      Этот идентификатор
не обозначает тип, как это должно быть.

      13. Too many open
files (слишком много открытых файлов)

      Если произошла 
эта  ошибка,  то  или  в  файле CONFIG.SYS
нет записи FILES = xx,  или эта  запись  задает 
слишком  мало  файлов. Увеличьте это значение до некоторого
подходящего значения, например до 20.

      14. Invalid file
name (неправильное имя файла)

      Неправильное имя 
файла  или  задается   несуществующий   путь доступа.

      15. File not found
(файл не найден)

      Этот файл 
не  может  быть  найден в текущем справочнике или в любом
из поисковых справочников,  которые применяются к этому  типу
файла.

      16. Disk full
(диск полон)

      Удалите несколько
файлов или используйте новый диск.

      17. Invalid  
compiler   directive   (неправильная   директива компиляции)

      Буква директивы
компилятора  неизвестна,  один  из  параметров директивы  
компилятора   неизвестен  или  используется 
глобальная директива  компилятора,  когда  компиляция  
тела   программы   уже началась.

     18. Too many files (слишком
много файлов)

     В компиляцию  программы 
или  модуля  включено  слишком  много файлов. Попытайтесь
не  использовать  так  много  файлов,  например
посредством  объединения  включенных  файлов  или
укорачивания имен файлов.

     19. Undefined type in
pointer definition (неопределенный тип в определении указателя)

      На этот  тип ранее была ссылка в объявлении типа указателя, но он не был объявлен.

      20. Variable 
identifier  expected  (ожидается   идентификатор
переменной)

      Этот идентификатор 
не  обозначает переменную,  как это должно быть.

      21. Error in type
(ошибка в типе)

      Этот символ не
может начинать определение типа.

      22. Structure
too large (структура слишком большая)

      Максимальный допустимый
размер структурного типа  равен  65520 байтам.

     23. Set  base type
out of range (базовый тип множества выходит за допустимый диапазон)

      Базовый тип множества 
должен  быть  поддиапазоном  ,  который находится
внутри диапазона 0..255,  или перечислимым типом, который имеет
не более 256 возможных значений.

     24. File components may
not be files or  objects (компонентами файла не могут быть файлы
или объекты)

      В качестве файловых
компонент не могут быть файлы или объекты, а так же ни один из структурных
типов, которые включают тип объекта или файла.

      25. Invalid string
length (неправильная длина строки)

      Объявленная максимальная  длина строки должна быть в диапазоне 1..255.

      26. Type mismatch
(несоответствие типов)

      Это может быть
по следующим причинам:

      — несовместимые 
типы  переменной  и  выражения  в   операторе
присваивания

     — несовместимые типы
фактического и  формального  параметра  в вызове процедуры
или функции

     — тип  выражения, 
который  несовместим  с  типом  индекса   в индексации массива

     — несовместимые типы
операндов в выражении.

      27. Invalid subrange
base  type  (неправильный  поддиапазонный базовый тип)

      Все порядковые
типы являются допустимыми базовыми типами.

      28. Lower 
bound  greater  than  upper  bound  (нижняя
граница больше верхней границы)

      В объявлении 
поддиапазонного  типа  нижняя  граница   указана
больше верхней границы.

      29. Orginal type
expected (ожидается порядковый тип)

      В данном случае
вещественный, строковый, структурный тип и тип указателя недопустим.

     30. Integer constant
expected (ожидается целая константа)

     31. Constant expected
(ожидается константа)

     32. Integer or real constant 
expected  (ожидается  целая  или вещественная константа)

      33. Type identifier
expected (ожидается тип идентификатора)

      Этот идентификатор
не обозначает тип указателя, как это должно быть.

      34. Invalid function
result type (неправильный  тип результата функции)

      Правильными типами 
результатов  функций  являются все простые типы, строковые
типы и типы указателей.

      35. Label  identifier expected (ожидается идентификатор метки)

      Этот идентификатор
не обозначает метку, как это должно быть.

      36. Begin expected
(ожидается оператор begin)

      37. End expected
(ожидается оператор end)

      38. Integer expession
expected (ожидается целое выражение)

      Предыдущее выражение
должно быть целого типа.

      39. Ordinal  
expession    expected    (ожидается    выражение порядкового типа)

      Предыдущее выражение
должно быть порядкового типа.

      40. Boolean   
expression    expected   (ожидается   выражение булевского типа)

      41. Operand types
do not match  operator  (типы  операндов  не соответствуют
оператору)

      Оператор не  
может   быть   применен   к  
операндам    этого типа, например ‘A’ div ‘2’.

      42. Error in expression
(ошибка в выражении)

      Этот символ 
не  может  участвовать  в   выражении 
 указанным способом.   Возможно, Вы  забыли  
написать  оператор  между  двумя операндами.

     43. Illegal assignment(неправильное
присваивание)

     — Файлы   и  
нетипированные   переменные   не   могут    быть присваиваемыми значениями.

     — Идентификатору функции 
можно  присваивать  значения  только внутри операторной
части функции.

      44. Field identifier
expected (ожидается идентификатор поля)

      Этот идентификатор  не обозначает поле в предыдущей переменной типа запись.

      45. Object file
too large (объектный файл слишком большой)

      Turbo Pascal не
может подредактировать  .OBJ  файлы,  размером больше
64К.

      46. Undefined
external (неопределенный внешний элемент)

      Внешняя процедура
или функция не имеют соответствующего PUBLIC определения в объектном
файле.  Убедитесь,  что все объектные файлы заданы  
в   директивах   {$L  имя  файла} 
и  проверьте  написание идентификатора процедуры или функции
в .ASM файле.

     47. Invalid object file
record (неправильная запись объектного файла)

      .OBJ файл 
содержит неправильную объектную запись;  убедитесь, что файл фактически
является .OBJ файлом.

      48. Code Segment
too large (сегмент кода слишком большой)

      Максимальный размер
кода  программы  или  модуля  равен  65520
байт. Если  компилируется  программа,  то нужно перенести
несколько процедур или функций в модуль.  Если компилируется модуль, 
то  его нужно разбить на два или больше модулей.

      49. Data segment
too large (сегмент данных слишком большой)

      Максимальный размер 
сегмента  данных  программы  равен  65520 байт,
включая  данные,  объявленные  используемыми  модулями. 
Если необходимо больше  глобальных  данных,  то нужно
объявить структуры большого размера  как  указатели 
и  разместить  их  динамически  с использованием
процедуры New.

     50. Do expеcted (ожидается
ключевое слово)

      51. Invalid  
PUBLIC   definition   (неправильное  определение
PUBLIC)

      — Идентификатор
был сделан общедоступным с  помощью  директивы PUBLIC в  
языке   ассемблер,   но  он  не 
соответствует  external объявлению в программе или в модуле на
Паскале.

     — Две  или более
директивы PUBLIC в ассемблере определяют один и тот же идентификатор.

     — .OBJ файл определяет
PUBLIC символы , которые не находятся в сегменте CODE.

      52. Invalid EXTRN
definition (неправильное определение  EXTRN)

      — На идентификатор
была ссылка с  помощью  директивы  EXTRN  в ассемблере, 
но  он  не  был  объявлен ни в программе или модуле
на Паскале, ни в интерфейсной части используемых модулей.

     — Этот   
идентификатор   обозначает   absolute   (абсолютную) переменную.

     — Этот  идентификатор
обозначает inline процедуру или функцию.

      53. Too many EXTRN
definion (слишком много объявлений EXTRN)  

     Turbo Pascal  не
может обрабатывать .OBJ файлы с более чем 256 объявлениями EXTRN.

     54. OF expected (ожидается
ключевое слово OF)

     55. INTERFACE expected
(ожидается ключевое слово interface)

     56. Invalid relocatable
reference  (неправильная  переместимая ссылка)

      — .OBJ файл содержит
данные и переместимые ссылки в сегментах, отличных   
от    CODE.    Например,   
Вы    пытаетесь    объявить инициализированные
переменные в сегменте DATA.

     — .OBJ  файл 
содержит  ссылки размером в байт на переместимые символы . Эта
ошибка происходит, если используются операторы HIGH и LOW с перемеcтимыми
символами или, если есть ссылка на переместимые символы в директивах
DB.

     — Операнд  ссылается 
на  переместимый символ,  который не был определен ни в сегменте
CODE, ни в сегменте DATA.

     — Операнд  
ссылается   на  процедуру  или  функцию 
EXTRN  со смещением, например, CALL SortProc +8.

     57. THEN expected (ожидается
ключевое слово then)

     58. TO  or 
DOWNTO  expected  (ожидается ключевое слово to или downto)

      59. Undefined
forward (не определен элемент, указанный ранее)

      — Эта  процедура 
или  функция  была  объявлена в интерфейсной части модуля, 
но ее  определение  не  встречается  нигде 
в  части реализации.

     — Эта процедура или функция
была объявлена с  ключевым  словом forward, но ее определение
нигде не обнаружено.

      60. Too many procedure
(слишком много процедур)

      Turbo Pascal 
не  допускает  более  512 процедур или функций в модуле.
Если  компилируется   программа,   то  
нужно   переместить несколько процедур или функций в модуль.
Если компилируется модуль, то его нужно разбить на два или более модулей.

      61. Invalid typecast
(неправильное приведение типов)

      — Размеры ссылки
на переменную и тип назначения отличаются при приведении типа переменной.

     — Попытка приведения
типов в выражении,  где допустима  только ссылка на переменную.

      62. Division by
zero (деление на ноль)

      Попытка деления
на ноль.

      63. Invalid file
type (неправильный тип файла)

      Этот тип  файла не поддерживается процедурой обработки файлов, например, readln
c типированным файлом или Seek c текстовым файлом.

     64. Cannot Read or Write
variables of type (нельзя  читать или писать переменные этого типа)

      — Read  
или   Readln   могут   вводить  значения 
типа  Char, Integer, Real, и String.

     — Write или   
Writeln    могут    выводить   
значения    типа Char, Integer, Real, String и Boolean.

      65. Pointer 
variable  expected  (ожидается  переменная   типа указатель)

      Предыдущая переменная
должна иметь тип указатель.

      66. String variable
expected (ожидается строковая переменая)

      Предыдущая переменная
должна быть строкового типа.

      67. String  expession expected (ожидается выражение строкового типа)

      Предыдущее выражение
должно быть строкового типа.

      68. Circular unit
reference (циклическая ссылка на модуль)

      Не допускается,
чтобы два модуля использовали друг друга:

       unit U1;     unit U2;

      uses U2;     uses U1;

       …           …

      В этом примере
при выполнении MAKE  для  любого  модуля  будет
генерироваться ошибка 68.

     69. Unit name mismatch
(несоответствие имени модуля)

     Имя модуля,  найденного
в .TPU файле , не соответствует имени, заданному в предложении USES.

     70. Unit version mismatch
(несоответствие версии модуля)

     Один или  более 
модулей,  используемых  данным  модулем  были изменены  
после   компиляции   этого  модуля.  Для 
автоматической компиляции модулей,    которым   
нужна    перекомпиляция,    нужно использовать 
Compile/Make  или  Compile  /Build  в интегрированной
среде или опции / М или /В в компиляторе командной строки.

      71. Duplicate
unit name (дублированное имя модуля)

      В предложении
USES уже указано это имя модуля.

      72. Unit file
format error (ошибка в формате файла модуля )

      .TPU файл 
почему-то  неправильный;  убедитесь,что  этот  файл
фактически является .TPU файлом.

     73. Implementation   
expected   (ожидается   ключевое   слово
implementation)

      74. Constant and
case types do  not  match  (константа  и  тип
переключателя в операторе case не соответствуют друг другу)

      Тип константы  
оператора   case   несовместим   с  выражением переключателя в предложении case.

     75. Record  
variable   expected  (ожидается  переменная  типа record)

      Предыдущая переменная
должна иметь тип record.

      76. Constant 
out  of  range  (константа выходит за допустимый диапазон)

      — Попытка индексировать
массив с помощью  константы, выходящей за допустимый диапазон.

     — Попытка  присвоить 
переменной   константу,   выходящую   за допустимый диапазон.

     — Попытка  передать  
константу,   выходящую   за   допустимый
диапазон, в качестве параметра процедуры или функции.

      77. File variable
expected (ожидается переменная типа file)

      Предыдущая переменная
должна иметь тип file.

      78. Pointer 
expression  expected  (ожидается  выражение  типа
pointer).

      79. Integer or
real expression expected  (ожидается  выражение типа integer
или real).

      80. Label 
not  within  current  block  (метка  находится  вне текущего блока).

      Оператор goto
не может ссылаться  на  метку,  находящуюся  вне
текущего блока.

      81. Label already
defined (метка уже определена)

      Эта метка уже
помечает некоторый оператор.

      82. Undefined   
label    in    preceding   
statement    part (неопределенная метка в предыдущей
операторной части)

      Эта метка была
объявлена и на нее  есть  ссылка  в  предыдущей
операторной части, но эта метка нигде не определена.

     83. Invalid @ argument
(неправильный аргумент для @ )

     Правильными аргументами  
являются   ссылки  на  переменные  и идентификаторы
процедур или функций.

     84. UNIT expected (ожидается
ключевое слово UNIT)

     85. «;» expected
(ожидается ; )

     86. «:» expected
(ожидается : )

     87. «,» expected
(ожидается , )

     88. «(» expected
(ожидается ( )

     89. «)» expected
(ожидается ) )

     90. «=» expected
(ожидается = )

     91. «:=» expected
(ожидается := )

     92. «[» or
«(.» expected (ожидается [ или (. )

     93. «]» or
«.)» expected (ожидается ] или .) )

     94. «.» expected
(ожидается . )

     95. «..» expected
(ожидается .. )

     96. Too many variables
(слишком много переменных)

     — Общий  размер 
глобальных  переменных,  объявленных   внутри программы
или модуля, не может превышать 64К.

     — Общий  размер 
локальных  переменных,   объявленных   внутри
процедуры или функции, не может превышать 64К.

     97. Invalid  FOR 
control  variable  (неправильная управляющая переменная в
операторе for)

      Управляющая переменная
в операторе  for  должна  быть  простой переменной,
определенной в описании текущей подпрограммы.

     98. Integer  variable 
expected  (ожидается  переменная целого типа)

      Предыдущая переменная
должна быть целого типа.

      99. File and procedure
types are not allowed here  (файловый и процедурный тип недопустимы
здесь)

      Типированная константа  
не  может  быть  типа  файлового  или процедурного
типа.

     100. String length mismatch
(длина строки не соответствует)

     Длина строковой  
константы   не   соответствует    количеству компонент в символьном массиве.

      101. Invalid 
ordering  of fields (неправильное упорядочивание полей)

      Поля констант
типа  record  должны  быть  записаны  в  порядке объявления.

     102. String  
constant   expected  (ожидается  константа  типа string)

      103. Integer or
real variable expected  (ожидается  переменная типа Integer
или Real)

      Предыдущая переменная
должна быть типа Integer или Real.

     104. Ordinal   
variable    expected   (ожидается   переменная порядкового типа )

      Предыдущая переменная
должна быть порядкового типа .

      105. INLINE error
(ошибка в INLINE)

      Оператор < не допустим в сочетании с перемещаемыми ссылками на переменные, такие
ссылки всегда имеют размер, равный слову.

     106. Character  
expession   expected   (ожидается   выражение
символьного типа)

      Предыдущее выражение
должно быть типа Сhar.

      107. Too many
relocation  items  (слишком  много  перемещаемых
элементов)

      Размер перемещаемой 
части таблицы в .EXE файле превышает 64К, что является верхним пределом 
в  Turbo  Pascal.  Если  эта  ошибка возникает,
то  это  означает,  что данная программа слишком большая
для обработки редактором связей Turbo Pascal.  Вероятно, 
она будет слишком  большой  для  выполнения  в 
DOS  .  В  этом  случае нужно разделить программу
на «главную» часть,  которая выполняет две  или
более «подпрограмм», используя процедуру EXEC в модуле Dos.  

     112. Case  constant 
out  of  range  (константа оператора case выходит за
допустимый диапазон)

      Для операторов
case целого типа константы должны  быть  внутри диапазона
-32768…32767.

     113. Error in statement
(ошибка в операторе)

     С этого символа не может
начинаться оператор.

     114. Cannot  call 
an  interrupt  procedure  (нельзя  вызывать процедуру
прерывания)

      116. Must be in
8087 mode to compile this (для компиляции этой конструкции должен быть
режим 8087)

      Эта конструкция  
может  компилироваться  только  в  состоянии {$N+}.
Операция над 8087 типами Single,  Double,  Extended 
и  Comp недопустимы в состоянии {$N-}.

      117. Target address
not found (искомый адрес не найден)  

     Команда Compile/Search 
Find Error в интегрированной среде или опция /F в версии командной строки
не  может  определить  оператор, который соответствует
данному адресу.

      118. Include files
are not  allowed  here  (здесь  недопустимы включаемые
файлы)

      Каждая операторная
часть должна полностью содержаться в данном файле.

     120. NIL expected (ожидается
NIL)

     121. Invalid Qualifier
(неправильный квалификатор)

     — Попытка  индексировать 
переменную,  которая  отсутствует  в массиве.

     — Попытка  задать 
поля  в  переменной,  которая  не  является
записью.

     — Попытка  
получить   значение,    на   
которое    указывает переменная, не являющаяся указателем.

      122. Invalid  
variable   reference  (неправильная  ссылка  на переменную)

      Предыдущая конструкция  
следует    синтаксису    ссылки   
на переменную, но не обозначает размещение памяти.  Наиболее вероятно,
Вы вызвали функцию  указателя,  но  забыли  получить 
значение,  на которое указывает результат.

      123. Too many
symbols (слишком много символов)

      Программа или  
модуль  объявляет  более  64К  символов.  Если
программа или модуль компилируется с опцией {$D+}, то попробуйте ее
выключить —   заметим,   однако,   что  
это  будет  препятствовать нахождению  ошибок  выполнения  
в   этом   модуле.   В   противном
случае, можно   попробовать   переместить 
несколько  объявлений  в отдельный модуль.

      124. Statement 
part  too  large  (операторная  часть  слишком
большая)

      Turbo Pascal 
ограничивает размер операторной части около 24К. Если встречается эта
ошибка,  то  переместите  разделы  операторной части
в  одну  или более процедур.  В любом случае,  если
программа имеет операторную часть такого размера,  то имеет 
смысл  прояснить структуру этой программы.

      126. Files  
must   be   var  parameters  (файлы 
должны  быть переменными параметрами)

      Попытка объявить
значение параметра файлового  типа. Параметры файлового типа должны
быть переменными параметрами.

     127. Too many  conditional 
symbols  (слишком  много  условных символов)

      Для определения
дополнительных условных  символов недостаточно места.  Попытайтесь 
исключить  несколько  символов  или  укоротить несколько
символических имен.

     128. Misplaced    
conditional     directive      (неправильно расположенная условная директива)

      Компилятор встретил  
директиву   {$ELSE}   или  {$ENDIF}  без
соответствующей директивы {$IFDEF}, {$IFNDEF} или {$IFOPT}.

     129. ENDIF directive
missing (отсутствует директива ENDIF)  

     Исходный файл  заканчивается  
внутри   конструкции   условной компиляции. 
В  исходном  файле  должно  быть одинаковое количество
директив {$IFxxx} и {$ENDIF}.

     130. Error in initial
conditional defines (ошибка  в начальных условных определениях)

      Начальные условные 
символы,  заданные  в  Options/  Compiler/ Conditional
defines или в директиве /D,  неправильные. Turbo Pascal ожидает,
что  0  или  более иденитификаторов разделяются пробелами,
запятыми или точками с запятой.

      131. Header does
not match previous definition  (заголовок  не соответствует
предыдущему определению)

      — Заголовок 
процедуры  или  функции,  заданный в интерфейсной части
или в объявлении forward, не соответствует данному заголовку.

      132. Critical
dick error (критическая ошибка диска)

      Критическая ошибка   
произошла    во     время     компиляции (например, ошибка неготовности носителя)

      133. Cannot 
evaluate  this  expression  (нельзя вычислить это выражение)

      Попытка использовать
неподдерживаемое Turbo Pascal  свойство в константном выражении 
или  в  отладочном выражении.  Например,  Вы пытаетесь
использовать функцию Sin в объявлении константы,  или  Вы
пытаетесь вызвать функцию, определенную пользователем, в отладочном
выражении.  Описание допустимого  синтаксиса  конкретных 
выражений приведено  в  главе  1 «Лексемы и константы». 
Описание допустимого синтаксиса отладочных выражений приведено 
в  главе  5  Руководства пользователя «Отладка программ
на Turbo Pascal».

     134. Expession 
incorrectly  terminated (выражение завершается неправильно)

      Turbo Pascal ожидает
или оператор,  или конец выражения в этой точке, но ничего не находит.

      135. Invalid  
format   specifier  (неправильный  спецификатор
формата )

      Используется неправильный
спецификатор  формата  или  числовой аргумент  спецификатора
 формата  выходит  за  допустимый диапазон. Список 
правильных  спецификаторов  формата  приведен  в 
главе   5 Руководства пользователя «Отладка программ
на Turbo Pascal».

     136. Invalid  
indirect   reference   (неправильная  косвенная
ссылка)

      Оператор пытается 
сделать  неправильную   косвенную   ссылку.
Например,  используется  absolute  переменная, 
у  которой  базовая переменная неизвестна в  текущем 
модуле  или  используется  inline программа, которая 
ссылается на переменную,  неизвестную в текущем модуле.

     137. Structured variables
are not  allowed  here  (структурные переменные недопустимы
здесь)

      Попытка выполнить  не поддерживаемую Turbo Pascal операцию над структурной переменной.
Например, попытка умножить две записи.

     138. Cannot evaluate
without System unit (Нельзя вычислить без модуля System)

      Библиотека TURBO.TPL  
должна   содержать  модуль  System  для того,
чтобы отладчик мог вычислить выражение.

      139. Cannot access
this  symbol  (невозможен  доступ  к  этому
символу)

      Все множество  
символов  в  программе  доступно  сразу  после
компиляции программы.  Однако,  к  некоторым  символам, 
таким  как переменные,  невозможен  доступ  до 
тех  пор,  пока  программа  не начинает фактически
выполняться.

      140.Invalid floating-point
operation (Неправильная  операция с плавающей точкой)

      Операция над 
двумя  значениями  вещественного  типа привела к переполнению
или является делением на ноль.

     141. Cannot  compile 
overlay  to memory (нельзя компилировать оверлей в память)

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

      142. Procedure 
or  function  variable   expected   (ожидается
переменная типа procedure или function)

      В этом  контексте 
оператор  адреса  (@)  может использоваться только с
переменной процедуры или функции.

      143. Invalid procedure 
or  function  reference  (неправильная ссылка на процедуру
или функцию)

      — Если  процедура
или функция должны быть присвоены переменной типа procedure,  то
их нужно компилировать в состоянии {$F+}  и  их нельзя объявлять
с ключевыми словами inline или interrupt.

     — Вы пытаетесь вызвать
процедуру в выражении.

      144. Cannot overlay
this  unit  (нельзя  сделать  этот  модуль
оверлейным)

      Попытка сделать   
оверлейным    модуль,    который  
не   был откомпилирован в состоянии {$O+}.

     147 Object type expected
(Ожидается объектный тип.)

          Идентификатор не является объектным типом.

      148 Local object
types are not allowed.  (Локальный  объектный тип недопустим.)

      Объектный тип 
может  быть  определен  только  в самой внешней
сфере действия программы или модуля.  Определение  объектного  типа внутри процедур или функций недопустимо.

      149 VIRTUAL expected.
(VIRTUAL ожидается.)

      Пропущено ключевое
слово VIRTUAL.

      150 Method   
identifier   expected.   (Идентификатор   метода ожидается.)

      Идентификатор
не является методом.

      151 Virtual 
constructors  are   not   allowed.   (Виртуальные констракторы неразрешены.)

      Констрактор-метод
должен быть статическим.

      152 Constructor    
identifier     expected.    (Идентификатор
констрактора ожидается.)

      Идентификатор
не является констрактором.

      153 Destructor
identifier expected. (Идентификатор дестрактора ожидается.)

      Идентификатор
не является дестрактором.

      154 Fail 
only  allowed  withing constructors.  (Fail допустим
только внутри констракторов.)

      Стандартная процедура 
Fail  может  быть  использована  только    внутри констракторов.

      155. Invalid 
combination  of  opcode  and  operands (Неверная
комбинация кода операции и операндов)

      Код операции 
не   допускает   такой   комбинации   операндов. Возможные причины:

     — Слишком  много 
или  слишком  мало  операндов для этого кода операции;
например

     INC AX, BX или MOV AX

     — Правильное  число 
операндов,  но  их  тип  или  порядок  не соответствуют коду операции; например

     DEC 1,  MOV AX,CL  или MOV 1,AX

     156. Memory reference
expected (Ожидается ссылка на память)

     Этот операнд  не 
ссылка  на память,  которая ожидается здесь. Вероятно, Вы
забыли  поставить  []  вокруг  регистрового  операнда. Например

      MOV AX, BX+SI
вместо MOV AX, [BX+SI]

      157. Cannot  
add  or  subtract  relocatable  symbols  (Нельзя
складывать или вычитать переместимые символы)

      Над переместимыми
символами можно выполнять только  сложение и вычитание констант. 
Переменные,  процедуры,  функции и метки — это переместимые
символы.  Считая,  что Var — это переменная, а Const — это
константа, инструкции MOV AX, Const+Const и MOV AX, Var+Const — верны,
а MOV AX, Var+Var — нет.

      158. Invalid  
register   combination   (Неверная   комбинация
регистров)

      Правильные индексные
регистровые комбинации: [BX], [BP], [SI], [DI], [BX+SI],  [BX+DI],  
[BP+SI],   [BP+DI].   Другие   индексные
регистровые комбинации  (такие,  как [AX],  [BP+BX],  [SI+DX]) — не разрешены.

      Примечание: Локальные
переменные  (переменные,  объявленные  в процедурах и
функциях) всегда распределяются в стеке и доступ к ним производится
через регистр BP.  Ассемблер  автоматически  добавляет
[BP] в ссылках на такие переменные.  Так, что даже хотя конструкция
такая, как Local[BX] (где Local — локальная  переменная) появляется
правильной, это  не  так,  поскольку  результирующий
операнд будет: Local[BP+BX].

      159. 286/287 Instructions
are not enabled  (Инструкции 286/287 не разрешены.)

      Используйте директиву
компилятора {$G+},  чтобы разрешить коды операций 286/287, 
но помните,  что  результирующий  код  не  может выполняться на компьютерах с 8086 или 8088.

     160. Invalid symbol reference
(Неверная ссылка на символ)

      К этому 
символу  нельзя  обращаться  в ассемблерном операнде.
Возможные причины:

     — Вы   пытаетесь  
обратиться   в   ассемблерном   операнде  к стандартной процедуре, стандартной функции или специальным массивам
Mem, MemW, MemL, Pоrt, PortW.

     — Вы пытаетесь обратиться
в ассемблерном операнде  к константе типа строка, плававающая точка
или множество.

     — Вы пытаетесь обратиться
к специальному символу  @Result  вне функции.

     — Вы пытаетесь обратиться
в  ассемблерном  операнде  к  inline процедуре или
функции.

     — Вы пытаетесь сгенерировать
короткую JMP  инструкцию, которая переходит на что-либо отличное
от метки.

     161. Code generation
error (Ошибка генерации кода)

     Предыдущая операторная  
часть  содержит  инструкцию:  LOOPNE, LOOPE, LOOP или
JCXZ, которая не может достичь метки назначения.

     162. ASM expected (Ожидается
ASM)

[начало] [оглавление]
 

Ошибки времени выполнения.

      Некоторые ошибки
во  время  выполнения  программы  приводят 
к тому, что  программа  выводит  на  дисплей 
сообщение  об  ошибке и завершается:

     Run-time error 
nnn  at  xxxх:yyyy  (ошибка  выполнения nnn по адресу
xxxх:yyyy,    где    nnn-номер   
ошибки    выполнения,    а xxxx:yyyy —
адрес ошибки выполнения (сегмент и смещение))

     Ошибки выполнения разделены
на четыре категории:

          ошибки операционной системы DOS:1-99

          ошибки ввода/вывода:100-149

          критические ошибки :150-199

        
 фатальные ошибки:200-255.

[начало] [оглавление]
 

Ошибки операционной системы DOS.

      1. Invalid function
number (Неверный номер функции)

      Вы вызываете несуществующую
функцию DOS.

      2. File not found
(файл не найден)

      Сообщается процедурами
Reset,  Append,  Rename или Erase, если имя назначенное файловой
переменной не задает существующий файл.

      3. Path not fond
(путь не найден)

     — Сообщается  процедурами
Reset,  Rewrite,  Append,  Rename или Erase,  если
имя, назначенное файловой переменной,  неправильное или задает
несуществующий подсправочник.

      — Сообщается 
процедурами  Chdir,  Mkdir или Rmdir,  если путь доступа
неправильный или задает несуществующий подсправочник.

      4. Too many open
files (слишком много открытых файлов)

      Сообщается процедурами 
Reset,  Rewrite   или   Append,  
если программа  имеет  слишком  много  открытых 
файлов.  DOS никогда не разрешает более 15 открытых файлов на процесс.
Если встречается эта ошибка, когда открытых файлов меньше 15, 
то это может указывать на то,  что файл CONFIG.SYS не содержит
запись FILES =XX или,  что эта запись задает  слишком 
мало  файлов.  Увеличьте  это количество до некоторого
подходящего значения, например, до 20.  

     5. File access denied
(запрещен доступ к файлу)

      — Сообщается 
процедурами  Reset  или  Append,  если  FileMode
разрешает запись,  а имя,  назначенное файловой переменной,  задает справочник или файл, предназначенный только для считывания.

     — Сообщается процедурой
Rewrite,  если справочник заполнен или если имя,  присвоенное
файловой переменной,  задает справочник  или существующий
файл, предназначенный только для считывания.

     — Сообщается процедурой
Rename, если имя, присвоенное файловой переменной,   задает  
справочник   или   если   новое 
имя  задает существующий файл.

     — Сообщается процедурой
Erase,  если имя, присвоенное файловой переменной,  задает
справочник или файл, предназначенный только для считывания.

     — Сообщается  процедурой 
MkDir,  если  файл  с  таким  именем существует 
в  «родительском  «справочнике,  или 
если путь доступа задает устройство, или если нет места в «родительском» справочнике.

     — Сообщается процедурой
RmDir,  если справочник непустой; если путь доступа не задает справочник, 
или если  путь  доступа  задает корневой справочник.

     — Сообщается процедурой
Read или BlockRead  для  типированного или нетипированного
файла, если этот файл не открыт для чтения.

     — Сообщается процедурой
Write или BlockWrite для типированного или нетипированного файла, если
этот файл не открыт для записи.

      6. Invalid file
handle (неправильный обработчик файла)  

     Эта ошибка  сообщается, 
если  неправильный  обработчик  файла передается  
вызову   системы   DOS.   Это  
никогда   не    должно происходить; если 
это  случается,  то  это  указывает,что файловая
переменная каким-то образом запорчена.

      12. Invalid file 
access  code  (неправильный  код  доступа  к файлу)

      Сообщается процедурами  Reset или Append для типированного или нетипированного файла,если значение
FileMode неправильное.

     15. Invalid drive number
(неправильный номер устройства)

     Сообщается процедурой 
GetDir  или   ChangeDir,   если   номер устройства неправильный.

      16. Cannot 
remove  current  directory (нельзя удалять текущий справочник)

      17. Cannot rename
across drives (нельзя переименовывать файлы, находящиеся на различных
устройствах)

     Сообщается процедурой 
Rename,  если  оба  имени  находятся на различных
устройствах.

[начало] [оглавление]
 

Ошибки ввода/вывода.

      Эти ошибки 
вызывают завершение программы,  если этот оператор был откомпилирован
в состоянии {$I+}.  В состоянии {$I-}  программа продолжает
выполняться, а ошибка сообщается функцией IOResult.

     100. Disk read error
(ошибка чтения с диска)

     Сообщается процедурой  
Read  для  типированного  файла,  если делается
попытка чтения после конца файла.

      101. Disk write
error (ошибка записи на диск)

      Сообщается процедурами
Close,  Write, Writeln, Flush или Page, если диск становится полным.

      102. File not
assigned (файл не назначен)

      Сообщается процедурами 
Reset,  Rewrite,  Append,  Rename  или Erase, 
если файловой переменной не было присвоено  имя  с  помощью
вызова Assign.

      103. File not
open (файл не открыт)

      Сообщается процедурами 
Close,  Read,  Write,  Eof,  FileSize, Flush, BlockRead
или BlockWrite, если файл не открыт.

      104. File not
open for input (файл не открыт для ввода)

      Сообщается процедурами 
Read,  Readln,  Eof,  Eoln,   SeekEof, SeekEoln
для текстовых файлов, если файл не открыт для ввода.

      105. File not
open for output (файл не открыт для вывода)

      Сообщается процедурами 
Write  и Writeln для текстовых файлов, если файл не открыт для
вывода.

      106. Invalid numeric
format (неправильный числовой формат)

      Сообщается процедурами
Read и Readln, если  числовое значение, прочитанное  
из  текстового  файла  не  соответствует  правильному
числовому формату.

[начало] [оглавление]

Критические ошибки.

      150. Disk is write-protected
(защита диска от записи)

      151. Unknown unit
(неизвестное устройство)

      152. Drive not
ready (устройство не готово)

      153. Unknown command
(неизвестная команда)

      154. CRC 
error  in  data  (ошибка  циклического  контроля  по избыточности в данных)

      155. Bad drive
reguest structure length  (неправильный  запрос устройства
о длине структуры)

      156. Disk seek
error (ошибка поиска на диске)

      157. Unknown media
type (неизвестный тип носителя)

      158. Sector not
found (сектор не найден)

      159. Printer out
of paper (на принтере нет бумаги)

      160. Device write
fault (ошибка записи на устройство)

      161. Device read
fault (ошибка чтения с устройства)

      162. Hardware
failure (отказ аппаратного обеспечения)

      Более подробная 
информация  о критических ошибках приведена в Руководстве программиста
для DOS.

[начало] [оглавление]
 

Фатальные ошибки.

      Эти ошибки всегда
сразу же завершают программу.

      200. Division
by zero (деление на ноль)

      201. Ошибка  
выхода   за   допустимый  диапазон.  Эта  ошибка сообщается операторами, откомпилированными в состоянии {$R+},
когда возникает одна из следующих ситуаций:

     — Индексное  
выражение   квалификатора   массива  выходит  за допустимый диапазон.

     — Была   сделана  
попытка   присвоить   переменной  значение,
выходящее за допустимый диапазон.

     — Была  сделана 
попытка  передать  процедуре  или  функции  в качестве параметра значение, выходящее за допустимый диапазон.

      202. Stack overflow
error (ошибка переполнения стека)

      Эта ошибка сообщается 
при  входе  в  процедуру  или  функцию, откомпилированную
в  состоянии {$S+},  когда в стеке нет достаточно места для
размещения локальных  переменных  подпрограмм.  Увеличьте
размер стека с помощью директивы компилятора $M.

      Эта ошибка может
возникать так же из-за бесконечной рекурсии.

      203. Heap overflow
error (ошибка переполнения кучи)

      Эта ошибка 
сообщается  процедурами  New или GetMem ,  когда в куче
нет достаточно места для размещения блока  требуемого размера.
Более  подробное  описание  монитора  кучи 
приведено  в  главе  16 «Память».

      204. Invalid 
pointer  operation  (неправильная   операция   с указателем)

      Эта ошибка 
сообщается  процедурами Dispose или FreeMem,  если указатель
равен nil или указывает на позицию за пределами кучи или, если свободный
список не может быть расширен из-за того, что список свободных блоков
полон,  или HeapPtr находится  слишком  близко  от нижней границы списка свободных блоков.

      205. Floating
point overflow (переполнение с плавающей точкой)

      Операция с 
плавающей  точкой обрабатывает слишком большое для Turbo Pascal
или сопроцессора число.

      206. Floating
point underflow (потеря значности при операции с плавающей точкой)

      Операция с 
плавающей точкой приводит к потере значности.  Эта ошибка сообщается,
если только  используется  числовой  сопроцессор 8087
с  контрольным словом,  которое не маскирует потерю значности
По умолчанию,  потеря  значности  вызывает  
возвращение   нулевого результата.

      207. Invalid floating
point operation (неправильная операция с плавающей точкой)

      — Вещественное
значение,  передаваемое  Trunc  или  Round, 
не может  быть преобразовано в целое внутри диапазона для типа
LongInt (-2147483648 до 214783647)

     — Аргумент,  передаваемый
функции Sgrt, является отрицательным числом.

     — Аргумент,  
передаваемый   функции   Ln,   равен  
нулю  или отрицательный.

     — Произошло  
переполнение   стека  сопроцессора  8087. 
Более подробное описание корректного программирования  при 
использовании сопроцессора 8087 приведено в главе 14 «Использование
8087»

      208. Overley  
manager  not  installed  (монитор  оверлеев  не инсталирован)

      Программа вызывает 
оверлейную  процедуру  или   функцию,   но
монитор оверлеев не инсталирован.

     Наиболее вероятно, что
Вы не вызвали OvrInit или вызов OvrInit был  неудачным.  Заметим, 
что  если  код инициализации находится в любом  из 
оверлейных  модулей, то  нужно  создать   дополнителный
неоверлейный  модуль,  который вызывает OvrInit и использовать
этот модуль перед любым из оверлейных модулей.  Полное описание
монитора оверлеев приведено в главе 13 «Модуль Overlay» .

      209. Overlay file
read error (ошибка чтения оверлейного файла)

      Произошла ошибка  
чтения,   когда  монитор  оверлеев  пытался
прочитать оверлей из оверлейного файла.

      210. Object not
initialized. (Объект не инициализирован)

      Когда включена
проверка диапазона,  Вы  вызываете  виртуальный метод
объекта до инициализации объекта через вызов констрактора.

      211. Call to abstract
method. (Вызов абстрактного метода)

      Эта ошибка 
генерируется процедурой Abstract в модуле Objects; она указывает, 
что Ваша программа пытается  выполнить  абстрактный витруальный
метод.  Когда  объектный  тип  содержить один или
более абстрактных методов,  он называется  абстрактным 
объектным  типом. Будет ошибкой  создавать  экземпляры 
объектов  абстрактного типа — абстрактные типы  существуют 
только  для  того,  чтобы  Вы   могли
наследовать от них и перекрывать абстрактные методы.

      Например, метод  
Compare   типа  TSortedCollection  в  модуле
Objects абстрактный,  указывает   на   то,  
что   для   реализации отсортированного набора 
Вы  должны создать объектный тип,  который наследуется от
TSortedCollection и перекрывает метод Compare.

      212. Stream registration
error. (Ошибка регистрации потока)

      Эта ошибка 
генерируется  процедурой  RegisterType  в   модуле Objects, указывая, что возникла одна из ошибок:

      — Запись регистрации
потока не размещается в сегменте данных.

      — Поле ObjType
записи регистрации потока = 0.

      — Тип уже зарегистрирован.

      — Существует другой
тип с тем же значением ObjType.

      213. Collection
index out of range.  (Индекс набора выходит за пределы)

      Индекс, переданный
в метод из TCollection, выходит за пределы.

      214. Collection
overflow error. (Ошибка переполнения набора)

      Эта ошибка выдается
TCollection при попытке  добавить элемент, когда набор не может
быть расширен.

[начало]
[оглавление]    


Предыдущая
страница     |     Следующая
страница


Step 1 – Solve Pascal Error 200 Division By 0

Is Pascal Error 200 Division By 0 appearing? Would you like to safely and quickly eliminate Error 200 Division which additionally can lead to a blue screen of death?

When you manually edit your Windows Registry trying to take away the invalid runtime error 200 pascal keys you’re taking a authentic chance. Unless you’ve got been adequately trained and experienced you’re in danger of disabling your computer system from working at all. You could bring about irreversible injury to your whole operating system. As very little as just 1 misplaced comma can preserve your Pc from even booting every one of the way by!

Troubleshooting error 200 division by zero Windows XP, Vista, 7, 8 & 10

Simply because this chance is so higher, we hugely suggest that you make use of a trusted registry cleaner plan like CCleaner (Microsoft Gold Partner Licensed). This system will scan and then fix any Pascal Error 200 Division By 0 complications.

Registry cleaners automate the entire procedure of finding invalid registry entries and missing file references (including the Error error) likewise as any broken hyperlinks inside of your registry.

Issue with error 200 http

Backups are made immediately prior to each and every scan providing you with the choice of undoing any changes with just one click. This protects you against doable damaging your pc. Another advantage to these registry cleaners is that repaired registry errors will strengthen the speed and performance of one’s procedure drastically.

  • http://www.pcmicro.com/elebbs/faq/rte200.html
  • http://mtech.dk/thomsen/program/pasbug.php
  • http://www.programmersheaven.com/discussion/17674/error-200-division-by-zero
  • http://www.vogons.org/viewtopic.php?t=93

Cautionary Note: Yet again, for those who are not an state-of-the-art consumer it’s very encouraged that you simply refrain from editing your Windows Registry manually. If you make even the smallest error within the Registry Editor it can result in you some serious issues that may even call for a brand new set up of Windows. Not all difficulties attributable to incorrect Registry Editor use are solvable.

Fixed: runtime error 200 dos

Symptoms of Pascal Error 200 Division By 0
“Pascal Error 200 Division By 0” appears and crashes the energetic method window.
Your Personal computer routinely crashes with Pascal Error 200 Division By 0 when running the exact same system.
“Pascal Error 200 Division By 0” is shown.
Windows operates sluggishly and responds little by little to mouse or keyboard input.
Your computer periodically “freezes” for the number of seconds in a time.

Will cause of Pascal Error 200 Division By 0

Corrupt obtain or incomplete set up of Windows Operating System software program.

Corruption in Windows registry from a new Windows Operating System-related application adjust (install or uninstall).

Virus or malware infection which has corrupted Windows method documents or Windows Operating System-related application data files.

Another method maliciously or mistakenly deleted Windows Operating System-related files.

Mistakes this sort of as “Pascal Error 200 Division By 0” can be brought about by several different elements, so it really is important that you troubleshoot every of the achievable brings about to forestall it from recurring.

Simply click the beginning button.
Variety “command” inside the lookup box… Will not hit ENTER nonetheless!
Although keeping CTRL-Shift in your keyboard, hit ENTER.
You’re going to be prompted that has a authorization dialog box.
Click on Of course.
A black box will open having a blinking cursor.
Variety “regedit” and hit ENTER.
Within the Registry Editor, choose the runtime error 200 pascal connected key (eg. Windows Operating System) you wish to back again up.
Within the File menu, choose Export.
Inside the Preserve In list, pick out the folder in which you wish to save the Windows Operating System backup key.
Inside the File Title box, sort a reputation for the backup file, these types of as “Windows Operating System Backup”.
From the Export Vary box, ensure that “Selected branch” is selected.
Click on Help you save.
The file is then saved by using a .reg file extension.
You now use a backup within your error 200 division by zero related registry entry.

Solution to your tp7p5fix problem

There are actually some manual registry editing measures that can not be talked about in this article due to the high chance involved for your laptop or computer method. If you want to understand more then check out the links below.

Additional Measures:

One. Conduct a Thorough Malware Scan

There’s a probability the Error Pascal 0 200 Division By error is relevant to some variety of walware infection. These infections are malicious and ready to corrupt or damage and possibly even delete your ActiveX Control Error files. Also, it’s attainable that your Pascal Error 200 Division By 0 is actually connected to some element of that malicious plan itself.

2. Clean patchcrt Disk Cleanup

The a lot more you employ your computer the extra it accumulates junk files. This comes from surfing, downloading packages, and any sort of usual computer system use. When you don’t clean the junk out occasionally and keep your program clean, it could turn into clogged and respond slowly. That is when you can encounter an By error because of possible conflicts or from overloading your hard drive.

Once you clean up these types of files using Disk Cleanup it could not just remedy Pascal Error 200 Division By 0, but could also create a dramatic change in the computer’s efficiency.

Tip: While ‘Disk Cleanup’ is definitely an excellent built-in tool, it even now will not completely clean up Error 200 discovered on your PC. There are numerous programs like Chrome, Firefox, Microsoft Office and more, that cannot be cleaned with ‘Disk Cleanup’.

Since the Disk Cleanup on Windows has its shortcomings it is extremely encouraged that you use a specialized sort of challenging drive cleanup and privacy safety application like CCleaner. This system can clean up your full pc. If you run this plan after each day (it could be set up to run instantly) you are able to be assured that your Pc is generally clean, often operating speedy, and always absolutely free of any 200 error associated with your temporary files.

How Disk Cleanup can help error 300

1. Click your ‘Start’ Button.
2. Style ‘Command’ into your search box. (no ‘enter’ yet)
3. When holding down in your ‘CTRL-SHIFT’ important go ahead and hit ‘Enter’.
4. You will see a ‘permission dialogue’ box.
5. Click ‘Yes’
6. You will see a black box open up plus a blinking cursor.
7. Variety in ‘cleanmgr’. Hit ‘Enter’.
8. Now Disk Cleanup will start calculating the amount of occupied disk space you will be able to reclaim.
9. Now a ‘Disk Cleanup dialogue box’ seems. There will be a series of checkboxes for you personally to pick. Generally it will likely be the ‘Temporary Files’ that consider up the vast majority of your disk area.
10. Verify the boxes that you want cleaned. Click ‘OK’.

How to repair error 200 eso

3. System Restore can also be a worthwhile device if you ever get stuck and just desire to get back to a time when your computer system was working ideal. It will work without affecting your pics, paperwork, or other crucial information. You can discover this option with your User interface.

Error 200

Manufacturer

Device

Operating System


Pascal Error 200 Division By 0


4 out of
5

based on
49 ratings.

 

 ┌─────────────────┐
 │ Деление на нуль │
 └─────────────────┘

Программа попыталась делить на нуль в «/», «mod» или «div» операциях.

Эта ошибка часто возникает при инициализации модуля CRT. На данный момент существуют разные способы исправления проблемы.

Нужно подчеркнуть, что самый распространённый патч всего лишь предотвращает возникновение ошибки 200. Процедура Delay после такого патча работает неправильно (длительность меньше указанной). В School Pak всё, как положено: никаких ошибок 200, а длительность Delay совпадает с заданной. Причём, программы, скомпилированные в School Pak, работают нормально не только в DOSBox, но и в NTVDM.

Скачать пропатченный CRT.TPU

CRT.TPU обычно находится внутри библиотеки TURBO.TPL. При большом желании вы можете извлекать и помещать обратно модули .TPU с помощью утилиты TPUMOVER. Мы, однако, решили не плодить путаницу и предоставляем для скачивания только TURBO.TPL целиком.

TURBO.TPL (SYSTEM.TPU + CRT.TPU + DOS.TPU + OVERLAY.TPU + PRINTER.TPU) (отдельно от School Pak)

Понравилась статья? Поделить с друзьями:
  • Паскаль ошибка 113 ошибка
  • Паскаль код ошибки 106
  • Паскаль абс ошибка
  • Паронимы это грамматическая или речевая ошибка
  • Паскаль x a 3 sqrt9 какая ошибка допущена