Code: Select all
210 DIM float4 3
220 DIM mem 7
240 PROCassembly
260 CALL start
270 END
300
310 DEF PROCassembly
330 DIM code%% NOTEND AND 2047, code%% 2047
340 FOR I% = 0 TO 2 STEP 2
370 ]^P% = code%%
380 [
400 opt I%
420 .start
430 mov rdx, float4
440 mov [rel mem], rdx
470 ret
490 ]
500 NEXT
520 ENDPROC