Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-08 15:29:41 +00:00
Code Issues Projects Releases Wiki Activity

glados: finish title screen

Browse Source 
wasted way more time than should have trying to get 3-color
VMW logo looking right.
This commit is contained in:
Vince Weaver 2017-01-09 11:43:05 -05:00
parent 1c021fa1b1
commit 8906c919bf
5 changed files with 36 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
glados3.3/Makefile
View File

@ -31,9 +31,10 @@ SOUND_TEST.BAS: sound_test.bas
$(TXT2BAS) < sound_test.bas > SOUND_TEST.BAS
glados33.dsk: STILL_ALIVE.BAS OBJECTS.SHAPE SHAPE_TEST.BAS SOUND_TEST.BAS \
PORTAL.BAS CUBE.BAS
PORTAL.BAS CUBE.BAS PORTAL_TITLE.HGR
$(DOS33) -y glados33.dsk SAVE A STILL_ALIVE.BAS
$(DOS33) -y glados33.dsk SAVE B OBJECTS.SHAPE
$(DOS33) -y glados33.dsk SAVE B PORTAL_TITLE.HGR
$(DOS33) -y glados33.dsk SAVE A SHAPE_TEST.BAS
$(DOS33) -y glados33.dsk SAVE A SOUND_TEST.BAS
$(DOS33) -y glados33.dsk SAVE A PORTAL.BAS

BIN
glados3.3/PORTAL_TITLE.HGR Normal file
View File

Binary file not shown.

61
glados3.3/cube.bas
View File

