Amiga Dunyasi - Sayi 30 (Kasim 1992).pdf - Retro Dergi

dc.w $0182,$0fa5,$ea07,$fffedc.w $0182,$0f96,$eb07,$fffedc.w $0182,$0f87,$ec07,$fffedc.w $0182,$0f78,$ed07,$fffedc.w $0182,$0f69,$ee07,$fffedc.w $0182,$0f5a,$ef07,$fffedc.w $0182,$0f4b,$f007,$fffedc.w $0182,$0f3c,$f107,$fffedc.w $0182,$0f2d,$f207,$fffedc.w $0182,$0f1e,$f307,$fffedc.w $0182,$0e2c,$f407,$fffedc.w $0182,$0e3b,$f507,$fffedc.w $0182,$0d5a,$f607,$fffedc.w $0182,$0c79,$f707,$fffedc.w $0182,$0888,$f807,$fffedc.w $0182,$0777,$f907,$fffedc.w $0182,$0666,$fa07,$fffedc.w $0182,$0555,$fb07,$fffedc.w $0182,$0444,$fc07,$fffedc.w $0182,$0343,$fd07,$fffecycin1:dc.w $0182,$0222,$fe07,$fffedc.w $0182,$0111 ,$ff07,$fffedc.w $01a0,$0880,$01a2,$0870,$01a4,$0770,$01a6,$0760dc.w $ffff,$fffe ;copper listin sonu; S t a r datasını buraya yükleyin (label' in adı star olmalı); alttaki örneğe bakın.Star:dc.l $3AD83B00,$80008000,$3C843D00,$80000000;.... devam eder...mt_data: equ $30000 ;module adresi=$30000bitmap: blk.b 40,0 ;Gbitmap 1: blk.b 40,0rastport: blk.b 100,0 ;Grastportl: blk.b 100,0txtbase: dc.l scrolltxt ;Gtxtbasescr: dc.l txtscroldcop: dc.l 0 ;Ggfxbase: dc.l 0 ;Gintbase: dc.l 0timer: dc.l 0oldaddy: dc.l 0gfxname: dc.b "graphics.library",0,0 ;Gint: dc.b "intuition.library",0gtext:deb 10,110deb ' Software Failure. Press left mouse button to continue.",0deb $ff,50,$bedeb " Guru Meditation #$ 1000009.00c0371 a",0evenscrolltxt:; burada scroll texti var.:alttaki text mesaj textidir, 6 satır ve 24 harf olmalıtxtscr:deb " GLOBAL TRASH ASSEMBLER "deb " ORNEK 2: TEXTSCREENdeb " PROGRAM: KAĞAN UNALDI "debdeb""GORDUGUNUZ MINIINTRONUN TAMAMIdeb " ASM-ONE İLE YAZILMIŞTIR "end ;programın sonuAMIGA DÜNYASI 31