* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки

128 Языки Бейсик где перемен тип имя переменной Basic. т и п д а н н ы х переменной ( I N T E G E R , L O N G , SING­ LE, D O U B L E , S T R I N G и л и тип данных, определен¬ н ы й пользователем). в ы р а ж е н и е в о з в р а щ а е м о е значение функции. Оператор F U N C T I O N позволяет определять функцию лучшим образом. См. также E X I T F U N C T I O N , S H A R E D , STATIC D E F SEG-оператор Устанавливает адрес текущего сегмента. Ф о р м а т записи: DEF SEG где адрес адрес сегмента, используемый B L O A D , BSAVE, C A L L ABSOLUTE, PEEK или POKE; значение в пределах от 0 до 65 535. Если адрес опу¬ щен, D E F SEG переустанавливает адрес текущего сегмента в сегмент данных, принимаемый по умолчанию. [=адрес] Пример: DEF SEG = 0 S t a t u s % = PEEK(&H417) 'Считывает статус клавиатуры. POKE &H417, ( S t a t u s % XOR &H40) 'Изменяет состояние Caps L o c k , 'бит 6. См. также BSAVE, B L O A D , C A L L ABSOLUTE, PEEK, POKE DEFINT-оператор Устанавливает тип данных по умолчанию для переменных, функций D E F F N и процедур F U N C T I O N . Ф о р м а т записи: DEFINT DEFLNG DEFSNG DEFDBL DEFSTR где обл_букв буква или область букв (например, A - M ) . обл_букв обл_букв обл_букв обл букв обл_букв [,обл_букв]... [,обл_букв]... [,обл_букв]... [,обл букв]... [,обл_букв]... Basic устанавливает тип данных по умолчанию для переменных, функций D E F F N и процедур F U N C T I O N , имена которых начинаются с указанной буквы, в следующем порядке: