Home » Archimedes archive » Acorn User » AU 1995-12 B.adf » Spobbleoid » !SpobDemo/Disc2/Spobble/Gameover

!SpobDemo/Disc2/Spobble/Gameover

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Acorn User » AU 1995-12 B.adf » Spobbleoid
Filename: !SpobDemo/Disc2/Spobble/Gameover
Read OK:
File size: 03A8 bytes
Load address: 0000
Exec address: 0000
File contents
   10 REM ><Disc2>.Spobble.Gameover
   20 MODE12:OFF:IF L%=3 PROCWON ELSE PROCDEAD
   30 PRINT"BUY THE FULL VERSION AT A MERE �29.95 FROM 4TH DIMENSION"
   31 PRINT'"AND GET 72 LEVELS, A LEVEL DESIGNER AND A HOST OF ADDITIONAL GAME FEATURES!"
   40 A=INKEY(600):CLS
   50 MODE9:OFF
   60 *TUNING 0
   70 VOICES 4:*FX15
   80 *CHANNELVOICE 1 ExtensionMod
   90 *CHANNELVOICE 2 ExtensionMod
  100 *CHANNELVOICE 3 ExtensionMod
  110 *CHANNELVOICE 4 ExtensionMod
  120 SYS"ExS_MusicStop":SYS"ExS_SampleRate",4:SYS"ExS_MusicVolume",127
  130 *SET Sounds$Dir <Disc2>.SPOBBLE.DATA
  140 SDAT=&15000:MDAT=SDAT+80*1024:SYS"ExS_Workspace",SDAT,80*1024:SYS"ExS_MusicWork",MDAT,10*1024
  150 *MUSICLOAD <Disc2>.SPOBBLE.DATA.PFTS
  160 SOUND1,-15,0,0:SOUND2,-15,0,0:SOUND3,-15,0,0:SOUND4,-15,0,0
  170 CHAIN"<Disc2>.Spobble.Starter2"
  180 DEFPROCWON
  190 PRINT''"CONGRATULATIONS YOU STAR!"
  200 PRINT'" WHAT YOU WANT TO DO NOW REALLY...IS...."'':ENDPROC
  210 DEFPROCDEAD
  220 PRINT''"OH DEAR A DEMISE..."
  230 PRINT'" ON THE FULL VERSION YOU COULD PROBABLY ENTER YOUR NAME...SO..."'':ENDPROC

  � ><Disc2>.Spobble.Gameover
 �12:�:� L%=3 �WON � �DEAD
