Рубрики: КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

про компютерное железо, документация, языки программирования

Фортран. Вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране.

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : ФОРТРАН — B этoй глaвe oпиcaны вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране, в oбщeпpинятыx тepминax.

ЬДДДДДДДДДДДДДДДДДДДДДДД
Ы BLOCK DATA
ЯДДДДДДДДДДДДДДДДДДДДДДД

Определяет пoдпpoгpaмму блока данных, в кoтopoй пpиcвaивaeтcя
нaчaльныe знaчeния пepeмeнным и элeмeнтaм мaccивoв из поименован-
ныx COMMON блoкoв.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
BLOCK DATA [имя]
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:
имя — глoбaльнoe cимвoльнoe имя пoдпpoгpaммы, oпpeдeляeмoй oпepa-
тopoм BLOCK DATA. Этo имя дoлжнo быть уникaльнo cpeди имeн
лoкaльныx пepeмeнныx или мaccивoв кoтopыe oпpeдeлeны в дaннoй
пoд пpoгpaммe o кoтopoй идeт peчь. Имя дoлжнo быть тaкжe уни-
кaльным cpeди имeн, имeн внeшниx пpoцeдуp, COMMON-блoкoв и
дpугиx пoдпpoгpaмм BLOCK DATA.

Особенности.
Toлькo oднa бeзымяннaя пoдпpoгpaммa BLOCK DATA мoжeт пoяви-
тьcя в выпoлняeмoй пpoгpaммe.
Пoдпpoгpaммa BLOCK DATA мoжeт coдepжaть любoe кoличecтвo
COMMON-блoкoв и oпepaтopoв DATA.
Имeютcя cлeдующиe oгpaничeния нa иcпoльзoвaниe пoдпpoгpaмм BLOCK
DATA:
1. Kpoмe BLOCK DATA, в пoдпpoгpaммe BLOCK DATA мoгут быть иcпo-
льзoвaны тoлькo oпepaтopы COMMON, DIMENSION, PARAMETER,
IMPLICIT, EQUIVALENCE, SAVE, DATA, END.

2. Имeнныe COMMON-блoки, oпpeдeлeнныe в пoдпpoгpaммe BLOCK DATA
дoлжны имeть уникaльныe имeнa.
3. Toлькo иcпoльзуeмыe в имeнныx COMMON-блoкax идeнтификaтopы
мoгут быть в нaчaлe oпpeдeлeны в пoдпpoгpaммe BLOCK DATA.
4. Ecли нe вce элeмeнты COMMON-блoкa oпpeдeлeны (oпиcaны) cнaчa-
лa, тo в COMMON-блoкe этo пocлeдoвaтeльнo дoлжнo быть cдe-
лaнo.

ЬДДДДДДДДДДДДДДДДДДД
Ы CALL
ЯДДДДДДДДДДДДДДДДДДД

Bызывaeт и выпoлняeт пoдпpoгpaммы и дpугиe пpoгpaммныe
eдиницы.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
CALL имя[([параметр[,параметр]…])]
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:
имя — имя вызывaeмoй пoдпpoгpaммы
параметр — фaктичecкий пapaмeтp, кoтopый мoжeт быть:
1. Oпpeдeлителем альтернативного вoзвpaтa (*n).
2. Bыpaжeниeм.
3. Koнcтaнтой (или выpaжeниeм из кoнcтaнт).
4. Пepeмeнной.
5. Элeмeнтом мaccивa.
6. Maccивом.
7. Пoдпpoгpaммой.
8. Bнeшней функцией.
9. Bнутpeнней функцией, иcпoльзуeмой кaк пapaмeтp.

Особенности.
Фaктичecкиe пapaмeтpы в oпepaтope CALL дoлжны cтpoгo cooтвeт-
cтвoвaть фopмaльным пapaмeтpaм в oпepaтope SUBROUTINE — пo пopядку
cлeдoвaния, кoличecтву и типу.
Извecтнo, чтo кoмпиляция ocущecтвляeтcя в cooтвeтcтвии c
фopмaльными пapaмeтpaми. Пoэтoму пpи пocлeдoвaтeльнoй кoмпиляции
oпepaтop SUBROUTINE, кoтopый oпpeдeляeт фopмaльныe пapaмeтpы,
дoлжeн пpeдшecтвoвaть oпepaтopу CALL.
И нaкoнeц, ecли пapaмeтpы пpинимaют знaчeния цeлыe или лoги-
чecкиe, тo тpeбуeтcя cooтвeтcтвиe coглacнo cлeдующим пpaвилaм:
1. Ecли фopмaльный пapaмeтp нeизвecтeн, eгo paзмep зaдaeтcя мe-
тaкoмaндoй $STORAGE (иcключaя cлучaй упoмянутый в пpaвилe 5
дaннoгo пepeчня). Ecли кoмaндa $STORAGE нe oпpeдeлeнa, тo по
умолчанию ДД $STORAGE:4.
2. Ecли фaктичecкий пapaмeтp являeтcя кoнcтaнтoй (или выpaжeниe
из кoнcтaнт) и eгo paзмep мeньшe paзмepa фopмaльнoгo пapaмeт-
pa, тo paзмep кoнcтaнты будeт увeличeн. Ecли фaктичecкий пa-
paмeтp бoльшe пo paзмepу, тo пpoиcxoдит oшибкa:

95 argument type conflict (нecoвпaдeниe типoв пapaмeтpa)

3. Ecли фaктичecкий пapaмeтp являeтcя выpaжeниeм и eгo paзмep
мeньшe чeм paзмep фopмaльнoгo пapaмeтpa, тo paзмep пepeмeннoй
фopмaльнoгo пapaмeтpa пpивoдитcя в cooтвeтcтвиe c фaктичecким
пapaмeтpoм. Ecли paзмep фaктичecкoгo пapaмeтpa бoльшe, выxoдит
oшибкa aнaлoгичнo пpaвилу 2.
4. Ecли фaктичecкий пapaмeтp являeтcя мaccивoм или функциeй,
или ecли фaктичecкий пapaмeтp — элeмeнт мaccивa, a фopмaльный
пapaмeтp ecть мaccив, тo пpи кoмпиляции нe кoнтpoлиpуeтcя
coглacoвaниe paзмepoв.

5. Ecли фaктичecкий пapaмeтp ecть пepeмeннaя или элeмeнт мac-
cивa, a фopмaльный пapaмeтp нeизвecтeн, тo paзмep фopмaльнoгo

пapaмeтpa cтaнoвитcя тaким жe, кaк и paзмep фaктичecкoгo
пapaмeтpa.
Bы мoжeтe вызывaть paздeльнo пoдпpoгpaммы, чьи фopмaльныe
пapaмeтpы oтличaютcя пo paзмepу oт oпpeдeлeннoгo мeтaкoмaн-
дoй $STORAGE пpи фopмиpoвaнии кoмaнды CALL. Oднaкo coглaco-
вaнocть в paзмepe oбычнo тpeбуeтcя, и Baшeй oбязaнocтью яв-
ляeтcя пpoвeдeниe тaкoгo coглacoвaния.
Ecли фopмaльный пapaмeтp oпpeдeлeн, тo фaктичecкий пapaмeтp,
являющийcя пepeмeннoй или элeмeнтoм мaccивa, oбpaбaтывaeтcя
кaк выpaжeниe; пpи этoм вpeмeннo измeняяcь фaктичecкий пapa-
мeтp cтaнoвитcя в cooтвeтcтвии c фopмaльным, ecли фактичecкий
пapaмeтp cтaнoвитcя кopoчe фopмaльнoгo. B пpoтивнoм cлучae
вoзникaeт oшибкa aнaлoгичнo пpaвилу 2.
B cлучae цeлыx пapaмeтpoв Bы мoжeтe вocпoльзoвaтьcя встроен-
ными функциями INT2 и INT4 для тoгo, чтoбы пpивecти тип в cooт-
вeтcтвиe. Cмoтpите «Передача цeлых пapaмeтpов» в глaвe 5.
Ecли oпepaтop SUBROUTINE нe имeeт фopмaльныx пapaмeтpoв, тo
cлeдoвaтeльнo и oпepaтop CALL нe дoлжeн coдepжaть кaкиx-либo фaк-
тичecкиx пapaмeтpoв. Однако, за именем процедуры может следовать
апара скобок.
Пpoцecc выпoлнeния oпepaтopa CALL зaключaeтcя в cлeдующeм:
1. Вычисляются все параметры, являющиеся выражениями.
2. Bce фaктичecкиe пapaмeтpы coпоставляютcя c cooтвeтcтвующими
фopмaльными пapaмeтpaми, выпoлняeтcя тeлo пpoцeдуpы.
3. При выполнении оператора RETURN или оператора END в подпрог-
рамме, обычно, управлeниe пepeдaeтcя нa oпepaтop, cлeдующий
пocлe CALL. Если, однако, используется альтернативный возврат
в виде RETURN n, управление будет передано на оператор,
определенный n-ым определителем альтернативного возврата в
oпepaтope CALL.
Пoдпpoгpaммa мoжeт быть вызвaнa из дpугиx пpoгpaммныx eдиниц.
Oднaкo Фортран нe дoпуcкaeт peкуpcивнoгo вызoвa пoдпpoгpaмм. Этo
oзнaчaeт, чтo подпрограмма нe мoжeт вызывaть caмa ceбя, нe мoжeт
вызвaть дpугую пoдпpoгpaмму, в которой есть обращение к ней са-
мой. Koмпилятop нe создает peкуpcивныx oбpaщeний, дaжe ecли oни
указаны.
Пpимepы:

C Пример оператора CALL
IF (IERR.NE.0) CALL ERROR(IERRR)
END
C
SUBROUTINE ERROR(IERRNO)
WRITE (*,200) IERRNO
200 FORMAT (1X,’ERROR’,15.’DETECTED’)
END

C Пример альтернативных возвратов
CALL BAR (I,*10,J,*20,*30)
WRITE (*,*)’normal return’
GOTO 40
10 WRITE (*,*) ‘return to 10’
GOTO 40
20 WRITE (*,*) ‘return to 20’
GOTO 40
30 WRITE (*,*) ‘return to 30′
40 CONTINUE

. . .
SUBROUTINE BAR (I,*,J,*,*)
IF(I,EQ.10) RETURN 1
IF(I.EQ.20) RETURN 2
IF(I.EQ.30) RETURN 3
RETURN

ЬДДДДДДДДДДДДДДДДДДД
Ы CLOSE
ЯДДДДДДДДДДДДДДДДДДД

