Web Images Videos Maps News Shopping Gmail more »
Recently Visited Groups | Help | Sign in
Google Groups Home
Kraftwerk's Pocket Claculator on hp
There are currently too many topics in this group that display first. To make this topic appear first, remove this option from another topic.
There was an error processing your request. Please try again.
flag
  3 messages - Expand all  -  Translate all to Translated (View all originals)
The group you are posting to is a Usenet group. Messages posted to this group will make your email address visible to anyone on the Internet.
Your reply message has not been sent.
Your post was successful
 
From:
To:
Cc:
Followup To:
Add Cc | Add Followup-to | Edit Subject
Subject:
Validation:
For verification purposes please type the characters you see in the picture below or the numbers you hear by clicking the accessibility icon. Listen and type the numbers you hear
 
Groves Benjamin Perry  
View profile  
 More options Apr 23 1994, 4:04 pm
Newsgroups: comp.sys.hp48
From: pe...@sol.acs.unt.edu (Groves Benjamin Perry)
Date: 23 Apr 94 19:58:55 GMT
Local: Sat, Apr 23 1994 3:58 pm
Subject: Kraftwerk's Pocket Claculator on hp
        This was given to me to post.  It is the routine to get your hp
to sound similar to the jingle in Kraftwerk's song, "Pocket Calculator".
Enjoy all, and thanks Ted...

-BPG
pe...@unt.edu

------------------------------------------------------------------------

From di9...@yngve.pt.hk-r.se Sat Apr 23 12:14:12 1994
Date: Fri, 22 Apr 94 21:28:19 +0200
From: Teddy Hegeborn <di9...@yngve.pt.hk-r.se>
To: Groves Benjamin Perry <pe...@sol.acs.unt.edu>
Subject: Re: Kraftwerk's "Pocket Calculator"

(Please post this on comp.sys.hp48, my newsreader doesn't like me.)

I've written one.
(It also displays a nice screen.)
I sampled the tones from my record and counted the pulses by hand
in a sample-editor to get the correct frequency and duration.
It's the *old* version of Pocket Calculator, btw, I don't have The Mix.
I got my version from Computer Welt (the record).

Let's see if I can get the program in here..
(This is typed in by hand, so don't trust it to transfer
right into your Hp48)

# 238076d SYSEVAL displays the current menu explicitly.
# 24386d SYSEVAL  runs garbage collect without

<< RCLMENU { "POCK"
"ET " "" "  CA"
"LCUL" "ATOR" }
TMENU # 238076d
SYSEVAL
"  Unt wenn Ich diese
Tasse druckt spielt Er
ein kleines Musikstuck
----------------------
  By pressing down a
 special key it plays
   a litle melody"
1 DISP # 24386d
SYSEVAL
  DO 1502.34 .07266
BEEP .0825833 WAIT
1033.85 .0745833
BEEP .0145833 WAIT
621.18 .070833 BEEP
.00925 WAIT 1496.4
.0694166 BEEP
.0064166 WAIT
1591.51 .079916
BEEP 1034.01
.0715833 BEEP
.00533 WAIT 418.6
.0765 BEEP 1.1515
WAIT 1495.21
.071033 BEPP 210.53
.08475 BEEP 632.35
.0740833 BEEP 358.8
.0800833 BEEP
1028.57 .0629166
BEEP 2526.32 .09625
BEEP 1036.12
.0839166 BEEP
222.77 .07675 BEEP
2747.94 .0744166
BEEP 1.003 WAIT
  UNTIL KEY
  END DROP MENU


Now, I don't know how many of these values that makes sense,
but it plays perfectly on my Hp48sx ROM rev A.

    Reply to author    Forward  
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
Scott C Pettigrew  
View profile  
 More options Apr 23 1994, 6:27 pm
Newsgroups: comp.sys.hp48
From: spett...@engin.umich.edu (Scott C Pettigrew)
Date: 23 Apr 1994 22:26:31 GMT
Local: Sat, Apr 23 1994 6:26 pm
Subject: Re: Kraftwerk's Pocket Claculator on hp
In article <perry.767131135@sol> pe...@sol.acs.unt.edu (Groves Benjamin Perry) writes:

>    This was given to me to post.  It is the routine to get your hp
>to sound similar to the jingle in Kraftwerk's song, "Pocket Calculator".
>Enjoy all, and thanks Ted...

>-BPG
>pe...@unt.edu

[>snip<]

Could someone email me this in binary form?  Or the usual posted form?
I can't seem to get it to work in this form. :(

Scoot
--
==========================================================================
 "...loving goes by haps; some cupid kills with arrows, some with traps!"
===irc nickname:  Geraden======= --Hero  "Much Ado About Nothing"=========
Amateur Radio Callsign:  N8VSI       ,/,,/     email:  spett...@umich.edu


    Reply to author    Forward  
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
holbrook  
View profile  
 More options Apr 24 1994, 12:26 am
Newsgroups: comp.sys.hp48
From: holbr...@ins.infonet.net
Date: 24 Apr 1994 03:53:53 GMT
Local: Sat, Apr 23 1994 11:53 pm
Subject: Re: Kraftwerk's Pocket Claculator on hp
In article <2pc7anINN...@srvr1.engin.umich.edu>, spett...@engin.umich.edu (Scott C Pettigrew) writes:

>In article <perry.767131135@sol> pe...@sol.acs.unt.edu (Groves Benjamin Perry) writes:
>>        This was given to me to post.  It is the routine to get your hp
>>to sound similar to the jingle in Kraftwerk's song, "Pocket Calculator".
>>Enjoy all, and thanks Ted...

>>-BPG
>>pe...@unt.edu

>[>snip<]

>Could someone email me this in binary form?  Or the usual posted form?
>I can't seem to get it to work in this form. :(

It worked fine for me.  Just don't forget to turn USER mode off, and anywhere
in the post that you see a number with two decimal points (ie: ..00925), just
type in one decimal point.  Works great!

Mr. Perry said it worked great on his SX rev. A, but how about on a GX?  The
song works fine, but it sounds a bit fast.  How for to fix it?  Should I just
multiply all the numbers by 2, or some of the numbers, or what?  In general,
how do you convert SX BEEPs to GX BEEPS?  I think there were some posts
concerning this a while back, but I'm not sure.  If you could help, thanks!

>Scoot
>--
>==========================================================================
> "...loving goes by haps; some cupid kills with arrows, some with traps!"
>===irc nickname:  Geraden======= --Hero  "Much Ado About Nothing"=========
>Amateur Radio Callsign:  N8VSI       ,/,,/     email:  spett...@umich.edu

+------------------------------------------+------------------------------- ----+
| "I'm out of it for a little while and    |  Ned 'Nedley' Holbrook            |
|  everybody gets delusions of grandeur."  |    holbr...@ins.infonet.net       |
|      -Han Solo                           |    kidg...@aol.com                |
+------------------------------------------+------------------------------- ----+

    Reply to author    Forward  
You must Sign in before you can post messages.
To post a message you must first join this group.
Please update your nickname on the subscription settings page before posting.
You do not have the permission required to post.
End of messages
« Back to Discussions « Newer topic     Older topic »

Create a group - Google Groups - Google Home - Terms of Service - Privacy Policy
©2009 Google