@ �"BUY THE FULL VERSION AT A MERE �29.95 FROM 4TH DIMENSION"
T �'"AND GET 72 LEVELS, A LEVEL DESIGNER AND A HOST OF ADDITIONAL GAME FEATURES!"
( A=�(600):�
2	 �9:�
< *TUNING 0
F Ƞ 4:*FX15
P! *CHANNELVOICE 1 ExtensionMod
Z! *CHANNELVOICE 2 ExtensionMod
d! *CHANNELVOICE 3 ExtensionMod
n! *CHANNELVOICE 4 ExtensionMod
xC ș"ExS_MusicStop":ș"ExS_SampleRate",4:ș"ExS_MusicVolume",127
�) *SET Sounds$Dir <Disc2>.SPOBBLE.DATA
�` SDAT=&15000:MDAT=SDAT+80*1024:ș"ExS_Workspace",SDAT,80*1024:ș"ExS_MusicWork",MDAT,10*1024
�) *MUSICLOAD <Disc2>.SPOBBLE.DATA.PFTS
�0 �1,-15,0,0:�2,-15,0,0:�3,-15,0,0:�4,-15,0,0
�  �"<Disc2>.Spobble.Starter2"
�
 ��WON
�# �''"CONGRATULATIONS YOU STAR!"
�5 �'" WHAT YOU WANT TO DO NOW REALLY...IS...."'':�
� ��DEAD
� �''"OH DEAR A DEMISE..."
�L �'" ON THE FULL VERSION YOU COULD PROBABLY ENTER YOUR NAME...SO..."'':�
�
00000000  0d 00 0a 20 20 f4 20 3e  3c 44 69 73 63 32 3e 2e  |...  . ><Disc2>.|
00000010  53 70 6f 62 62 6c 65 2e  47 61 6d 65 6f 76 65 72  |Spobble.Gameover|
00000020  0d 00 14 1e 20 eb 31 32  3a 87 3a e7 20 4c 25 3d  |.... .12:.:. L%=|
00000030  33 20 f2 57 4f 4e 20 8b  20 f2 44 45 41 44 0d 00  |3 .WON . .DEAD..|
00000040  1e 40 20 f1 22 42 55 59  20 54 48 45 20 46 55 4c  |.@ ."BUY THE FUL|
00000050  4c 20 56 45 52 53 49 4f  4e 20 41 54 20 41 20 4d  |L VERSION AT A M|
00000060  45 52 45 20 a3 32 39 2e  39 35 20 46 52 4f 4d 20  |ERE .29.95 FROM |
00000070  34 54 48 20 44 49 4d 45  4e 53 49 4f 4e 22 0d 00  |4TH DIMENSION"..|
00000080  1f 54 20 f1 27 22 41 4e  44 20 47 45 54 20 37 32  |.T .'"AND GET 72|
00000090  20 4c 45 56 45 4c 53 2c  20 41 20 4c 45 56 45 4c  | LEVELS, A LEVEL|
000000a0  20 44 45 53 49 47 4e 45  52 20 41 4e 44 20 41 20  | DESIGNER AND A |
000000b0  48 4f 53 54 20 4f 46 20  41 44 44 49 54 49 4f 4e  |HOST OF ADDITION|
000000c0  41 4c 20 47 41 4d 45 20  46 45 41 54 55 52 45 53  |AL GAME FEATURES|
000000d0  21 22 0d 00 28 0f 20 41  3d a6 28 36 30 30 29 3a  |!"..(. A=.(600):|
000000e0  db 0d 00 32 09 20 eb 39  3a 87 0d 00 3c 0e 20 2a  |...2. .9:...<. *|
000000f0  54 55 4e 49 4e 47 20 30  0d 00 46 0f 20 c8 a0 20  |TUNING 0..F. .. |
00000100  34 3a 2a 46 58 31 35 0d  00 50 21 20 2a 43 48 41  |4:*FX15..P! *CHA|
00000110  4e 4e 45 4c 56 4f 49 43  45 20 31 20 45 78 74 65  |NNELVOICE 1 Exte|
00000120  6e 73 69 6f 6e 4d 6f 64  0d 00 5a 21 20 2a 43 48  |nsionMod..Z! *CH|
00000130  41 4e 4e 45 4c 56 4f 49  43 45 20 32 20 45 78 74  |ANNELVOICE 2 Ext|
00000140  65 6e 73 69 6f 6e 4d 6f  64 0d 00 64 21 20 2a 43  |ensionMod..d! *C|
00000150  48 41 4e 4e 45 4c 56 4f  49 43 45 20 33 20 45 78  |HANNELVOICE 3 Ex|
00000160  74 65 6e 73 69 6f 6e 4d  6f 64 0d 00 6e 21 20 2a  |tensionMod..n! *|
00000170  43 48 41 4e 4e 45 4c 56  4f 49 43 45 20 34 20 45  |CHANNELVOICE 4 E|
00000180  78 74 65 6e 73 69 6f 6e  4d 6f 64 0d 00 78 43 20  |xtensionMod..xC |
00000190  c8 99 22 45 78 53 5f 4d  75 73 69 63 53 74 6f 70  |.."ExS_MusicStop|
000001a0  22 3a c8 99 22 45 78 53  5f 53 61 6d 70 6c 65 52  |":.."ExS_SampleR|
000001b0  61 74 65 22 2c 34 3a c8  99 22 45 78 53 5f 4d 75  |ate",4:.."ExS_Mu|
000001c0  73 69 63 56 6f 6c 75 6d  65 22 2c 31 32 37 0d 00  |sicVolume",127..|
000001d0  82 29 20 2a 53 45 54 20  53 6f 75 6e 64 73 24 44  |.) *SET Sounds$D|
000001e0  69 72 20 3c 44 69 73 63  32 3e 2e 53 50 4f 42 42  |ir <Disc2>.SPOBB|
000001f0  4c 45 2e 44 41 54 41 0d  00 8c 60 20 53 44 41 54  |LE.DATA...` SDAT|
00000200  3d 26 31 35 30 30 30 3a  4d 44 41 54 3d 53 44 41  |=&15000:MDAT=SDA|
00000210  54 2b 38 30 2a 31 30 32  34 3a c8 99 22 45 78 53  |T+80*1024:.."ExS|
00000220  5f 57 6f 72 6b 73 70 61  63 65 22 2c 53 44 41 54  |_Workspace",SDAT|
00000230  2c 38 30 2a 31 30 32 34  3a c8 99 22 45 78 53 5f  |,80*1024:.."ExS_|
00000240  4d 75 73 69 63 57 6f 72  6b 22 2c 4d 44 41 54 2c  |MusicWork",MDAT,|
00000250  31 30 2a 31 30 32 34 0d  00 96 29 20 2a 4d 55 53  |10*1024...) *MUS|
00000260  49 43 4c 4f 41 44 20 3c  44 69 73 63 32 3e 2e 53  |ICLOAD <Disc2>.S|
00000270  50 4f 42 42 4c 45 2e 44  41 54 41 2e 50 46 54 53  |POBBLE.DATA.PFTS|
00000280  0d 00 a0 30 20 d4 31 2c  2d 31 35 2c 30 2c 30 3a  |...0 .1,-15,0,0:|
00000290  d4 32 2c 2d 31 35 2c 30  2c 30 3a d4 33 2c 2d 31  |.2,-15,0,0:.3,-1|
000002a0  35 2c 30 2c 30 3a d4 34  2c 2d 31 35 2c 30 2c 30  |5,0,0:.4,-15,0,0|
000002b0  0d 00 aa 20 20 d7 22 3c  44 69 73 63 32 3e 2e 53  |...  ."<Disc2>.S|
000002c0  70 6f 62 62 6c 65 2e 53  74 61 72 74 65 72 32 22  |pobble.Starter2"|
000002d0  0d 00 b4 0a 20 dd f2 57  4f 4e 0d 00 be 23 20 f1  |.... ..WON...# .|
000002e0  27 27 22 43 4f 4e 47 52  41 54 55 4c 41 54 49 4f  |''"CONGRATULATIO|
000002f0  4e 53 20 59 4f 55 20 53  54 41 52 21 22 0d 00 c8  |NS YOU STAR!"...|
00000300  35 20 f1 27 22 20 57 48  41 54 20 59 4f 55 20 57  |5 .'" WHAT YOU W|
00000310  41 4e 54 20 54 4f 20 44  4f 20 4e 4f 57 20 52 45  |ANT TO DO NOW RE|
00000320  41 4c 4c 59 2e 2e 2e 49  53 2e 2e 2e 2e 22 27 27  |ALLY...IS...."''|
00000330  3a e1 0d 00 d2 0b 20 dd  f2 44 45 41 44 0d 00 dc  |:..... ..DEAD...|
00000340  1d 20 f1 27 27 22 4f 48  20 44 45 41 52 20 41 20  |. .''"OH DEAR A |
00000350  44 45 4d 49 53 45 2e 2e  2e 22 0d 00 e6 4c 20 f1  |DEMISE..."...L .|
00000360  27 22 20 4f 4e 20 54 48  45 20 46 55 4c 4c 20 56  |'" ON THE FULL V|
00000370  45 52 53 49 4f 4e 20 59  4f 55 20 43 4f 55 4c 44  |ERSION YOU COULD|
00000380  20 50 52 4f 42 41 42 4c  59 20 45 4e 54 45 52 20  | PROBABLY ENTER |
00000390  59 4f 55 52 20 4e 41 4d  45 2e 2e 2e 53 4f 2e 2e  |YOUR NAME...SO..|
000003a0  2e 22 27 27 3a e1 0d ff                           |."'':...|
000003a8