Date: Mon, 25 Jan 93 12:52:07 MST
From: dougc@bert.cs.byu.edu (Douglas R. Cannon)
Organization: BYU, Provo, Utah
Newsgroups: comp.sys.hp48
Subject: misc DIAMONDS sounds
Distribution: world

Hello everyone.

I have finally finished Diamonds 1.0 for the HP48, but I still can't post
it until later this week.  (OK!  It's not TOTALLY finished, but the main
code is finished).

I had a lot of fun making the various sounds for the game, and I thought
some of you might be interested in these.  I have extracted each of the
sounds from the main code and assembled them as individual code objects.

Each sound is only an average of 43 bytes long, but each one also has
some code added to check for the BEEP flag, plus other stuff, so the
actual average is closer to 77 bytes.

Oh yeah, if your BEEP is turned off, then these sounds will be silent.

I am posting a directory of the 14 sounds used in the game Diamonds, so
that you can play with them as you wish.  The following directory contains
these objects:

INERR:  The error sound when you're entering initials (or level #)
BLIP:   Just a blip when you toggle sound on.
HIGH:   The sound when you have just acheived a new high score
BLIFE:  You've just receive an extra life.
BTICK:  Bonus ticks
ELOCK:  When you hit a lock brick
EKEY:   When you hit a key brick
DARR:   When you hit a double arrow brick
EB:     When you erase a brick
EMC:    When you change the erase mode
DEAD:   When you die
WALL:   When you hit a wall
ED:     When you erase a diamond brick
MUSIC:  The cute little tune it makes when you complete a level.

Most of these sounds will sound kind of stupid by themselves, but I put them
in there anyway.

I will also be posting the source code for these sounds, since that will
probably be of greater interest.

Enjoy!

Douglas R. Cannon

BEGIN_ASC
%%HP: T(1)A(D)F(.);
"69A20FF74D7000000050D45535943450CCD20D7000208FB9760808F1B2D60715
A0808636063403408000D73481000D532008801DBCE5DFD2801DBCE5DFCD52E3
401000E38AFBC80808F2D760142164808C0900020544420CCD2067000208FB97
60808F1B2D60715A080863606C303466000D732008801DBCE5DFD28013466000
EBCE5DFCF34050008B32D80808F2D760142164808C38000407514C4C440CCD20
07000208FB9760808F1B2D60715A0808636066303480000D7320088013405000
CE5DFD28013482000CE5DFCF58D80808F2D760142164808C1800040445414444
0CCD2068000208FB9760808F1B2D60715A080863606C403409000D73420000D5
32008801DBCE5DFD28013402000CE5DFCD5DD818F3134001008A72C80808F2D7
60142164808C790003054D43430CCD2007000208FB9760808F1B2D60715A0808
636066303401000D7320088013407000CE5DFD28013402000CE5DFCF58D80808
F2D760142164808CF700020542420CCD2007000208FB9760808F1B2D60715A08
08636066303470000D7320088013402000CE5DFD28013404000CE5DFCF58D808
08F2D760142164808CD7000404414252540CCD2068000208FB9760808F1B2D60
715A080863606C403408000D73420000D532008801DBCE5DFD28013401000CE5
DFCD5DD818FB334050008B32C80808F2D760142164808C790004054B4549540C
CD2079000208FB9760808F1B2D60715A080863606D503412000D73430000D532
008801DBCE5DFD2801DBCE5DFCD52E34030008B7C0818FBE64CF818F3F344300
08A71B80808F2D760142164808C8A0005054C4F434B450CCD201A000208FB976
0808F1B2D60715A0808636067603409000D73480000D532008801DBCE5DFD280
1DBCE5DFCD52E34090008B7B13405000E334140008A33165BF3415000C368AF8
0808F2D760142164808C4B0005024459434B450CCD2018000208FB9760808F1B
2D60715A0808636067403401000D73406000D532008801D9CE5DFD2801D98082
402000E2CE5DF818F91CF50D80808F2D760142164808C490005024C494645450
CCD2019000208FB9760808F1B2D60715A0808636067503451000D7D03430000D
532008801DBCE5DFD2801DBCE5DFCD52E8AC90CF8AFDC808201E734510008A79
B80808F2D760142164808C4A000408494748440CCD204A000208FB9760808F1B
2D60715A080863606A6034F4000D5D03440000D732008801D9CE5DFD2801D9CE
5DFCF52E8AC52818F995BC80824F4000818F19818F1962BF818F198B06A80808
F2D760142164808C5B0004024C4940540CCD2017000208FB9760808F1B2D6071
5A0808636067308082402000320088013421000CE5DFD280134E0000CE5DFCC5
8D80808F2D760142164808C280005094E454252550CCD2007000208FB9760808
F1B2D60715A0808636066303480000D7320088013408000CE5DFD28013408000
CE5DFCF58D80808F2D760142164808C880A"
END_ASC

