Article 114 of comp.sources.apple2: Path: caen!malgudi.oar.net!zaphod.mps.ohio-state.edu!howland.reston.ans.net!gatech!rutgers!igor.rutgers.edu!yoko.rutgers.edu!jac From: jac@yoko.rutgers.edu (Jonathan A. Chandross) Newsgroups: comp.sources.apple2 Subject: v001SRC087: EarPlug -- Change Speaker Volume (GS) Message-ID: Date: 2 May 93 02:53:52 GMT Organization: Rutgers Univ., New Brunswick, N.J. Lines: 92 Approved: jac@paul.rutgers.edu Submitted-by: Steve Drees (drees@plains.nodak.edu) Posting-number: Volume 1, Source:87 Archive-name: util/gs/init/earplug Architecture: ONLY_2gs Version-number: 1.00 Earplug is a simple init which sets the Apple IIGS speaker volume to 3 so as not to wake the children. It requires System 6.0. Enjoy. =Read.Me - -EARPLUG - ------------ -Description ------------ -Earplug is a simple init which sets the Apple IIGS speaker volume to 3 so -as not to wake the children. It requires System 6.0. - ------------- -Installation ------------- -Just copy earplug into */System/System.Setup/ and reboot. - ----------- -LegalStuff ----------- -Earplug is Copyright (c) 1993 by Taco Breath Software. -Earplug contains material from the ORCA/C -Run-Time Libraries, copyright 1987-1992 -by Byte Works, Inc. Used with permission. -Earplug is released as freeware. - - -Steve Drees -drees@plains.nodak.edu -322 N.Columbia Rd -Grand Forks, ND 58203 -Version 1.0 -April 1993 =Manifest -Manifest -Read.Me -earplug.cc -earplug.rez -makefile =earplug.cc -#pragma keep "earplug" - -#pragma rtl - -#include -#include - -void main (void) -{ - word volume; - - volume =3; - WriteBParam(volume,userVolume); - SetSoundVolume(volume,15); -} =earplug.rez -#include "types.rez" -resource rVersion (0x1, purgeable3, nocrossbank) { - { - 0x1, // Major Revision - 0x0, // Minor Revision - 0x1, // Bug version - final, // Release Stage - 0x0 // Non-final Release # - }, - verUS, // Region Code - "earplug", // Program Name - "(c) 1993, Taco Breath Software" // Blurb Line -}; - -resource rComment (0x1) { - "Sets volume to 3. (C) 1993 Taco Breath Software." - }; =makefile -earplug.a: earplug.cc - compile earplug.cc keep=earplug - -earplug: earplug.a earplug.rez - link earplug keep=earplug - compile earplug.rez keep=earplug - filetype earplug tif + END OF ARCHIVE