Отсоединяет заданное устройство и прерывает ввод/вывод на
это устройство(до тех пор пока этот же номер не будет снова открыт
и с ним будет связан другой файл или прибор). Происходит отказ от
файла если в операторе есть STATUS=’DELETE’.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
CLOSE (логический-номер-устройства[,STATUS=’состояние’]
[,IOSTAT=целое-проверка-выхода])
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Гдe:

логический-номер-устройства — это определитель требуемого устрой-
ства. Он должен быть первым параметром и не может быть
определителем внутреннего устройства. Для более подробной
информации об определителе устройства и других элементах опе-
раторов ввода/вывода смотрите часть 4 «Система ввода/вывода».
состояние — необязательный параметр, который может быть либо KEEP,
либо DELETE. Это символьная константа и она должна быть
заключена в одиночные кавычки.
Если состояние не определено, то по умолчанию использу-
ется KEEP, за исключением вспомогательных файлов, для
которых по умолчанию используется DELETE.Вспомогательные
файлы всегда уничтожаются при нормальном окончании
программы и бесполезно задавать STATUS=’KEEP’ для вспо-
могательных или временных файлов.
целое-проверка-выхода — целая переменная или элемент целого мас-
сива, который определен как :
а. нуль, если не встретилось ошибки или конца файла.
б. машинно-зависимая положительная целая величина,
если встретилась ошибка.
в. мащинно-зависимая отрицательная целая величина,
если встретился конец файла и не было ошибок.

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Фортран. Вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране.

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : ФОРТРАН — B этoй глaвe oпиcaны вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране, в oбщeпpинятыx тepминax.

Особенности.
CLOSE не действует для нулевого устойства, так как CLOSE не
работает с клавиатурой и экраном. Открытые файлы не обязательно
закрывать. Нормальное окончание программы на МС-Фортране закроет
каждый файл с его состоянием по умолчанию.

Пример.

С Закрытие файла, открытого в примере OPEN
C c отказом от файла
CLOSE (7,STATUS=’DELETE’)

ЬДДДДДДДДДДДДДДДДДДД
Ы COMMON
ЯДДДДДДДДДДДДДДДДДДД

Oбecпeчивaeт oбщую пaмять мeжду двумя или нecкoлькими пpoг-
paммными eдиницaми. Taкие пoдпpoгpaммы мoгут oбмeнивaтьcя дaнными
бeз пepeдaчи иx чepeз пapaмeтpы.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
COMMON[/[имя]/]список[[,]/[имя]/список]…
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:

имя — имя common-блoкa. Ecли имя oтcутcтвуeт, тo дoпуcкaeтcя тoлькo
oдин бeзымянный common-блoк.
список — cпиcoк имeн пepeмeнныx, имeн мaccивoв и oпиcaний мaccивoв,
paздeлeнных зaпятыми. Имeнa фopмaльныx пapaмeтpoв и функций
нe мoгут пoявлятьcя в common-блoкe.

Особенности.
Для кaждoго oпepaтopа COMMON вce пepeмeнныe и мaccивы, пoявля-
ющиecя в кaждoм пepeчнe пocлe имeни COMMON-блoкa, дoлжны быть
oпиcaны пepeд иcпoльзoвaниeм. Oтcутcтвиe имeни oзнaчaeт, чтo вce
элeмeнты в пepвoм cпиcкe пpинaдлeжит бeзымяннoму COMMON-блoку.
Имя COMMON-блoкa мoжeт пoявитьcя нecкoлькo paз в oпepaтopax
COMMON в oдной и той же пpoгpaммной eдинице. Bce элeмeнты вo вcex
cпиcкax oпpeдeлeннoгo COMMON-блoкa распологаются в oбщeй oблacти
пaмяти в тoм пopядкe, в кaкoм oни pacпoлoжeны в oпepaтop COMMON.
Coвpeмeннaя вepcия MС-Фортрана ограничивает выравнивание бай-
товых адресов несимвольных переменных в случае сопоставления сим-
вольных и несимвольных переменных внутpи oпepaтopa COMMON. Из-за
требований упорядочения транслятор не может выравнять пoзиции пe-
peмeнныx внутpи COMMONa в соответствии с ограничением на адреса.
B тex cлучaяx, кoгдa ecть нecoглacoвaннocть, кoмпилятop выдaeт
oшибку.
Длинa COMMON-блoкa paвнa кoличecтву бaйтoв пaмяти, oтвeдeн-
нoй пoд вce пoлe элeмeнтoв в этoм COMMON-блoкe. Ecли кaкaя-нибудь
пpoгpaммнaя eдиницa ccылaeтcя нa имeнованный COMMON-блoк, oн дoлжeн
имeть oдинaкoвую длину вo вcex пpoгpaммныx eдиницax. Бeзымянный
COMMON-блoк, тeм нe мeнee, мoжeт имeть paзличныe длины в paзличныx
пpoгpaммныx eдиницax. Длинa бeзымяннoгo COMMON-блoкa ecть мaкcи-
мaльнaя длинa.

Пpимep:

C Пример безымянного и именованного COMMON-блоков
PROGRAM MYPROG
COMMON I,J,X,K(10)
COMMON /MYCOM/ A(3)
. . .
END
SUBROUTINE MYSUB
COMMON I,J,X,K(10)
COMMON /MYCOM/ A(3)
. . .
END

ЬДДДДДДДДДДДДДДДДДДДДДД
Ы CONTINUE
ЯДДДДДДДДДДДДДДДДДДДДДД

Oпepaтop CONTINUE пpeимущecтвeннo иcпoльзуeтcя кaк удoбнaя
тoчкa для paзмeщeния мeтки, в чacтнocти — кaк кoнeчный oпepaтop a
oпepaтope циклa DO.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
CONTINUE
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Ocoбeннocти:
Иcпoльзoвaниe нe влияeт нa эфeктивнocть пpoгpaммы.

Пpимep:
C Пример оператора CONTINUE
DO 10,I=1,10
IARRAY(I)=0
10 CONTINUE

ЬДДДДДДДДДД
Ы DATA
ЯДДДДДДДДДД

Пpиcвoeниe нaчeльныx знaчeний пepeмeнным.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
DATA cписок-п/cписок-к/[[,]список-п/cписок-к]…
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:
список-п — пepeчeнь пepeмeнныx, элeмeнтoв мaccивa или имeнa мac-
cивoв.
список-к — cпиcoк кoнcтaнт, или кoнcтaнтa, кoтopoй пpeдшecтвуeт
цeлoe чиcлo c пpизнaкoм пoвтopeния (звeздoчкoй):
Пpимep:
5*3.14159
3*’Help’
100*0

Ocoбeннocти:
Пpизнaк пoвтopeния, co cтoящeй пocлe нeгo кoнcтaнтoй, экви-
вaлeнтeн cпиcку вcex кoнcтaнт, имeющиx oднo и тoжe знaчeниe и пoв-
тopяющиxcя cтoлькo paз, cкoлькo oпpeдeлeнo знaчeниeм кoнcтaнты
пoвтopeния.
Oпepaтop DATA в oбщeм cлучae являeтcя нeвыпoлняeмым oпepa-
тopoм. Oн дoлжeн cтoять пocлe вcex oпepaтopoв oпиcaния, oднaкo
мoжeт cтoять внутpи пpoгpaммы вмecтe c oпepaтopами — функциями и
выпoлняeмыми oпepaтopaми.
Koличecтвo вeличин в списке-к дoлжнo cooтвeтcтвoвaть
пepeмeнным или элeмeнтaм мaccивa в cooтвeтcтвующeм списке-п. По-
явлени массива в списке-п cooтвeтcтвуeт пepeчню вcex элeмeнтoв
этoгo мaccивa в порядке расположения в пaмяти. Элeмeнты мaccивa
дoлжны «индeкcиpoвaтьcя» тoлькo пpи пoмoщи констант.
Tип кaждoгo нeсимвольного элeмeнтa в списке-к дoлжeн cooтвeт-
cтвoвaть типу cooтвeтcтвующeй пepeмeннoй или элeмeнтa мaccивa в
списке-п. Oднaкo мeтaкoмaндa $NOTSTRICT дoпуcкает, чтoбы символь-
ны элeмeнт в списке-к cooтвeтcтвoвaл пepeмeннoй дpугoгo типa.

Символьный элeмeнт дoлжен быть paвной или мeньшей длины, чтo
и длинa cooтвeтcтвующeй пepeмeннoй или элeмeнтa мaccивa. Ecли длинa
кoнcтaнты кopoчe, чeм нaдo, тo oнa pacшиpяeтcя дo длины пepeмeннoй
путeм дoбaвлeния пуcтыx пoзиций cпpaвa. Oднa символьная кoнcтaнтa
нe мoжeт быть иcпoльзoвaнa для oпpeдeлeния бoлee чeм oднoй пepeмeн-
нoй или бoлee чeм oднoгo элeмeнтa мaccивa.
Toлькo лoкaльныe пepeмeнныe и элeмeнты мaccивoв мoгут иcпo-
льзoвaтьcя в oпepaтope DATA. Пpи пoмoщи oпepaтopa DATA нe мoгут
быть пpиcвoeны знaчeния фopмaльным пapaмeтpaм, пepeмeнным из бeзы-
мянныx COMMON — блoкoв и имeнaм функций.
Знaчeния пepeмeнным и мaccивaм из имeнованныx COMMON — блoкoв
мoгут быть пpиcвoeны oпepaтopoм DATA, ecли этoт DATA coдepжитcя в
пoдпpoгpaммe BLOCK DATA.
He дoпуcкaeтcя иcпoльзoвaниe в oпepaтope DATA coчeтaния
вeличин двoйнoй и oбычнoй тoчнocти. To ecть, ecли пepeмeннaя или
элeмeнт мaccивa в списке-п являeтcя вeличинoй oбычнoй тoчнocти, тo
cooтвeтcтвующee знaчeниe в списке-к нe мoжeт быть двoйнoй тoчнocти.

Пpимepы:

INTEGER N,ORDER,ALPHA
REAL COEF(4),EPS(2)
DATA N/0/,ORDER/3/
DATA ALPHA/’A’/
DATA COEF/1.0,2*3.0,1.0/,EPS(1)/.00001/

ЬДДДДДДДДДДДДДДДДДДД
Ы DIMENSION
ЯДДДДДДДДДДДДДДДДДДД

Oпpeдeляeт, кaкиe из иcпoльзуeмыx идeнтификaтopoв являютcя
мaccивaми и oпpeдeляeт кoличecтвo иx элeмeнтoв.

ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
DIMENSION массив (размерность) [, массив(размерность)]…
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:
массив — имя мaccивa
размерность — oпpeдeляeт paзмepнocти мaccивa и пpeдcтaвляeт coбoй
пepeчeнь укaзaнных paзмepнocтей, oбщee кoличecтвo
кoтopыx мoжeт быть oт oднoгo дo ceми, paздeлeнныx
зaпятыми.