BEGIN_UU
begin 644 SOUNDS.DIR
M2%!(4#0X+466*O!_U`<````%355324,%S"W0!P`"^)MG@(`?*VUP40H(:&-@W
M0S`$"`!]0Q@`T#4"@`C1RU[]+0C1RU[]W"4^!`$`/JB_C("`+WT&01)&",B09
M`"!01"3`W`)V`""`OWD&"/BQT@87I8"`-@;&`T-F`-`W`H`(T<M>_2T(,60&V
M`+[LU<\_!`4`N".-@(`O?09!$D8(R(,`0'`5Q,1$P-P"<``@@+]Y!@CXL=(&I
M%Z6`@#8&9@-#"`#0-P*`"#$$!0#LU=^"$$,H`,!>_?R%C8"`+WT&01)&",B!P
M`$!`5!1$1,#<`H8`(("_>08(^+'2!A>E@(`V!L8$0Y``T#<D``!=(P"($+WL+
MU=^"$$,@`,!>_=S5C8$_,000`*@GC("`+WT&01)&",B7`#!0U#0TP-P"<``@[
M@+]Y!@CXL=(&%Z6`@#8&9@-#$`#0-P*`"#$$!P#LU=^"$$,@`,!>_?R%C8"`A
M+WT&01)&",A_`"!0)"3`W`)P`""`OWD&"/BQT@87I8"`-@9F`T,'`-`W`H`(@
M,00"`.S5WX(00T``P%[]_(6-@(`O?09!$D8(R'T`0$`4)"5%P-P"A@`@@+]YY
M!@CXL=(&%Z6`@#8&Q@1#@`#0-R0``%TC`(@0O>S5WX(00Q``P%[]W-6-@;\S_
M!`4`N".,@(`O?09!$D8(R)<`0%"T5)1%P-P"EP`@@+]Y!@CXL=(&%Z6`@#8&+
MU@5#(0#0-S0``%TC`(@0O>S5WX(0O>S5SUWB0S``@'L,&/CK1OP8^/-#-`"`G
M>K$("/C29Q`D882`C`H`!45,3T-+!<PM$`H``OB;9X"`'RMM<%$*"&AC8&<P(
M!`D`?4,(`-`U`H`(T<M>_2T(T<M>_=PE/@0)`+BW,00%`#Y#00"`.A-6^T-1R
M`,!CJ(^`@"]]!D$21@C(M`!0($25-+14P-P"@0`@@+]Y!@CXL=(&%Z6`@#8&*
M=@1#$`#0-P0&`%TC`(@0G>S5WX(0G0@H!`(`+NS5CX&?P5_0"`CXTF<0)&&$\
M@$P)``5"3$E&107,+1`)``+XFV>`@!\K;7!1"@AH8V!7,%0!`'T-0P,`T#4"\
M@`C1RU[]+0C1RU[]W"6.R@G\J-^,@`+A-U0!`*B7BX"`+WT&01)&",BD`$"`X
ME'2$1,#<`J0`(("_>08(^+'2!A>E@(`V!J8&0T\`T-4P1```?2,`B!"=[-7?8
M@A"=[-7/7^*H7(*!GUG+""CT!``8^)$8^)$F^QCXD;A@BH"`+WT&01)&",BU\
M`$`@Q)0$1<#<`G$`(("_>08(^+'2!A>E@(`V!G8#""@$`@`C`(@00Q(`P%[])
M+0@QY```[-7/7-@("/C29Q`D882`+`@`!4E.15)2!<PM``<``OB;9X"`'RMMQ
M<%$*"&AC8#8PA```?2,`B!!#@`#`7OTM"#$$"`#LU<]?V`@(^-)G$"1AA(`,>
``
end
END_UU

Newsgroups: comp.sys.hp48