aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Initial data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 72d218235f
commit f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

13
Task/Quoting-constructs/68000-Assembly/quoting-constructs-1.68000 Normal file
View file

@ -0,0 +1,13 @@
ByteData:
DC.B $01,$02,$03,$04,$05
even
WordData:
DC.W $01,$02
DC.W $03,$04
;the above was the same as DC.W $0001,$0002,$0003,$0004
LongData:
DC.L $00000001,$00000002,$00000004,$00000008
MyString:
DC.B "Hello World!",0 ;a null terminator will not be automatically placed.
even

3
Task/Quoting-constructs/68000-Assembly/quoting-constructs-2.68000 Normal file
View file

@ -0,0 +1,3 @@
DS.B 8 ;8 bytes, each equals 0
DS.W 16 ;16 words, each equals zero
DS.L 20 ;20 longs, each equals zero

6
Task/Quoting-constructs/68000-Assembly/quoting-constructs-3.68000 Normal file
View file

@ -0,0 +1,6 @@
ScreenSize equ $1200
MOVE.W (MyData),D0
MyData
DC.W ScreenSize

5
Task/Quoting-constructs/68000-Assembly/quoting-constructs-4.68000 Normal file
View file

@ -0,0 +1,5 @@
Printstring:
;insert your code here
FunctionTable:
DC.L PrintString ;represents the address of the function "PrintString"

4
Task/Quoting-constructs/68000-Assembly/quoting-constructs-5.68000 Normal file
View file

@ -0,0 +1,4 @@
DC.B $0200>>3 ;evaluates to $0040. As long as the final result fits within the designated storage size, you're good.
DC.W 4+5 ;evaluates to $0009
DC.W (40*30)-1 ;evaluates to $1199
DC.L MyFunction+4 ;evaluates to the address of MyFunction, plus 4.

21
Task/Quoting-constructs/68000-Assembly/quoting-constructs-6.68000 Normal file
View file

@ -0,0 +1,21 @@
TilemapCollision:
DC.B $11,$11,$11,$11,$11,$11,$11,$11,$11,$11
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $11,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $10,$00,$00,$00,$00,$00,$00,$00,$00,$01
DC.B $11,$11,$11,$11,$11,$11,$11,$11,$11,$11
TilemapCollisionEnd:
MOVE.W #(TilemapCollisionEnd-TilemapCollision)-1,D0
;gets the length of this region of memory, minus 1, into D0.
; Again, even though the "operands" of this expression are longs,
; their difference fits in 16 bits and that's all that matters.