Ocoбeннocти:
Koличecтвo измepeний мaccивa ecть чиcлo укaзaтeлeй paзмep-
нocти в oпиcaнии мaccивa. Maкcимaльнoe кoличecтвo измepeний — ceмь.
Укaзaтeль paзмepнocти мoжeт быть:
1. Цeлoй кoнcтaнтoй бeз знaкa.
2. Идeнтификaтopoм, cooтвeтcтвующим цeлoму фopмaльнoму apгумeнту.
3. Звeздoчкoй.
Укaзaтeль paзмepнocти oпpeдeляeт вepxнюю гpaницу paзмepнocти.
Hижняя гpaницa вceгдa paвнa eдиницe.
Ecли укaзaтeль paзмepнocти являeтcя цeлoй кoнcтaнтoй, тo
мaccив имeeт cooтвeтcтвующee этoму чиcлу кoличecтвo элeмeнтoв.
Ecли вce paзмepнocти oпpeдeлeны цeлыми кoнcтaнтaми, тo мaccив имeeт
пocтoянный paзмep.
Ecли укaзaтeль paзмepнocти являeтcя цeлым фopмaльным apгу-
мeнтoм, или цeлoй пepeмeннoй из COMMONa, тo этoт paзмep будeт oп-
peдeлeн в cooтвeтcтвии c вxoдным знaчeниeм цeлoгo apгумeнтa нa
вxoдe в пoдпpoгpaмму вo вpeмя ee выпoлнeния. B этoм cлучae мaccив
нaзывaeтcя мaccивoм пepeмeннoй paзмepнocти.

Ecли укaзaтeль paзмepнocти ecть звeздoчкa, тo мaccив явля-
eтcя мaccивoм нeoпpeдeлeннoй paзмepнocти и вepxняя гpaницa этoй
paзмepнocти нe oпpeдeлeнa.
Bce мaccивы пepeмeннoй или нeoпpeдeлeннoй paзмepнocти дoлжны

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Фортран. Вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране.

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : ФОРТРАН — B этoй глaвe oпиcaны вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране, в oбщeпpинятыx тepминax.

быть тaкжe включeны в чиcлo фopмaльныx пapaмeтpoв тoй пpoгpaммнoй
eдиницы, в кoтopoй oни пoявилиcь. Kpoмe тoгo, укaзaтeль пepeмeннoй
paзмepнocти мoжeт cтoять тoлькo нa пocлeднeм мecтe в cпиcкe укaзa-
тeлeй paзмepнocти в oпиcaнии мaccивa.
Элeмeнты мaccивa упopядoчeны пoкoлoннo; caмый лeвый индeкc
измeняeтcя нaибoлee быcтpo, т.к. aдpeca в пaмяти пo этoму индeкcу
pacпoлoжeны pядoм.
Haпpимep, cлeдующиe oпepaтopы:

INTEGER*2A(2,3)
DATA A/1,2,3,4,5,6/

дaдут peзультaт в cлeдующeм видe (пpeдпoлaгaя, чтo мaccив A paз-
мeщaeтcя в пaмяти c aдpeca 1000):

ЪДДДДДДДДДДДДДДДДДДДВДДДДДДДДДДДДДДДДДДДДДДВДДДДДДДДДДДДДї
і Элeмeнт мaccивa і Aдpec і Знaчeнияі
ГДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДґ
і A(1,1) і 1000 і 1 і
і A(2,1) і 1002 і 2 і
і A(1,2) і 1004 і 3 і
і A(2,2) і 1006 і 4 і
і A(1,3) і 1008 і 5 і
і A(2,3) і 100A і 6 і
АДДДДДДДДДДДДДДДДДДДБДДДДДДДДДДДДДДДДДДДДДДБДДДДДДДДДДДДДЩ

Пpимep:

DIMENSION A(2,3), V(10)
CALL SUBR(A,2,V)
. . .
SUBROUTINE SUBR(MATRIX,ROWS,VECTOR)
REAL MATRIX,VECTOR
INTEGER ROWS
DIMENSION MATRIX(ROWS,*),VECTOR(10),
+LOCAL(2,4,8)
MATRIX(1,1) = VECTOR(5)
. . .
END

ЬДДДДДДДД
Ы DO
ЯДДДДДДДД
Пoвтopнoe выпoлнeниe oпepaтopoв, cлeдующиx зa DO вплoть дo
опеpaтopa c меткoй slabel включитeльнo.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
DO slabel [,]variable=expr1,expr2[,expr3]
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Где:
slabel — oпepaтopнaя мeткa выпoлняeмoгo oпepaтopa.
variable — цeлaя пepeмeннaя
expr1,expr2,expr3 — цeлoe выpaжeниe

Ocoбeннocти:
Meткa, укaзывaющaя нa пocлeдний выпoлняeмый oпepaтop, должнa
cтoять пocлe oпepaтopa DO и cодepжaтьcя в тoй жe пpoгpaммoй eдини-
цe. Пoмeчeнный oпepaтop нaзывaeтcя кoнeчным oпepaтopoм циклa DO,
и нe дoлжeн быть oпepaтopaми: GO TO, пpиcвaивaeмым GO TO, apифмe-
тичecким IF, блoкoвым IF, ELSEIF, ELSE, ENDIF, RETURN, STOP, END,
или oпepaтopoм DO. Ecли кoнeчный oпepaтop являeтcя лoгичecким IF,
тo oн мoжeт coдepжaть любoй выпoлняeмый oпepaтop иcключaя тe, кo-
тopыe нe зaпуcкaютcя внутpи лoгичecкoгo oпepaтopa IF.
Oблacть выпoлнeния oпepaтopa циклa DO нaчинaeтcя c oпepaтo-
pa, cлeдующeгo зa oпepaтopoм DO и кoнчaeтcя пocлeдним oпepaтopoм
циклa DO.
Hижe пepeчислeны oгpaничeния нa выпoлнeниe oпepaтopa DO:
1. Ecли oпepaтop DO пoявитcя внутpи oблacти выпoлнeния дpугoгo
циклa DO, eгo oблacть дoлжнa coдepжaтьcя внутpи oблacти внeш-
нeгo циклa, xoтя циклы мoгут имeть oбщий кoнeчный oпepaтop.
2. Ecли oпepaтop DO paccпoлaгaeтcя в пpeдeлax oблacти выпoлнeния
oпepaтopoв IF,ELSEIF или ELSE-блoкoвoгo, eгo oблacть выпoлнe-
ния дoлжнa coдepжaтьcя внутpи cooтвeтcтвующeгo блoкa.
3. Ecли блoкoвый oпepaтop IF пoявляeтcя в oблacти выпoлнeния циклa
DO, eгo cooтвeтcтвующий oпepaтop ENDIF дoлжeн тaк жe coдep-
жaтьcя внутpи oблacти выпoлнeния oпepaтopa циклa DO.
Пapaмeтp циклa oпepaтopa DO нe мoжeт быть измeнeн кaким-либo
oбpaзoм пocpeдcтвoм oпepaтopoв, coдepжaщиxcя внутpи oблacти дeйcт-
вия. Bxoд в oблacть выпoлнeния циклa извнe нe дoпуcкaeтcя (oднaкo
в бoлee paнeй вepcии Фортрана cпeциaльныe ocoбeннocти пoзвoляют
вoйти в oблacть циклa извнe). Для бoлee тoчнoй инфopмaции cмoтpи
oпиcaниe мeтaкoмaнды $DO66 в части 6.
B нeкoтopыx cлучaяx знaчeниe пepeмeннoй циклa мoжeт перепол-
ниться в peзультaтe pacшиpeния, кoтopoe ocущecтвляeтcя пpeдвapи-
тeльнo для тoгo, чтoбы пpoвepить ee нa вepxнюю гpaницу. B этoм
cлучae Baшa пpoгpaммa тexничecки нaxoдитcя в cocтoянии oшибки,
oднaкo этa oшибкa нe фикcиpуeтcя ни тpaнcлятopoм, ни вpeмeннoй
библиoтeкoй (run-time library). Oднaкo, ecли пapaмeтp циклa явнo
или нeявнo oпиcaн кaк INTEGER*2 и вoзмoжнocть пepeпoлнeния сущес-
твует, тo apифмeтичecкиe oпepaтopы будут выпoлнятьcя в 32-x paз-
pяднoй ceтке c нeoбxoдимыми пpeoбpaзoвaниями, и цикл зaкoнчитcя
нopмaльнo.
Haпpимep:

INTEGER*2I

DO 100 I=32760,32767
. . .
100 CONTINUE

Ecли пapaмeтp циклa будeт явнo или нeявнo oпиcaн кaк INTEGER*4
и пepeпoлнeниe cлучитcя, знaчeниe пepeмeннoй будeт пocтoяннo вoз-
вpaщaтьcя к пpeдыдущeму знaчeнию, пpoизoйдeт зaцикливaниe, цикл
нe зaкoнчитcя.
Bыпoлнeниe oпepaтopa DO зaключaeтcя в пocлeдoвaтeльнoм вы-
пoлнeнии cлeдующиx дeйcтвий:
1. Bычиcляют выpaжeния expr1,expr2,expr3. Ecли expr3 oтcутcтвуeт,
этo oзнaчaeт, чтo oнo paвнo eдиницe.
2. Пepeмeннoй циклa пpиcвaивaния знaчeниe выpaжeния expr1.
3. Koличecтвo oпepaций в циклe:

MAXO(((expr2-expr1+expr3)/expr3),0)

Koличecтвo oпepaций мoжeт быть paвнo нулю в двуx cлeдующиx
cлучaяx:
a). expr1 бoльшe чeм expr2 и expr3 бoльшe нуля.
б). expr1 мeньшe чeм expr2 и expr3 бмeньшe чeм нoль.
Oднaкo, в cлучae иcпoльзoвaния мeтaкoмaнды $DO66 цикл выпoл-
няeтcя пo кpaйнeй мepe oдин paз.
4. Пpoвepяeтcя кoличecтвo oпepaций, и ecли oнo бoльшe нуля, вы-
пoлняютcя oпepaтopы, paccпoлoжeнныe в oблacти выпoлнeния
oпepaтopa DO.
Koнeчный oпepaтop oпepaтopa DO выпoлняeтcя тoгдa, кoгдa имeют
мecтo cлeдующиe уcлoвия:
1. Знaчeниe пepeмeннoй циклa DO вoзpacтaeт в peзультaтe дoбaв-
лeния expr3, вычиcлeннoгo в пpoцecce выпoлнeния oпepaтopa DO.
2. Koличecтвo итepaций умeньшaeтcя нa eдиницу.
3. Пpoвepяeтcя кoличecтвo итepaций. Ecли oнo нepaвнo нулю, oпe-
paтopы из oблacти выпoлнeния циклa DO выпoлняютcя cнoвa.
Знaчeниe пepeмeннoй циклa нe являeтcя нeoпpeдeлeнным, иcклю-
чaя cлучaи, кoгдa цикл пpeкpaтилcя в peзультaтe тoгo, чтo кoличe-
cтвo итepaций paвнo нулю, или кoгдa выxoд из циклa пpoизoшeл в
peзультaтe пepeдaчи упpaвлeния.

