Amiga. Вычислительная техника
Меню сайта
Главная
Amiga
Amiga Corporation
Модельный ряд
История развития
Аппаратная платформа
Операционные системы
Эмуляция
AMIGA # 1
Программирование на Ассемблере
Организация процессоров
Методы защиты информации
Компьютерные новеллы
Боятся ли компьютеры адского пламени?
Виртуальная реальность
Корпоративные сети
Телекоммуникационные сети
Архитектура ЭВМ
ЕС ЭВМ
Рождение ЭВМ
Компьютер
Гарвардская архитектура
Современные высокопроизводительные компьютеры
Дорога в будущее
Vista
Инфоpматика
ЭВМ
Операционные системы
Linux
Windows
Освой компьютер
Макинтош
Набор текста
Поколения
Компьютерная грамотность
Устройство компьютера
Железо
Графика
Звук
Ремонт
Сети
Программирование
Информационные технологии
Криптография
Микроэлектроника
Истории
 
 

Освой компьютер


lea ggtext(PC),A1

moveq.l #30,D0

moveq.l #60,D1

jsr printitext(A6)

rts
draw:

move.l intbase(PC),A6

move.l windowhd(PC),A0

move.l 50(A0),A0

lea image(PC),A0

move.l #200,D0

move.l #100,D1

jsr drawimage(A6)

rts
borderdraw: ;* нарисовать бордюр

move.l intbase(PC),A6

move.l windowhd(PC),A2

move.l 50(A0),A0

jsr DrawBorder(A6)

rts
screen_defs:

dc.w 0,0

dc.w 640,200

dc.w 4

dc.b 0

dc.b 1

dc.w $800

dc.w 15

dc.l 0

dc.l titel

dc.l 0

dc.l 0
windowdef:

dc.w 10,20

dc.w 300,150

dc.b 0,1

dc.l $300

dc.l $100F

dc.l gadget

dc.l 0

dc.l windname
screenhd: dc.l 0

dc.l 0

dc.w 200,40,600,200

dc.w $FF
btext:

dc.b 3,3

dc.b 0

align

dc.w 10,10

dc.l 0

dc.l bodytxt

dc.l 0
bodytxt: dc.b \"Requester text\",0

align
ltext:

dc.b 3,1

dc.b 0

align

dc.w 5,3

dc.l 0

dc.l lefttxt

dc.l 0
lefttxt: dc.b \"left\",0

align
rtext:

dc.b 0,1

dc.b 0

align

dc.w 5,3

dc.l 0

dc.l righttxt

dc.l 0
righttxt: dc.b \"right\",0

align
titel: dc.b \"User Screen\",0

 

AMIGA: ПРОГРАММИРОВАНИЕ НА АССЕМБЛЕРЕ.

 

© 2010 Amigo. All Rights Reserved
Создание сайтов ЕкатеринбургШаблоны сайтовПоиск товаров - справочник цен, каталог магазинов, прайс-листыБесплатные шаблоны дизайна компьютерных сайтов
Hosted by uCoz