1 DEFINT A-Z

autoexec.bas

1 DEFINT A-Z
10 BLOAD"PROGRAM.BIN"
1000 P=&HB000:N=PEEK(P+1)*256+PEEK(P):P=P+2
1010 COLOR 1,15,15:SCREEN 7:S=2
1100 FOR I=1 TO N
1120 T=PEEK(P):X=PEEK(P+1):Y=PEEK(P+2)
1125 IF T THEN LINE-(X*S,Y) ELSE PRESET(X*S,Y)
1130 P=P+3:NEXT
1135 PAINT(256,79):PAINT(280,50)
1140 GOTO 1140

options.json

{"asm":{"filename":"program.bin","build":"bin"},"basic":{}}

program.asm

org 0B000h

dw 1065
db 0,96,11,1,99,10,1,105,10,1,102,10,1,96,11,0,103,10,1,108,11,1,114,13,1,111,11,1,103,10
db 0,77,15,1,84,12,1,96,13,1,92,12,1,88,11,1,81,13,1,77,15,0,99,12,1,101,12,1,107,12
db 1,107,11,1,99,12,0,116,13,1,117,16,1,118,20,1,118,17,1,120,21,1,121,21,1,124,22,1,130,18
db 1,124,21,1,121,21,1,127,17,1,127,18,1,129,14,1,127,17,1,122,21,1,121,20,1,121,20,1,119,17
db 1,118,16,1,116,13,0,83,14,1,77,16,1,80,15,1,75,16,1,73,15,1,74,16,1,72,15,1,72,15
db 1,75,17,1,78,17,1,73,18,1,76,18,1,81,16,1,84,16,1,83,14,0,84,15,1,84,15,1,83,15
db 1,83,15,1,84,15,0,133,15,1,133,16,1,133,15,0,127,18,1,124,21,1,127,18,0,79,19,1,79,19
db 1,69,22,1,72,23,1,78,20,1,81,19,1,79,19,0,99,20,1,103,21,1,97,22,1,89,25,1,83,28
db 1,91,25,1,105,21,1,108,21,1,106,20,1,110,20,1,114,21,1,123,27,1,126,29,1,128,30,1,130,33
db 1,132,37,1,134,40,1,133,41,1,129,43,1,127,41,1,124,39,1,113,38,1,103,43,1,101,45,1,100,49
db 1,97,50,1,91,52,1,93,49,1,90,50,1,93,48,1,91,47,1,94,43,1,91,45,1,86,49,1,90,47
db 1,91,48,1,89,51,1,92,50,1,90,53,1,84,55,1,82,55,1,80,56,1,77,56,1,74,59,1,77,74
db 1,84,77,1,89,80,1,91,75,1,89,79,1,84,76,1,74,67,1,74,60,1,81,57,1,84,58,1,86,57
db 1,93,54,1,98,52,1,102,53,1,105,56,1,117,60,1,121,61,1,124,60,1,129,46,1,131,46,1,133,48
db 1,138,53,1,140,57,1,137,60,1,136,63,1,138,62,1,136,65,1,136,64,1,137,70,1,133,70,1,129,73
db 1,123,80,1,121,82,1,121,87,1,122,89,1,125,88,1,133,87,1,133,82,1,135,77,1,137,74,1,134,73
db 1,129,75,1,133,71,1,135,71,1,138,72,1,138,74,1,135,81,1,135,86,1,135,88,1,133,90,1,125,90
db 1,124,93,1,127,92,1,132,92,1,132,91,1,133,91,1,133,95,1,132,104,1,129,109,1,125,111,1,115,111
db 1,120,113,1,110,114,1,120,115,1,119,117,1,117,122,1,114,127,1,108,153,1,106,166,1,106,162,1,104,158
db 1,102,152,1,98,145,1,96,138,1,93,134,1,90,127,1,82,104,1,81,95,1,81,90,1,83,85,1,84,80
db 1,83,83,1,82,84,1,80,85,1,78,84,1,80,87,1,75,90,1,73,92,1,72,92,1,69,93,1,70,90
db 1,69,91,1,69,88,1,68,87,1,68,87,1,64,86,1,61,83,1,65,87,1,69,89,1,68,88,1,67,90
db 1,69,91,1,68,93,1,72,93,1,69,94,1,69,94,1,72,94,1,67,101,1,64,103,1,57,105,1,49,108
db 1,45,110,1,38,113,1,34,118,1,30,119,1,21,126,1,17,132,1,10,144,1,14,139,1,18,132,1,21,127
db 1,36,118,1,41,117,1,46,115,1,50,114,1,53,112,1,56,112,1,63,110,1,62,112,1,60,117,1,54,129
db 1,53,133,1,52,135,1,54,137,1,57,139,1,63,141,1,58,146,1,55,150,1,53,153,1,54,155,1,55,160
db 1,57,167,1,60,173,1,62,178,1,67,185,1,65,182,1,63,176,1,57,161,1,55,156,1,54,154,1,57,151
db 1,63,144,1,66,141,1,57,137,1,54,135,1,54,133,1,57,128,1,61,119,1,63,113,1,65,109,1,68,104
db 1,72,96,1,76,92,1,77,89,1,78,89,1,79,90,1,78,95,1,77,101,1,75,109,1,75,114,1,74,119
db 1,74,129,1,74,158,1,74,168,1,73,175,1,72,200,1,73,194,1,74,178,1,75,168,1,75,160,1,75,152
db 1,75,146,1,77,141,1,80,136,1,94,150,1,102,158,1,104,162,1,104,173,1,100,180,1,98,186,1,95,193
db 1,95,199,1,96,195,1,97,191,1,103,180,1,109,172,1,118,150,1,122,142,1,125,138,1,126,142,1,128,154
db 1,129,157,1,131,165,1,131,171,1,133,183,1,134,187,1,135,191,1,137,197,1,137,197,1,137,194,1,135,190
db 1,135,186,1,133,179,1,131,163,1,128,154,1,128,148,1,126,139,1,125,129,1,125,118,1,125,113,1,128,111
db 1,132,108,1,145,115,1,137,119,1,132,121,1,136,125,1,141,130,1,144,133,1,144,135,1,143,139,1,142,144
db 1,141,151,1,141,158,1,140,174,1,140,177,1,140,193,1,141,190,1,141,185,1,141,179,1,141,172,1,141,165
db 1,142,151,1,143,145,1,144,136,1,145,132,1,142,129,1,138,126,1,134,121,1,139,120,1,142,118,1,145,116
db 1,146,115,1,143,113,1,136,109,1,133,106,1,133,105,1,136,104,1,142,105,1,153,109,1,157,112,1,158,114
db 1,161,119,1,163,127,1,165,130,1,163,122,1,166,126,1,164,120,1,169,128,1,172,131,1,177,137,1,179,139
db 1,180,141,1,185,148,1,191,159,1,194,163,1,199,167,1,201,168,1,200,167,1,197,163,1,195,161,1,193,158
db 1,191,154,1,187,148,1,183,143,1,182,141,1,180,139,1,173,131,1,169,122,1,163,116,1,158,111,1,153,108
db 1,143,103,1,134,103,1,135,92,1,136,88,1,135,82,1,139,72,1,137,66,1,138,65,1,139,61,1,142,60
db 1,144,60,1,147,57,1,145,44,1,140,40,1,136,40,1,134,37,1,134,34,1,131,31,1,128,28,1,122,24
db 1,117,21,1,113,19,1,110,19,1,106,19,1,104,20,1,99,20,0,78,19,1,78,19,1,78,19,0,77,19
db 1,78,20,1,77,19,0,121,21,1,121,21,1,121,21,0,60,31,1,68,28,1,73,27,1,70,27,1,77,22
db 1,73,24,1,69,27,1,62,29,1,60,31,0,120,22,1,121,23,1,120,22,0,62,32,1,62,32,1,62,32
db 1,65,31,1,72,29,1,69,29,1,62,32,0,83,32,1,89,29,1,87,30,1,83,32,0,89,30,1,87,35
db 1,89,33,1,87,37,1,89,32,1,90,30,1,89,30,0,63,32,1,61,34,1,56,37,1,53,41,1,56,38
db 1,61,35,1,64,33,1,67,33,1,71,33,1,67,33,1,63,32,0,102,33,1,102,34,1,101,35,1,100,36
db 1,98,38,1,97,40,1,102,39,1,108,36,1,112,34,1,110,33,1,105,32,1,104,33,1,102,33,0,111,35
db 1,104,37,1,101,38,1,102,36,1,109,33,1,111,35,0,75,34,1,82,34,1,77,33,1,75,34,0,74,38
db 1,76,36,1,81,36,1,79,35,1,74,38,0,57,38,1,60,38,1,63,36,1,57,38,0,84,39,1,90,36
db 1,86,38,1,84,39,0,57,40,1,62,37,1,57,40,0,91,39,1,84,41,1,89,40,1,91,39,0,50,42
db 1,50,42,1,56,41,1,60,39,1,50,42,0,117,40,1,113,47,1,113,51,1,113,53,1,111,53,1,111,50
db 1,117,40,0,123,40,1,121,40,1,123,40,0,91,40,1,84,42,1,87,43,1,91,40,1,91,40,0,113,40
db 1,110,42,1,109,41,1,110,40,1,113,40,0,118,41,1,119,41,1,118,43,1,116,44,1,115,46,1,120,43
db 1,117,48,1,122,45,1,118,48,1,117,50,1,123,45,1,117,51,1,118,52,1,118,53,1,119,52,1,119,53
db 1,123,50,1,120,53,1,119,55,1,119,55,1,121,55,1,121,56,1,123,55,1,124,55,1,117,56,1,115,44
db 1,118,41,0,126,41,1,126,42,1,126,41,0,108,42,1,108,43,1,105,45,1,105,44,1,108,42,0,136,45
db 1,136,42,1,136,45,0,75,47,1,77,44,1,83,44,1,80,42,1,75,47,0,141,42,1,139,43,1,141,42
db 0,142,42,1,142,43,1,142,42,0,48,43,1,52,45,1,52,45,1,50,45,1,54,45,1,49,50,1,58,48
db 1,55,49,1,50,50,1,55,45,1,59,44,1,54,44,1,48,43,0,72,43,1,74,45,1,72,43,0,143,43
db 1,140,45,1,143,43,0,78,45,1,81,44,1,78,45,0,66,45,1,70,46,1,66,45,0,131,45,1,131,45
db 1,131,45,0,129,45,1,129,45,1,129,45,0,128,46,1,128,47,1,127,47,1,128,46,0,71,46,1,71,46
db 1,71,46,0,104,47,1,109,48,1,105,49,1,105,52,1,105,53,1,105,54,1,102,52,1,102,51,1,104,47
db 0,145,47,1,146,49,1,143,50,1,145,48,1,144,48,1,145,47,0,136,48,1,136,49,1,136,48,0,128,50
db 1,128,50,1,128,50,0,80,50,1,79,55,1,82,54,1,80,54,1,80,50,0,54,51,1,50,55,1,52,54
db 1,50,60,1,51,57,1,56,53,1,53,54,1,55,51,1,54,51,0,146,52,1,144,53,1,146,52,0,47,55
db 1,52,52,1,49,53,1,47,55,0,63,54,1,66,54,1,69,53,1,62,58,1,65,56,1,68,54,1,72,53
db 1,63,54,0,92,59,1,92,58,1,92,56,1,94,54,1,91,57,1,91,58,1,91,60,1,92,59,0,110,57
db 1,107,55,1,108,55,1,109,56,1,110,57,0,124,58,1,120,59,1,112,55,1,114,54,1,115,56,1,118,58
db 1,124,58,0,126,55,1,125,56,1,126,55,0,143,56,1,143,56,1,143,56,0,87,59,1,87,61,1,88,59
db 1,87,58,1,85,58,1,87,59,0,56,58,1,63,60,1,60,60,1,56,58,0,89,58,1,88,58,1,89,62
db 1,88,64,1,89,64,1,88,66,1,91,64,1,91,65,1,93,59,1,91,63,1,90,63,1,89,58,0,126,63
db 1,130,64,1,132,62,1,134,61,1,134,61,1,133,59,1,130,62,1,128,64,1,126,63,0,55,59,1,50,65
db 1,50,66,1,55,62,1,55,59,1,55,59,0,84,74,1,82,72,1,78,60,1,80,59,1,76,63,1,80,73
db 1,84,74,0,141,60,1,140,60,1,141,60,0,58,61,1,62,62,1,58,61,0,80,62,1,82,68,1,81,65
db 1,81,62,1,80,62,0,118,78,1,120,73,1,122,69,1,122,67,1,123,63,1,120,67,1,118,78,0,67,68
db 1,67,67,1,68,69,1,68,66,1,69,63,1,67,68,0,83,65,1,82,67,1,83,65,1,83,65,0,134,66
db 1,135,68,1,135,66,1,134,66,0,49,66,1,53,69,1,49,67,1,54,67,1,54,66,1,49,66,0,54,67
db 1,60,67,1,58,67,1,54,67,0,86,67,1,86,69,1,85,70,1,84,72,1,85,72,1,88,71,1,86,67
db 0,69,67,1,70,70,1,69,67,1,69,67,0,49,69,1,52,70,1,49,69,0,54,70,1,52,75,1,54,70
db 0,111,82,1,112,80,1,114,74,1,112,76,1,111,82,0,74,74,1,73,79,1,71,79,1,75,78,1,75,74
db 1,74,74,0,61,75,1,60,78,1,58,78,1,53,75,1,60,78,1,56,81,1,59,80,1,61,75,0,79,81
db 1,79,79,1,80,77,1,79,81,0,81,78,1,80,83,1,81,80,1,81,78,1,81,78,0,66,78,1,69,81
db 1,71,84,1,66,78,0,60,80,1,60,82,1,59,81,1,60,83,1,64,84,1,61,82,1,60,80,0,83,81
db 1,79,84,1,77,83,1,81,84,1,83,81,0,83,84,1,82,85,1,83,84,0,118,84,1,116,88,1,115,87
db 1,115,90,1,119,98,1,117,90,1,117,86,1,118,84,0,120,86,1,121,93,1,121,93,1,122,93,1,120,90
db 1,120,86,0,72,93,1,72,93,1,72,93,0,112,93,1,110,99,1,113,98,1,112,93,0,79,94,1,81,103
db 1,83,114,1,89,127,1,93,136,1,95,140,1,98,147,1,102,157,1,100,155,1,97,152,1,86,141,1,82,136
db 1,80,135,1,79,136,1,76,142,1,75,140,1,75,130,1,75,124,1,76,117,1,76,109,1,77,103,1,79,94
db 1,79,94,0,124,97,1,126,96,1,129,96,1,124,97,0,95,111,1,95,113,1,95,113,1,96,108,1,94,102
db 1,93,99,1,92,99,1,93,102,1,93,108,1,93,111,1,95,111,0,99,102,1,101,106,1,104,106,1,103,104
db 1,99,102,0,66,103,1,64,108,1,59,110,1,45,115,1,40,117,1,38,117,1,38,114,1,43,112,1,50,109
db 1,62,105,1,66,103,0,120,104,1,124,107,1,126,106,1,124,105,1,120,104,0,86,111,1,92,120,1,95,122
db 1,93,119,1,89,115,1,86,111,0,124,113,1,124,123,1,122,124,1,123,127,1,125,130,1,125,133,1,125,136
db 1,123,138,1,117,148,1,111,163,1,104,176,1,107,169,1,108,158,1,109,153,1,112,139,1,115,128,1,116,124
db 1,124,113,1,124,113,0,124,124,1,124,128,1,122,124,1,124,124,0,163,140,1,165,154,1,165,150,1,164,144
db 1,163,140,0,149,141,1,150,149,1,152,166,1,152,161,1,150,146,1,149,141,0,146,143,1,148,160,1,149,164
db 1,150,165,1,149,159,1,148,153,1,147,143,1,146,143,0,169,144,1,167,156,1,165,162,1,167,159,1,170,148
db 1,169,144,0,156,149,1,156,150,1,156,149,0,180,149,1,179,154,1,178,164,1,179,171,1,179,167,1,179,155
db 1,180,149,1,180,149,0,157,150,1,160,156,1,161,150,1,160,150,1,160,156,1,158,153,1,157,150,0,28,183
db 1,26,167,1,28,172,1,30,185,1,30,193,1,30,190,1,30,186,1,29,172,1,26,163,1,27,160,1,26,152
db 1,25,154,1,25,158,1,26,164,1,26,170,1,26,177,1,27,181,1,28,183,0,26,153,1,26,159,1,26,153
db 0,31,154,1,31,157,1,32,163,1,35,178,1,35,187,1,35,184,1,35,179,1,33,162,1,31,154,1,31,154
db 0,182,179,1,182,179,1,169,179,1,172,177,1,179,173,1,183,171,1,179,173,1,171,177,1,169,178,1,168,179
db 1,172,180,1,182,179,0,100,190,1,99,193,1,100,190