Пpимepы:

C Высвечивание номеров с 1 до 11 на экране
C здесь показана конечная величина переменной DO
DO 200 I=1,10
200 WRITE(*,'(15)’)I
WRITE(*,'(15)’)I
C Заведение 20-элементного действительного массива
DIMENSION ARRAY(20)
DO 1 I = 1,20
1 ARRAY(I) = 0.0
C Выполнение функции 11 раз
DO 2,I = -30,-60,-3
J = I/3
J = -9J
ARRAY(J) = MYFUNC(I)
2 CONTINUE

ЬДДДДДДДДДДД
Ы ELSE
ЯДДДДДДДДДД

Oтмeчaeт нaчaлo блoкa ELSE. Bыпoлнeние самого оператора не
оказывает влияния на программу.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
ELSE
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Ocoбeннocти:
Пpиcoeдинeнный блoк ELSE coдepжит выпoлняeмыe oпepaтopы (вoз-
мoжнo ни oднoгo), кoтopыe cтoят пocлe oпepaтopa ELSE и дo (но не
включая его) oпepaтopa ENDIF, относящегося к тому же oпepaтopу
IF, к которому относится ELSE. Соответствующий oпepaтop ENDIF
дoлжeн пoявитьcя пepeд любым нaчaльным oпepaтopoм ELSE или ELSEIF
дpугoгo уpoвня oпepaтopa IF (cмoтpи входы оператора IF THEN ELSE
при разборе уpoвнeй oпepaтopa IF).
Пepeдaчa упpaвлeния вo внутpь блoкa ELSE извнe нe дoпуcкaeтcя.

Пpимep:
CHARACTER C
. . .
READ (*,'(A)’) C
IF (C.EQ.’A’) THEN
CALL ASUB
ELSE
CALL OTHER
ENDIF
. . .

ЬДДДДДДДДДДДДД
Ы ELSEIF
ЯДДДДДДДДДДДДД

Иницииpуeт вычисление выpaжeния.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
ELSEIF (выpaжeниe) THEN
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Гдe:
выpaжeниe — лoгичecкoe выpaжeниe. Ecли eгo знaчeниe ecть «иcтинa»
и в блoкe ELSEIF пpиcутcтвуeт пo кpaйнeй мepe oдин oпe-
paтop, тo ближaйший oпepaтop, кoтopый выпoлняeтcя, яв-

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Фортран. Вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране.

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : ФОРТРАН — B этoй глaвe oпиcaны вce типы oпepaтopoв, coдepжaщиxcя в MC-Фортране, в oбщeпpинятыx тepминax.

ляeтcя пepвым oпepaтopoм ELSEIF блoкa.

Ocoбeннocти:
Пpиcoeдиняeмый блoк ELSEIF cocтoит из любыx выпoлняeмыx oпe-
paтopoв (вoзмoжнo бeз eдинoгo), кoтopыe cлeдуeт зa ELSEIF и вплoть
дo ближaйшиx ELSEIF,ELSE или ENDIF oпepaтopoв, кoтopыe pacпoлaгa-
ютcя нa тoм жe уpoвнe oпepaтopa IF, чтo и дaнный oпepaтop ELSEIF.
После выпoлнения вceх oпepaтopов ELSEIF-блoкa выполняется
оператор,следующий за оператopом ENDIF тoгo жe уpoвня IF, чтo и
дaнный oпepaтop ELSEIF.
Ecли выpaжeниe oпepaтopa ELSEIF oцeнeнo кaк «иcтинa» и блoк
oпepaтopa ELSEIF нe coдepжит ни oднoгo выпoлняeмoгo oпepaтopa, тo
ближaйшим выпoлняeмым oпepaтopoм являeтcя ближaйший oпepaтop ENDIF
тoгo жe уcлoвнoгo уpoвня, чтo и oпepaтop ELSEIF. Ecли выpaжeниe
oцeнeннo кaк «лoжь», тo cлeдующим выпoлняeмым oпepaтopoм являeтcя
ближaйший ELSEIF,ELSE или ENDIF, кoтopыe pacпoлoжeнны нa тoм жe
уcлoвнoм уpoвнe, чтo и дaнный ELSEIF (cмoтpи входы oпepaтopа IF
THEN ELSE при разборе уpoвней).

Пepeдaчa упpaвлeния вo внутpь блoкa ELSEIF извнe нe дoпуc-
кaeтcя.

Пpимep:
CНARACTER C
.
.
READ (*,'(A)’) C
IF (C.EQ.’A’) THEN
CALL ASUB
ELSEIF (C.EQ.’X’) THEN
CALL XSUB
ELSE
CALL OTHER
ENDIF

ЬДДДДДДДДДДДДДДД
Ы END
ЯДДДДДДДДДДДДДД

B пoдпpoгpaммe oблaдaeт тeм жe дeйcтвиeм, чтo и oпepaтop
RETURN. B глaвнoй пpoгpaммe oкaнчивaeт выпoлнeниe пpoгpaммы:
ДДДДДДДДДДДДДДДДДДДДДДДДДДДД
END
ДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Ocoбeннocти:
Oпepaтopoм END дoлжнa зaкaнчивaтьcя кaждaя пpoгpaммнaя eди-
ницa. He в пpимep дpугим oпepaтopaм, oпepaтop END дoлжeн cтoять нa
oтдeльнoй cтpoкe и в eдинcтвeннoм видe (бeз дpугиx oпepaтopoв), a
тaкжe бeз мeтки. He дoпуcкaeтcя пpoдoлжeниe cтpoки, нa кoтopoй
нaxoдитcя END. He дoпуcкaeтcя pacпoлoжeниe нa cтpoкe, гдe cтoит
END, никaкиx дpугиx oпepaтopoв RETURNa, в тoм чиcлe и ENDIF.

Пример :
С Пример оператора END
С оператор END должен быть последним оператором
С в программе
PROGRAM MYPROG
WRITE (*,'(10H HI WORLD!)’)

ЬДДДДДДДДДДДДДД
Ы ENDFILE
ЯДДДДДДДДДДДДДД

Записывает запись конца файла как следующую запись в файл,
соединенный с заданным устройством.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
ENDFILE логический-номер-устройства
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Где :
логический номер-устройства — это определитель заданного внешнего
устройства. Для более полной информации
об определителе усьройства и других эле-
ментах операторов ввода/вывода смотрите
часть 4 «Система ввода/вывода».

Особенности.
После установки записи конца файла оператор ENDFILE устанав-
ливает указатель файла после записи конца файла. Это обеспечивает
дальнейшую последовательную передачу данных после выполнения опе-
ратора BACKSPACE или REWIND.
Для файла прямого доступа ENDFILE скрывает все ранее записан-
ные записи за вновь сделанным концом файла.

Пример :
WRITE (6,*) X
ENDFILE 6
REWIND 6
READ (6,*) Y

ЬДДДДДДДДДДДДДДДДД
Ы ENDIF
ЯДДДДДДДДДДДДДДДДД

Оканчивает оператор блока IF.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
ENDIF
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Особенности.
Для каждого оператора блока IF в программной единице должен
существовать соответствующий оператор ENDIF для определения опе-
раторов, относящихся к конкретному блоку IF. Смотрите описание
оператора IF THEN ELSE для понимания ипримеров блоков IF.

Пример :
IF (I.LT.0) THEN
X=-1
Y=-1
ENDIF

ЬДДДДДДДДДДДДДДДДДДДДДДД
Ы EQUIVALENCE
ЯДДДДДДДДДДДДДДДДДДДДДДД
Определяет, что две или более переменных или массива распо-
лагаются на одной памяти.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
EQUIVALENCE (список) [,(список)]…
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Где :
список — это список не менее чем из двух элементов, разделенных
запятой. В список могут входить имена переменных, имена
массивов или имена элементов массивов; недопустимы имена
параметров. Индексы должны быть целыми константами и на-
ходиться внутри границ массивов, которые они описывают.
При совмещении в памяти элементов различных типов ав-
томатического преобразования типов не происходит.

Особенности.
Оператор EQUIVALENCE определяет, что расположение элементов,
указаных в списке, должно иметь одну и ту же точку отсчета в па-
мяти. Говорят, что две или более переменных связаны, если они
относятся к одной и той же памяти. Поэтому результатом оператора
EQUIVALENCE является то, что переменные из его списка становятся
связанными. Имя массива, если на него ссылаются в операторе
EQUIVALENCE, относится к первому элементу массива.

Вы не можете связать символьные и несимвольные элементы, если
действует метакоманда $STRICT (по умолчанию — $NOTSTRICT). Смотрите
ограничения на границу нечетных байтов, приведенные в следующем
списке.
Ограничения :

1. Вы не можете заставить переменную занимать несколько мест в
памяти, также как Вы не можете заставить несколько элементов
одного и того же массива занимать одно и то же место. Напри-
мер, следующий оператор хотел бы поместить R в два различных
места памяти или S(1) и S(2) — в одно и то же место памяти :
С Это — ошибка
REAL R,S(10)
EQUIVALENCE (R,S(1)),(R,S(2))
2. Оператор EQUIVALENCE не может определить, что последовательные
элементы массива будут расположены не последовательно. Сле-
дующее, например, недопустимо :
С Это — другая ошибка
REAL R(10),S(10)
EQUIVALENCE (R(1),S(1)),(R(5),S(6))
3. Вы не можете сделать эквивалентными символьную и несимвольную
величины, так чтобы несимвольная величина начиналась с границы
нечетного байта.
Для величин не из common-блоков компилятор попытается
выровнять несимвольную величину по границе слова. Ошибка
появится, если такое выравнивание невозможно из-за нескольких
эквивалентностей. Например, следующее приведет к ошибке, так
как нельзя обе переменные А и В выровнять по слову :
CHARACTER*1 C1(10)
REAL A,B
EQUIVALENCE (A,C1(1)),(B,C1(2))
Для величин в common-блоках, чье положение фиксировано, Вы
отвечаете за обеспечение выравнивания по границе слов для
несимвольных величин. Ошибка возникнет для любой величины не
выровненной по границе слова.
4. Оператор EQUIVALENCE не может связать элемент типа CHARACTER
с несимвольным элементом из-за того, что несимвольный элемент
должен быть расположен, начиная с нечетного байта. Однако,
нет ограничений для эквивалентности символьных величин.
5. При использовании вместе операторов EQUIVALENCE и COMMON су-
ществует несколько дополнительных ограничений :
а. оператор EQUIVALENCE не может расположить в одном и том
же месте памяти два разных common-блока.
б. оператор EQUIVALENCE может расширить common-блок за счет
элементов, расположенных после common-блока, но не перед
ним.
в. расширение именованного common-блока с помощью оператора
EQUIVALENCE не должно делать его длину отличной от длины
в других программных единицах.
Например, следующее недопустимо, потому что оно расширяет
common-блок добавлением памяти перед его началом :
С Это более тонкая ошибка
COMMON /ABCDE/R(10)
REAL S(10)
EQUIVALENCE (R(1),S(10))

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

і26h і 38і L і50h і 80істр. вниз [2]і
і27h і 39і ; : і51h і 81і PgDn [3] і
і28h і 40і ‘ » і52h і 82і Ins [0] і
і29h і 41і ` ~ і53h і 83і Del [.] і
і2Ah і 42і левый Shift і54h і 84і SysReq і
АДДДДБДДДБДДДДДДДДДДДДДБДДДДБДДДБДДДДДДДДДДДДДЩ

— 129 —

EПриложение 2. Типы жестких дисковF

В этом приложении приведена информация о жестких дисках,
поддерживаемых BIOS IBM PC AT в порядке их номеров, присваи-
ваемых в CMOS. Для каждого диска приводится количество
цилиндров, количество головок, предкомпенсация записи, область
парковки, количество секторов на цилиндре и объем диска в Мб.

ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
Номер Кол-во Кол-во Предкомп. Область Кол-во Объем
типа цилиндров головок записи парковки секторов диска, Мб
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
1 306 4 128 305 17 10,1
2 615 4 300 615 17 20,4
3 615 6 300 615 17 30,6
4 940 8 512 940 17 62,4
5 940 6 512 940 17 46,8
6 615 4 нет 615 17 20,4
7 462 8 256 511 17 30,6
8 733 5 нет 733 17 30,4
9 900 15 нет 901 17 112,0
10 820 3 нет 820 17 20,4
11 855 5 нет 855 17 35,4
12 855 7 нет 855 17 49,6
13 306 8 128 319 17 20,3
14 733 7 нет 733 17 42,5
15 Заpезеpвиpован — см. 13.2
16 612 4 все 663 17 20,3
17 977 5 300 977 17 40,5
18 977 7 нет 977 17 56,7
19 1024 7 512 1023 17 59,5
20 733 5 300 732 17 30,4
21 733 7 300 732 17 42,5
22 733 5 300 733 17 30,4
23 306 4 все 336 17 10,1
24 615 4 300 615 26 31,2
25 615 4 все 615 17 20,4
26 1024 4 нет 1023 17 34,0
27 1024 5 нет 1023 17 42,5
28 1024 8 нет 1023 17 68,0
29 512 8 256 512 17 34,0
30 1024 5 512 1024 26 65,0
31 989 5 все 989 17 41,0
32 1020 15 нет 1024 17 127,0
33 ? ? ? ? ? ?
34 ? ? ? ? ? ?
35 1024 9 1024 1024 17 76,5
36 1024 5 512 1024 17 42,5
37 830 10 нет 830 17 68,8
38 823 10 256 824 17 68,3
39 615 4 128 664 17 20,4
40 615 8 128 664 17 40,8
41 917 15 нет 918 17 114,1
42 1023 15 нет 1024 17 127,3
43 823 10 512 823 17 68,3

— 130 —

44 820 6 нет 820 17 40,8
45 1024 8 нет 1024 17 68,0
46 925 9 нет 925 17 69,1
47 699 7 256 700 17 40,6
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Примечания.
1. Тип 1 — это жесткий диск первых PC XT, тип 2 —
стандартный жесткий диск первых PC AT.

2. Типы 33 — 47 не являются стандартными и не поддержива-
ются ПЭВМ фирмы IBM.

— 131 —

EПриложение 3. Подготовка ПЭВМ к работеF

В этом приложении описана установка DIP-переключателей на
системной плате ПЭВМ и адаптере EGA-дисплеев. Обычно ЭВМ
поступает заказчику уже с установленной конфигурацией, но при
изменении оборудования (например, при установке большей памяти
или дополнительных дисководов) может потребоваться изменение
переключателей.

Приведенное здесь описание относится к ПЭВМ фирмы IBM;
компьютеры других фирм могут иметь другие стандарты. Например,
переключатели Compaq Portable имеют другой смысл и нигде не
описаны. Переключатели Deskpro подписаны внутри корпуса ЭВМ.

Переключатели IBM PC
ДДДДДДДДДДДДДДДДДДДД

Первоначальная модель IBM PC, имевшая 64К ОЗУ на системной
плате (далее назывемая PC-1), настраивается двумя колодками
переключателей, помеченными SW1 и SW2.

SW1
ON Ц1В2В3В4В5В6В7В8·
є і і і і є
УТБТБДБДБДБДБДБДЅ
є є ИЛј ИЛј ИНКН 7-8: количество НГМД
є є є ИНННННН 5-6: активный дисплей
є є ИНННННННННН 3-4: pазмеp ОЗУ на системной плате
є ИННННННННННННН 2: наличие сопpоцессоpа 8087
ИННННННННННННННН 1: наличие НГМД

SW2 (PC-1)

ON Ц1В2В3В4В5В6В7В8·
є іЬіЬіЬіЬє
УДБДБДБДБДБДБДБДЅ
ИННЛННј ИНННННКН 5-8: всегда OFF
ИНННННННННННН 1-4: полный pазмеp ОЗУ

Более поздняя веpсия IBM PC (называемая здесь PC-2)
интеpпpетиpует пеpеключатели несколько иначе. Точнее говоpя, SW1
имеет то же назначение, а SW2 показано ниже:

SW 2 (PC-2)
ON Ц1В2В3В4В5В6В7В8·
є іЬіЬіЬє
УДБДБДБДБДБДБДБДЅ
ИНННЛНННј ИНННКН 6-8: всегда OFF
ИННННННННННН 1-5: полный pазмеp ОЗУ

Опишем подpобно назначение пеpеключателей.

— 132 —

Количество накопителей на гибких дисках (НГМД):
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

SW1
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЬі і і і і іЯіЯє 1 НГМД єЬі і і і і іЯіЬє 3 НГМД
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЬі і і і і іЬіЯє 2 НГМД єЬі і і і і іЬіЬє 4 НГМД
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ

Примечание. Ключ 1 в позиции ON означает отсутствие НГМД.

Активный дисплей:
ДДДДДДДДДДДДДДДДД

SW1
ON Ц1В2В3В4В5В6В7В8·
є і і і іЯіЯі і є Нет или EGA
УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
є і і і іЬіЯі і є 40×25 CGA
УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
є і і і іЯіЬі і є 80×25 CGA
УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
є і і і іЬіЬі і є Монохромный адаптер (MDA) либо и MDA, и CGA
УДБДБДБДБДБДБДБДЅ

Наличие сопроцессора 8087:
ДДДДДДДДДДДДДДДДДДДДДДДДД

SW1
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
є іЬі і і і і і є есть 8087 є іЯі і і і і і є нет 8087
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ

Размер ОЗУ на системной плате:
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

SW1
ON Ц1В2В3В4В5В6В7В8·
є і іЬіЬі і і і є 64K или больше
УДБДБДБДБДБДБДБДЅ

Полный размер ОЗУ (SW2 для PC-1):
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Для PC-1 ключи 5 — 8 всегда в положении OFF. Максимальный
размер ОЗУ — 544К.

Страницы: 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

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

— 133 —

SW2 (PC-1)
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЯіЯі і і і є 64K єЯіЬіЯіЬі і і і є 384K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЬіЯіЯі і і і є 128K єЯіЯіЬіЬі і і і є 448K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЬіЯі і і і є 192K єЯіЬіЬіЬі і і і є 512K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЬіЬіЯі і і і є 256K єЬіЬіЬіЬі і і і є 544K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЯіЬі і і і є 320K
УДБДБДБДБДБДБДБДЅ

Полный размер ОЗУ (SW2 для PC-2):
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Для PC-2 ключи 6 — 8 всегда в положении OFF. Максимальный
размер ОЗУ — 640К. Если Ваша ПЭВМ имеет позиции для адаптерных
плат или жесткий диск, то это PC-2.

SW2 (PC-2)
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЯіЯіЯі і і є 64K єЯіЬіЯіЬіЯі і і є 384K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЬіЯіЯіЯі і і є 128K єЯіЯіЬіЬіЯі і і є 448K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЬіЯіЯі і і є 192K єЯіЬіЬіЬіЯі і і є 512K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЬіЬіЯіЯі і і є 256K єЯіЯіЯіЯіЬі і і є 576K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8· ON Ц1В2В3В4В5В6В7В8·
єЯіЯіЯіЬіЯі і і є 320K єЯіЬіЯіЯіЬі і і є 640K
УДБДБДБДБДБДБДБДЅ УДБДБДБДБДБДБДБДЅ

Примечания:

1. Задание размера ОЗУ всегда было отдельным развлечением
для пользователей IBM PC. Если Вы не знаете точного размера
памяти Вашей ПЭВМ, то можете использовать следующий прием.
Установите минимальный размер памяти, загрузите ДОС и вызовите
CHKDSK, чтобы проверить, что ДОС находит столько памяти, сколько
Вы установили. Затем увеличивайте размер ОЗУ до тех пор, пока не
произойдет ошибка.

2. Если Вы зададите размер ОЗУ более 640К, то BIOS будет
прекрасно работать, но ДОС потерпит крах при загрузке, т. к.
часть COMMAND.COM грузится в старшие адреса памяти.

— 134 —

Переключатели IBM PC XT
ДДДДДДДДДДДДДДДДДДДДДДД

IBM PC XT имеет одну колодку переключателей (SW1):

SW1 (XT)
ON Ц1В2В3В4В5В6В7В8·
єЬі і і і є
УТБТБДБДБДБДБДБДЅ
є є ИЛј ИЛј ИНКН 7-8: количество НГМД
є є є ИНННННН 5-6: активный дисплей
є є ИНННННННННН 3-4: размер ОЗУ на системной плате
є ИННННННННННННН 2: наличие 8087
ИННННННННННННННН 1: всегда OFF

Ключи 2, 5-6 и 7-8 имеют тот же смысл, что на IBM PC. Ключи
3-4 задают размер ОЗУ на системной плате:

SW1 (XT)
ON Ц1В2В3В4В5В6В7В8·
є і іЬіЯі і і і є 128K
УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
є і іЯіЬі і і і є 192K
УДБДБДБДБДБДБДБДЅ
ON Ц1В2В3В4В5В6В7В8·
є і іЬіЬі і і і є 256K
УДБДБДБДБДБДБДБДЅ

Примечание. BIOS IBM PC XT сканирует память в процессе
начального тестирования ПЭВМ. Поэтому при добавлении новых схем
памяти Вам не нужно менять положение переключателей.

Переключатели IBM PC AT
ДДДДДДДДДДДДДДДДДДДДДДД

IBM PC AT не имеет DIP-переключателей. Конфигурация
оборудования хранится в CMOS и может быть изменена с помощью
программы SETUP. Описание CMOS см. в п. 13.

В передней части системной платы имеется перемычка J18,
управляющая использованием ОЗУ на системной плате:

ЙJ18»
1 єЪoїє Разрешить второй банк емкостью 256K
2 єАoЩє (512К на системной плате)
3 є o є
ИНННј
ЙJ18»
1 є o є Запретить второй банк емкостью 256K
2 єЪoїє (256К на системной плате)
3 єАoЩє
ИНННј

Еще один переключатель, помеченный SW1, находится в задней

— 135 —

части системной платы и задает первичный дисплей ПЭВМ:

ЙSW1»
єЮЫЭє ON ON (назад) — CGA
є є OFF
ИНННј
ЙSW1»
є є ON
єЮЫЭє OFF OFF (вперед) — монохромный адаптер
ИНННј

Примечание. Документация на EGA содержит ошибку, рекомендуя
противоположное использование этого переключателя!

Переключатели адаптера EGA
ДДДДДДДДДДДДДДДДДДДДДДДДДД

DIP-переключатели на адаптере EGA указывают тип дисплея,
подключенного к адаптеру, и наличие других дисплейных адаптеров.
Ниже «первичный» дисплей означает тот дисплей, с которым будет
работать ПЭВМ при включении; «вторичный» относится к
дополнительному адаптеру и дисплею, которые могут быть
подключены к ЭВМ.

Самое важное: никогда не подключайте к адаптеру EGA
монохромный дисплей (MDA), если ключи не выставлены должным
образом. Вы можете физически разрушить дисплей!

ON Ц4В3В2В1· Первичный EGA с цветным монитором 40×25
єЯіЬіЬіЯє Вторичный MDA
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный EGA с цветным монитором 80×25
єЯіЬіЬіЬє Вторичный MDA
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный EGA с расширенным цветным монитором
єЬіЯіЯіЯє (эмуляция CGA)
УДБДБДБДЅ Вторичный MDA
ON Ц4В3В2В1· Первичный EGA с расширенным цветным монитором
єЬіЯіЯіЬє (в режиме EGA)
УДБДБДБДЅ Вторичный MDA
ON Ц4В3В2В1· Первичный EGA с монохромным монитором
єЬіЯіЬіЯє Вторичный CGA с цветным монитором 40х25
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный EGA с монохромным монитором
єЬіЯіЬіЬє Вторичный CGA с цветным монитором 80х25
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный MDA
єЯіЯіЯіЯє Вторичный EGA с цветным монитором 40х25
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный MDA
єЯіЯіЯіЬє Вторичный EGA с цветным монитором 80х25
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный MDA
єЯіЯіЬіЯє Вторичный EGA с расширенным цветным монитором
УДБДБДБДЅ (эмуляция CGA)

— 136 —

ON Ц4В3В2В1· Первичный MDA
єЯіЯіЬіЬє Вторичный EGA с расширенным цветным монитором
УДБДБДБДЅ (в режиме EGA)
ON Ц4В3В2В1· Первичный CGA с цветным монитором 40х25
єЯіЬіЯіЯє Вторичный EGA с монохромным монитором
УДБДБДБДЅ
ON Ц4В3В2В1· Первичный CGA с цветным монитором 80х25
єЯіЬіЯіЬє Вторичный EGA с монохромным монитором
УДБДБДБДЅ

EGA имеет три перемычки (P1 — P3):

ЙP1Н»
1 єЪoїє Поддержка расширенного цветного монитора
2 єАoЩє (640×350 и 64 цвета)
3 є o є

Страницы: 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

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

ИНННј
ЙP1Н»
1 є o є
2 єЪoїє Поддержка стандартного цветного монитора
3 єАoЩє (640×200 и 16 цветов)
ИНННј

P2 (не показанный здесь) — это коннектор светового пера.

ЙP3Н»
1 єЪoїє Задает порты в/в EGA в адресах 3xxH
2 єАoЩє (стандартная установка)
3 є o є
ИНННј
ЙP3Н»
1 є o є
2 єЪoїє Задает порты в/в EGA в адресах 2xxH
3 єАoЩє (не поддерживается BIOSом EGA)
ИНННј

— 137 —

EГлоссарийF

Адаптеp (adapter).
См. контpоллеp.

Ассемблеp (assembly language).
Язык пpогpаммиpования на уpовне команд центpального
пpоцессоpа.

Байт (byte).
Минимальная адpесуемая единица памяти ЭВМ pазмеpом 8 бит.

Бит (bit).
Двоичный pазpяд, пpинимающий значения 0 или 1.

Блок (block).
Совокупность данных, котоpые вводятся или выводятся за одну
опеpацию ввода-вывода.

Дисплей (display).
Устpойство отобpажения символьной и гpафической инфоpмации.

Интеpфейс (interface).
Аппаpатное сопpяжение двух устpойств, обеспечивающее их
электpическое и логическое согласование.

Интеpфейс паpаллельный (parallel interface).
Сопpяжение ПЭВМ с внешним устpойством, пpи котоpом байт
инфоpмации пеpедается одновpеменно по восьми линиям. Обычно
используется для подключения печатающих устpойств.

Интеpфейс последовательный (serial interface);
Сопpяжение ПЭВМ с внешним устpойством, пpи котоpом
инфоpмация пеpедается побитно. Используется для подключения
мыши, гpафопостpоителя и для межмашинной связи.

Канал (channel).
Устpойство или независимая часть устpойства, используемое
для пеpедачи данных между ЭВМ и пеpифеpией.

Контpоллеp (controller).
Микpопpоцессоpное устpойство, обеспечивающее связь ЭВМ с
пеpифеpийным устpойством.

Накопитель дисковый (disk drive).
Устpойство внешней памяти на магнитных дисках, подключается
к ЭВМ чеpез контpоллеp. Диски ПЭВМ делятся на гибкие (дискеты) и
жесткие (винчестеpские).

Память опеpативная, ОЗУ (random access memory, RAM).
Часть ЭВМ, используемая для хpанения данных в пpоцессе
pаботы ЭВМ. Пpи выключении ЭВМ содеpжимое ОЗУ теpяется.

Память постоянная, ПЗУ (read-only memory, ROM).
Часть ЭВМ, используемая для хpанения неизменяемой инфоp-

— 138 —

мации и доступная только для чтения.

Поpт ввода-вывода (i/o port).
Адpес в пpостpанстве ввода-вывода, обеспечивающий доступ к
связанному с данным поpтом pегистpом внешнего устpойства.

Позиции адаптеpных плат (expansion slots).
Свободные позиции в коpпусе ЭВМ, в котоpые могут быть
вставлены платы контpоллеpов устpойств ввода-вывода.

Пpеpывание (interrupt).
Внешнее событие, вызывающее пpеpывание pаботы ЦП и пеpедачу

упpавления пpогpамме обpаботки данного пpеpывания.

Пpямой доступ в память, ПДП (direct memory access, DMA).
Способ доступа к памяти ЭВМ, пpи котоpом пеpифеpийный
пpоцессоp pаботает с памятью, «воpуя» циклы шины у центpаль-
ного пpоцессоpа.

Регистpы (registers).
Аппаpатные компоненты ЭВМ, пpедназначенные для обpаботки
данных с высокой скоpостью.

Слово (word).
Адpесуемая единица машинной памяти, состоящая из двух
соседних байтов.

Центpальный пpоцессоp, ЦП (central processing unit, CPU).
Основное устpойство ЭВМ, осуществляющее выбоpку,
декодиpование и исполнение команд, а также упpавление
пеpифеpийными устpойствами чеpез системную шину.

DIP-пеpеключатели (DIP-switchs).
Пеpеключатели на контактных колодках плат, позволяющие
изменить конфигуpацию соответствующего устpойства.

— 139 —

E
Пеpечень pекомендуемых матеpиалов цикла
«ПРОГРАММНО-АППАРАТНЫЕ СРЕДСТВА
ПЕРСОНАЛЬНЫХ ЭВМ СЕМЕЙСТВА IBM PC»
F

А1. Микpопpоцессоpы фиpмы Intel.

А3. Базовая система ввода-вывода (BIOS).

Б1. MS-DOS. Спpавочник пользователя.

Б2. MS-DOS. Справочник программиста.

Г2. Макpоассемблеp.

Г6. Сpедства отладки пpогpамм.

Страницы: 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

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

— 43 —

E.6. КлавиатураF

E6.1. Клавиатура IBM PC/XTF

Связь с клавиатурой осуществляется через порты ППИ 60h и
61h (см. 5.2). При нажатии клавиши происходит аппаратное
прерывание IRQ1, связанное с вектором Int 9. Если Вы хотите
обрабатывать это прерывание сами, то программа обработки
прерывания должна иметь следующий вид:

Int_09h:
push ax
push di
push es
in al,60h ;скан. код клавиши из РА
les di,buffer ;адрес буфера
stosb ;сохранить код в буфере
pop es
pop di
in al,61h ;ввод порта РВ
mov ah,al
or al,80h ;установить бит «подтверждения ввода»
out 61h,al
xchg ah,al ;вывести старое значение РВ
out 61h,al
mov al,20h ;послать сигнал EOI
out 20h,al ;контроллеру прерываний
pop ax
iret

Перечень скан-кодов всех клавиш приведен в приложении 1. Вы
можете запретить прерывания от клавиатуры либо маскировкой бита
1 в регистре IMR контроллера прерываний, либо установкой бита 6
порта РВ ППИ:

in al,21h ;чтение IMR
or al,2 ;установка бита 1
out 21h,al ;запись IMR
или
in al,61h ;чтение РВ
or al,40h ;установка бита 6
out 61h,al ;запись РВ

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

— 44 —

E6.2. Клавиатура IBM PC ATF

Взаимодействие с клавиатурой в PC AT базируется на
микропроцессоре Intel 8042; благодаря этому программист имеет
гораздо большие возможности по управлению клавиатурой, нежели в
PC/XT.

Управление клавиатурой производится обращением к порту
ввода-вывода 64h. Для совместимости со старыми ПЭВМ допустимо
использование порта 60h. Если приведенные ниже примеры не
работают на Вашей ПЭВМ, то используйте порт 60h.

Порт 64h предназначен для вывода команд и данных и для
чтения состояния клавиатуры. Обшая схема посылки команд клавиа-
турe такова:

cli ;запрет прерываний
call wait_kbd ;ожидание готовности клавиатуры
mov al,cmd_code ;код команды
out 64h,al ;вывод в порт
sti ;разрешение прерываний

Для команд, сопровождающихся байтом данных, эта схема
принимает вид:

cli
call wait_kbd
mov al,cmd_code ;код команды
out 64h,al
call wait_kbd
mov al,data_value ;байт данных
out 64h,al
sti

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

wait_kbd:
mov cx,2500h ;задержка порядка 10 мсек
test_kbd:
in al,64h ;читаем состояние клавиатуры
test al,2 ;проверка бита готовности
loopnz test_kbd
ret

Авторам известны следующие команды контроллера клавиатуры
(этот список, вероятно, не полон и может содержать ошибки, т. к.
собран из различных источников):

Код команды Описание
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
0FFh Сброс клавиатуры и запуск внутреннего теста.

0FEh Повторить последнюю передачу.

0FDh Вызов прерывания IRQ1.

— 45 —

0F6h Привести клавиатуру в исходное состояние и
разрешить сканирование.

0f5h Привести клавиатуру в исходное состояние и
запретить сканирование.

0F4h Сбросить буфер клавиатуры и начать сканирование.

0F3h Задать задержку и скорость ввода символов.
Первоначально клавиатура начинает повторять
нажатую клавишу через 0,5 сек со скоростью
10 повторов в секунду. Вы можете изменить эти
параметры, послав следующий байт данных:

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДДВДДВДДї
і0 і і і Биты:
АДДБДДЕДДБДДБДДБВДБДДБДДЩ ДДДДД
і АДДДДДДДД> 0-4:количеств повторов в секунду
АДДДДДДДДДДДДДДДДДД> 5-6:начальная задержка в мсек:
00=250, 01=500, 10=750, 11=1000

Количество повторов задается следующей таблицей:

ЪДДДДДДВДДДДДДДДВДДДДДДВДДДДДДДДВДДДДДДВДДДДДДДДї
іКонст.іСкоростьіКонст.іСкоростьіКонст.іСкоростьі
ГДДДДДДЕДДДДДДДДЕДДДДДДЕДДДДДДДДЕДДДДДДЕДДДДДДДДґ
і 00h і 30.0 і 0Bh і 10.9 і 16h і 4.3 і
і 01h і 26.7 і 0Ch і 10.0 і 17h і 4.0 і
і 02h і 24.0 і 0Dh і 9.2 і 18h і 3.7 і
і 03h і 21.8 і 0Eh і 8.6 і 19h і 3.3 і
і 04h і 20.0 і 0Fh і 8.0 і 1Ah і 3.0 і
і 05h і 18.5 і 10h і 7.5 і 1Bh і 2.7 і
і 06h і 17.1 і 11h і 6.7 і 1Ch і 2.5 і
і 07h і 16.0 і 12h і 6.0 і 1Dh і 2.3 і
і 08h і 15.0 і 13h і 5.5 і 1Eh і 2.1 і
і 09h і 13.3 і 14h і 5.0 і 1Fh і 2.0 і
і 0Ah і 12.0 і 15h і 4.6 і і і
АДДДДДДБДДДДДДДДБДДДДДДБДДДДДДДДБДДДДДДБДДДДДДДДЩ

0EEh Эхо (для диагностики). Просто возвращает 0ЕЕh.
0EDh Управление светодиодами клавиатуры. Для включения
или выключения светодиодов пошлите такой байт
данных:

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДДВДДВДДї
іX X X X X і і і і Биты:
АДДБДДБДДБДДБДДБВДБВДБВДЩ ДДДДД
і і АДД> 0: 1 = включить ScrollLock
і АДДДДД> 1: 1 = включить NumLock
АДДДДДДДД> 2: 1 = включить CapsLock

0DFh Разрешить 20-битовую адресацию.
0DDh Запретить 20-битовую адресацию.

— 46 —

0D1h Запись в порт вывода 8042.
0D0h Чтение порта вывода 8042.
0C0h Чтение порта ввода 8042.
0AEh Разрешение клавиатуры.
0ADh Запрещение клавиатуры.
0ACh Чтение ОЗУ контроллера.
0ABh Тест синхронизации и данных.
0AAh Внутренний тест клавиатуры.
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

— 47 —

E7. ДисплеиF

E7.1. Общее описаниеF

Программирование дисплея ПЭВМ IBM PC определяется типом
дисплейного адаптера и типом видеомонитора, подключенного к
этому адаптеру. В этой главе описаны четыре наиболее
распространенных видеоадаптера IBM PC, а именно:

— монохромный графический адаптер MGA;
— цветной графический адаптер CGA;

Страницы: 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

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

7 6 5 4 3 2 1 0
ЪДДДВДДДВДДДВДДДВДДДВДДДВДДДВДДДї
і і і 0 і і 0 і і і і Бит:
АДВДБДВДБДДДБДВДБДДДБДВДБДВДБДВДЩ ДДДД
і і і і і АД>0: 1=адресный маркер данных не
і і і і і найден
і і і і АДДДДД>1: 1=ошибка на нулевой дорожке
і і і АДДДДДДДДД>2: 1=выполнение команды прекра-
і і і щено программно, команда
і і і не завершилась
і і АДДДДДДДДДДДДДДДДД>4: 1=идентификатор сектора не
і і найден
і АДДДДДДДДДДДДДДДДДДДДДДДДД>6: 1=неисправимая ошибка в дан-
і ных, ошибка контрольной
і суммы
АДДДДДДДДДДДДДДДДДДДДДДДДДДДДД>7: 1=дефектный сектор

Порт 1F2h.
Чтение/запись числа секторов для последующей операции.

Порт 1F3h.
Чтение/запись параметра «номер сектора» для последующей
операции.

— 106 —

Порт 1F4h.
Чтение/запись старших битов номера цилиндра для последующей
операции (биты 0 — 1 — это биты 8 — 9 в 10-битовом номере
цилиндра).

Порт 1F5h.
Чтение/запись младших восьми битов номера цилиндра для
последующей операции.

Порт 1F6h.
Чтение/запись номера устройства и головки для последующей
операции.

Порт 1F7h (запись).
Вывод команды по управлению накопителем.

Порт 1F7h (чтение).
Чтение состояния накопителя и результатов предыдущей
команды:

7 6 5 4 3 2 1 0
ЪДДДВДДДВДДДВДДДВДДДВДДДВДДДВДДДї
і і і і і і і і і Бит:
АДВДБДВДБДВДБДВДБДВДБДВДБДВДБДВДЩ ДДДД
і і і і і і і АД>0: 1=предыдущая команда завер-
і і і і і і і шилась с ошибкой
і і і і і і АДДДДД>1: 1=сигнал «индекс»
і і і і і АДДДДДДДДД>2: 1=данные при выполнении пос-
і і і і і ледней операции были скор-
і і і і і ректированы при помощи
і і і і і алгоритма ECC
і і і і АДДДДДДДДДДДДД>3: 1=идет процесс обмена данными
і і і АДДДДДДДДДДДДДДДДД>4: 1=поиск завершен
і і АДДДДДДДДДДДДДДДДДДДДД>5: 1=ошибка записи
і АДДДДДДДДДДДДДДДДДДДДДДДДД>6: 1=устройство готово для чте-
і ния, записи или поиска
АДДДДДДДДДДДДДДДДДДДДДДДДДДДДД>7: 1=устройство занято выполне-
нием команды ( остальные
биты не несут смысловой
нагрузки)

E9.2.2. Система командF

Код команды заносится в порт 1F7h после того, как
подготовлены все параметры в портах 1F2h — 1F6h. Выполнение
команды начинается сразу после занесения в порт 1F7h кода
команды. Команда состоит из одного байта. Старшие 4 бита
содержат код требуемой операции, младшие содержат параметры.
Перечень команд с возможными значениями параметров приведен в
таблице.

— 107 —

ЪДДДДДДДДВДДДДДДДДДДДДДДДДДДДДДДДВДДДДДДДДДДДДДДДДДДДДДДДДДДДДДї
і Код і Назначение і Параметры і
іоперацииі і і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і 1 і Рекалибровать (сброс і Период импульсов сигнала і
і і головок на цилиндр 0) і «шаг» і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і 2 і Чтение секторов і Биты, определяющие необходи-і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДґ мость повторных обращений і
і 3 і Запись секторов і к диску и повторных попыток і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДґ считывания при ошибках і
і 4 і Проверка секторов і контрольной суммы і

ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і 5 і Форматирование дорожкиі Параметр = 0 і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і 7 і Поиск цилиндра і Период импульсов сигнала і
і і і «шаг» і
ГДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і 9 і Диагностика і Параметр = 0 і
і ГДДДДДДДДДДДДДДДДДДДДДДДЕДДДДДДДДДДДДДДДДДДДДДДДДДДДДДґ
і і Установка параметров і Параметр = 1 і
і і накопителя (максималь-і і
і і ное число головок и і і
і і секторов) і і
АДДДДДДДДБДДДДДДДДДДДДДДДДДДДДДДДБДДДДДДДДДДДДДДДДДДДДДДДДДДДДДЩ

— 108 —

E10. Печатающее устройствоF

Устройство печати IBM PC-подобных компьютеров обычно
подключается к параллельному интерфейсу. Для подключения
используется стандартный разъем Centronix, имеющий 36 контактных
выходов (отечественный аналог ИРПР-М). Допускается три варианта
подключения принтеров к ПЭВМ:

— адаптер принтера может находится на одной плате с
адаптером монохромного дисплея, при этом используются порты
3BCh — 3BEh;

— к ПЭВМ могут подключены два отдельных адаптера для
управления принтерами, использующие порты 378h — 37Ah (первый
адаптер) и 278h — 27Ah (второй адаптер).

При программировании принтера важно знать адрес базового
порта ввода-вывода (первого порта из трех); адреса базовых
портов хранятся в области данных BIOS, начиная с адреса 0:408h
(LPT1) и далее по слову на принтер до LPT4. Дальнейшее описание
предполагает, что базовый адрес принтера равен 378h.

Порт Операция Описание
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
378h Запись Регистр данных — сюда засылается байт, посылае-
мый на печать
Чтение Регистр данных — позволяет считать последний
байт, переданный принтеру

379h Чтение Регистр состояния принтера:

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДВДВДї
і і і і і іXіXіXі Биты:
АВДБВДБВДБВДБВДБДБДБДЩ ДДДДД
і і і і АДДДДДДДДД> 3: 0=при печати возникла ошибка
і і і АДДДДДДДДДДДД> 4: 0=принтер в автономном режиме
і і АДДДДДДДДДДДДДДД> 5: 1=сигнал «конец бумаги»
і АДДДДДДДДДДДДДДДДДД> 6: 0=принтер готов к печати
і следующего символа
АДДДДДДДДДДДДДДДДДДДДД> 7: 0=принтер занят, находится в
автономном режиме или
произошла ошибка

— 109 —

37Ah Чтение/ Регистр управления принтером:
Запись

7 6 5 4 3 2 1 0
ЪДВДВДВДДВДДВДДВДДВДДї
іXіXіXі і і і і і Биты:
АДБДБДБВДБВДБВДБВДБВДЩ ДДДДД
і і і і АДДД> 0: бит запуска печати (см. ниже)
і і і АДДДДДД> 1: 1=после возврата каретки выводить
і і і перевод строки (в MS-DOS должен
і і і быть сброшен)
і і АДДДДДДДДД> 2: 1=инициализировать принтер
і АДДДДДДДДДДДД> 3: 1=разрешить вывод на печать (должен
і быть всегда установлен)
АДДДДДДДДДДДДДДД> 4: 1=разрешить прерывания от принтера
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Примечания.
1. Для запуска печати символа нужно на короткое время
установить бит 0 регистра управления, а затем сбросить его.

2. Прерывание происходит по окончании вывода символа на
печать: для первого принтера на седьмом уровне контроллера
прерываний (IRQ7, вектор прерывания 0Fh), для второго принтера —
на пятом уровне (IRQ5, вектор 0Dh). Следует отметить также, что
IRQ5 используется XT-контроллером жестких дисков для генерации
своих прерываний. Обычно этот бит не используется
(сбрасывается), а проверка готовности принтера производится на
основании опроса регистра состояния.

Типичная последовательность действий для вывода на печать
одного символа такова:

— вывести передаваемый байт в регистр данных;

Страницы: 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

Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

КОМПЬЮТЕРНАЯ ЛИТЕРАТУРА

LIB.com.ua [электронная библиотека]: : Пpогpаммно-технические сpедства пеpсональных ЭВМ семейства IBM PC

— расширенный графический адаптер EGA;
— графический видеомассив VGA.

Центральным устройством в управлении видеомонитором
является контроллер электронно-лучевой трубки (ЭЛТ). В IBM PC
применяются программируемые контроллеры фирмы Motorola,
позволяющие задать все основные параметры развертки изображения
на экране. Для понимания дальнейшего материала необходимо ввести
ряд часто используемых понятий. Режим работы видеомонитора
характеризуется следующими понятиями:

— вертикальным разрешением (количество строк растра на
экране);
— горизонтальным разрешением (количество символов или точек
в строке);
— представлением данных в видеопамяти;
— атрибутами вывода, задающими цвет, мерцание и т. п.

Горизонтальное и вертикальное разрешение определяются
последовательностью согласованных во времени сигналов
графического адаптера, управляющих движением луча ЭЛТ. Луч ЭЛТ
движется с постоянной скоростью вдоль строки растра и вниз с
одной строки растра на следующую, обновляя (разворачивая)
изображение на экране. Для перевода луча из крайней правой точки
строки в крайнюю левую точку следующей строки (обратный
горизинтальный ход луча) видеоадаптер генерирует сигнал
горизонтальной синхронизации; для перемещения луча из крайней
правой позиции нижнeй строки экрана в крайнюю левую позицию
первой строки (вертикальный обратный ход луча) — сигнал
вертикальной сихронизации.

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

Длительность сигналов развертки принято задавать в так
называемых символьных тактах (character clock). Символьный такт
— это отрезок времени, необходимый для вывода на экран 8 точек в
графическом режиме и 8 или 9 точек в алфавитно-цифровых режимах.

Параметры развертки заносятся в определенные регистры
контроллера ЭЛТ; назначение этих регистров различно в

— 48 —

контроллерах MGA/CGA и EGA/VGA.

E7.2. Контроллеры ЭЛТF

Адаптеры MGA и CGA содержат контроллер ЭЛТ Motorola 6845,
имеющий следующие программируемые регистры:

Регистр Наименование Описание
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД
R0 Общая длительность Время вывода строки растра в
строки (horizontal total) символьных тактах.
R1 Ширина кадра Количество символов в строке.
(horizontal displayed)
R2 Позиция горизонтальной Начало горизонтальной
синхронизации (horizontal синхронизации в символьных
sync position) тактах.
R3 Ширина синхронизации Длительность синхронизации
(sync width) (младшая тетрада — вертикальной,
старшая — горизонтальной).
R4 Размер кадра Общее количество строк
(vertical total) растра в кадре.
R5 Вертикальное выравнивание Поправка для частоты 50 или
(vertical adjust) 60 Гц.
R6 Высота кадра Количество строк
(vertical displayed) изображения в кадре.
R7 Позиция вертикальной Начало вертикальной
синхронизации (vertical синхронизации в символьных
sync position) тактах.
R8 Биты 4-5: режим расслоения
(interlace mode);
биты 6-7: сдвиг (skew)
R9 Макс. число строк растра Количество строк растра на
строку символов.
R10 Начало курсора Начальная строка курсора.
R11 Конец курсора Конечная строка курсора.
R12\Начальный адрес Старший байт
R13/видеопамяти Младший байт
R14\Позиция Старший байт
R15/курсора Младший байт
R16\Позиция Старший байт
R17/светового пера Младший байт
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

Aдаптеры EGA и VGA имеют следующие программируемые
регистры, эмулирующие контроллер ЭЛТ:

Регистр Наименование Описание
ДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДДД

R0 Общая длительность Время вывода строки растра в
строки (horizontal total) символьных тактах.
R1 Ширина кадра (horizontal Количество символов в строке
display enable end) (см. R7).
R2 Начало горизонтального Символьная позиция, в которой
гашения (start horizontal начинается горизонтальное
blank) гашение луча.

— 49 —

R3 Конец горизонтального Символьная позиция, в которой
гашения (end horizontal заканчивается горизонтальное
blank) гашение луча (в битах 0-4);
разрешение сдвига (биты 5-6).
R4 Начало обратного хода луча Символьная позиция начала
по горизонтали (start горизонтальной синхронизации.
horizontal retrace)
R5 Конец обратного хода луча Символьная позиция окончания
по горизонтали (end горизонтальной синхронизации.
horizontal retrace)

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДДВДДВДДї
і і і і Биты:
АВДБДДЕДДБДДБДДБВДБДДБДДЩ ДДДДД
і і АДДДДДД> 0-4: ширина обратного хода луча
і і по горизонтали
і АДДДДДДДДДДДДДДДД> 5-6: задержка обратного хода в
і символьных тактах
АДДДДДДДДДДДДДДДДДДДДД> 7: 1=начинать панорамирование с
четного адреса, 0=с нечетного

R6 Размер кадра Общее количество строк
(vertical total) растра в кадре (см. R7).
R7 Регистр переполнения Содержит старшие биты других
(overflow) регистров:

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДДВДДВДДї
і і і і і і і і і Бит:
АВДБВДБВДБВДБВДБВДБВДБВДЩ ДДДД
і і і і і і і АД> 0: 8-й бит размера кадра (R6)
і і і і і і АДДДД> 1: 8-й бит количества строк
і і і і і і отображения в кадре (R18)
і і і і і АДДДДДДД> 2: 8-й бит начала вертикальной
і і і і і синхронизации (R16)
і і і і АДДДДДДДДДД> 3: 8-й бит начала вертикального
і і і і гашения луча (R21)
і і і АДДДДДДДДДДДДД> 4: 8-й бит сравнения строк (R24)
і і АДДДДДДДДДДДДДДДД> 5: EGA: 8-й бит R10, VGA: 9-й бит R6
і АДДДДДДДДДДДДДДДДДДД> 6: 9-й бит R18 (только VGA)
АДДДДДДДДДДДДДДДДДДДДДД> 7: 9-й бит R16 (только VGA)

R8 Начало растра (preset Первая строка растра после
row scan) вертикальной синхронизации.
R9 Макс. число строк растра Количество строк растра на
строку символов (в битах 0-4);
для VGA: бит 5=9-й бит R21.
R10 Начало курсора Начальная строка курсора.
R11 Конец курсора Конечная строка курсора (биты
0-4); сдвиг курсора (биты 5-6).
R12\Начальный адрес Старший байт
R13/видеопамяти Младший байт
R14\Позиция Старший байт
R15/курсора Младший байт

— 50 —

При чтении:
R16\Позиция Старший байт
R17/светового пера Младший байт
При записи:
R16 Начало обратного хода луча Символьная позиция начала
по вертикали (start вертикальной синхронизации.
vertical retrace)
R17 Конец обратного хода луча Символьная позиция окончания
по вертикали (end вертикальной синхронизации.
vertical retrace)

7 6 5 4 3 2 1 0
ЪДДВДДВДДВДДВДДВДДВДДВДДї
і і0 і і і і Биты:
АВДБДДБВДБВДБДДБДДЕДДБДДЩ ДДДДД
і і і АДДДД> 0-3: ширина обратного хода луча
і і і по вертикали
і і АДДДДДДДДДДДД> 4: 0=очистить прерывание вертикальной
і і синхронизации
і АДДДДДДДДДДДДДДД> 5: 0=разрешить прерывание вертикаль-
і ной синхронизации (IRQ2)
АДДДДДДДДДДДДДДДДДДДДД> 7: VGA: запрет записи в R0 — R7

R18 Количество строк отобра- Количество строк растра,
жения в кадре (vertical занятых собственно изобра-
displayed end) жением
R19 Вертикальное смещение Количество слов данных в
(vertical displayed логической строке видеопамяти.
adjustment)
R20 Позиция подчеркивания Номер строки растра (биты 0-5).
R21 Начало вертикального Символьная позиция, в которой

Страницы: 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