@ -1,24 +1,14 @@
10 HGR
20 HCOLOR=3
' CUBE
'30 HPLOT 0,1 TO 4,1:HPLOT 10,1 TO 14,1
'40 HPLOT 0,2 TO 2,2:HPLOT 12,2 TO 14,2
'50 HPLOT 0,3 TO 1,3:HPLOT 13,3 TO 14,3
'60 HPLOT 0,4 TO 1,4:HPLOT 13,4 TO 14,4
'70 HPLOT 0,6 TO 1,6:HPLOT 13,6 TO 14,6
'80 HPLOT 0,7 TO 1,7:HPLOT 13,7 TO 14,7
'90 HPLOT 0,8 TO 2,8:HPLOT 12,8 TO 14,8
'100 HPLOT 0,9 TO 4,9:HPLOT 10,9 TO 14,9
'
25 X=10:Y=10
30 HPLOT X,Y TO X+3,Y :HPLOT X+5,Y TO X+7,Y:HPLOT X+9,Y TO X+12,Y
40 HPLOT X,Y+1 TO X+2,Y+1: HPLOT X+10,Y+1 TO X+12,Y+1
50 HPLOT X,Y+2 TO X+1,Y+2: HPLOT X+11,Y+2 TO X+12,Y+2
60 HPLOT X,Y+4 TO X+1,Y+4: HPLOT X+11,Y+4 TO X+12,Y+4
70 HPLOT X,Y+5 TO X+1,Y+5: HPLOT X+11,Y+5 TO X+12,Y+5
80 HPLOT X,Y+7 TO X+1,Y+7: HPLOT X+11,Y+7 TO X+12,Y+7
90 HPLOT X,Y+8 TO X+2,Y+8: HPLOT X+10,Y+8 TO X+12,Y+8
100 HPLOT X,Y+9 TO X+3,Y+9:HPLOT X+5,Y+9 TO X+7,Y+9:HPLOT X+9,Y+9 TO X+12,Y+9
31 HPLOT X,Y+1 TO X+2,Y+1: HPLOT X+10,Y+1 TO X+12,Y+1
32 HPLOT X,Y+2 TO X+1,Y+2: HPLOT X+11,Y+2 TO X+12,Y+2
33 HPLOT X,Y+4 TO X+1,Y+4: HPLOT X+11,Y+4 TO X+12,Y+4
34 HPLOT X,Y+5 TO X+1,Y+5: HPLOT X+11,Y+5 TO X+12,Y+5
35 HPLOT X,Y+7 TO X+1,Y+7: HPLOT X+11,Y+7 TO X+12,Y+7
36 HPLOT X,Y+8 TO X+2,Y+8: HPLOT X+10,Y+8 TO X+12,Y+8
37 HPLOT X,Y+9 TO X+3,Y+9:HPLOT X+5,Y+9 TO X+7,Y+9:HPLOT X+9,Y+9 TO X+12,Y+9
' 0123456789012
'0 #### ### ####
'1 ### ###
@ -31,17 +21,32 @@
'8 ### ###
'9 #### ### ####
' HEART
110 HPLOT X+4,Y+3 TO X+5,Y+3:HPLOT X+7,Y+3 TO X+8,Y+3
120 HPLOT X+4,Y+4 TO X+8,Y+4
130 HPLOT X+4,Y+5 TO X+8,Y+5
140 HPLOT X+5,Y+6 TO X+7,Y+6
150 HPLOT X+6,Y+7
'110 HPLOT 5,3 TO 6,3:HPLOT 8,3 TO 9,3
'120 HPLOT 4,4 TO 10,4
'130 HPLOT 4,5 TO 10,5
'140 HPLOT 5,6 TO 9,6
'150 HPLOT 6,7 TO 8,7
'160 HPLOT 7,8
38 HPLOT X+4,Y+3 TO X+5,Y+3:HPLOT X+7,Y+3 TO X+8,Y+3
39 HPLOT X+4,Y+4 TO X+8,Y+4
40 HPLOT X+4,Y+5 TO X+8,Y+5
41 HPLOT X+5,Y+6 TO X+7,Y+6
42 HPLOT X+6,Y+7
'
45 FOR I=0 TO 13:X=100+I:Y=I*10
51 HCOLOR=5:REM RED
52 HPLOT X+0,Y+0 TO X+8,Y+0:HPLOT X+0,Y+1 TO X+8,Y+1
53 HPLOT X+2,Y+2 TO X+6,Y+2:HPLOT X+2,Y+3 TO X+6,Y+3
54 HPLOT X+4,Y+4 TO X+4,Y+5
61 HCOLOR=1:REM GREEN
62 HPLOT X+12,Y+0 TO X+12,Y+1
63 HPLOT X+10,Y+2 TO X+14,Y+2:HPLOT X+10,Y+3 TO X+14,Y+3
64 HPLOT X+8,Y+4 TO X+16,Y+4:HPLOT X+8,Y+5 TO X+16,Y+5
65 HPLOT X+26,Y+0 TO X+26,Y+1
66 HPLOT X+24,Y+2 TO X+28,Y+2:HPLOT X+24,Y+3 TO X+28,Y+3
67 HPLOT X+22,Y+4 TO X+30,Y+4:HPLOT X+22,Y+5 TO X+30,Y+5
71 HCOLOR=2:REM PURPLE
72 HPLOT X+15,Y+0 TO X+23,Y+0:HPLOT X+15,Y+1 TO X+23,Y+1
73 HPLOT X+17,Y+2 TO X+21,Y+2:HPLOT X+17,Y+3 TO X+21,Y+3
74 HPLOT X+19,Y+4 TO X+19,Y+5
75 HPLOT X+29,Y+0 TO X+37,Y+0:HPLOT X+29,Y+1 TO X+37,Y+1
76 HPLOT X+31,Y+2 TO X+35,Y+2:HPLOT X+31,Y+3 TO X+35,Y+3
77 HPLOT X+33,Y+4 TO X+33,Y+5
80 NEXT I
'
200 REM SPRITE EDIT
210 X=0:Y=0:ROT=0:SCALE=1

1
glados3.3/images/chell.piskel Normal file
View File

@ -0,0 +1 @@
{"modelVersion":2,"piskel":{"name":"chell","description":"","fps":0,"height":14,"width":10,"layers":["{\"name\":\"Layer 1\",\"opacity\":1,\"frameCount\":9,\"base64PNG\":\"data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAFoAAAAOCAYAAACvtwvjAAABHElEQVRYhe2W3Q2DMAyEMwTj9LHLMC0TRdeHNsgK/k1NgypOQhUQx8dX21BKKQVExamRGE3LVl37YH2w6ywfWT6H1QxEIUdjNDXIFuwGOQp7OuRmIlqdIzGa/gW0yuTsseFZkw269/dL0GI+AMD6ADVvGeVirOSSergS7D6XBrsHbnnM0s5Fytmg7QdZKLYjWW8l1+5ng2451QfW4pxdyq37XLNB9xtprSD9MVK8ZO4s0JJvLWbZKpatqrABAM/6PqRO94J2GSMxWiVMq+jg2MgCTX/Zh/gWtJRgBuhRZYwOdY8oaO7tf6WKniGpug8XvMbbHOJiIq1KlfV5N0uuIouAppC581HdoJnAG/RR7rHphS2+ZRNhW7oaZK9e6F0Vlyk47nEAAAAASUVORK5CYII=\"}"]}}

BIN
glados3.3/images/portal_title.pcx Normal file
View File

Binary file not shown.