page%swap@Sun.COM (Bob Page) (05/19/89)
Submitted-by: balzer%frambo.DEC@decwrl.dec.com (Christian Balzer) Posting-number: Volume 89, Issue 151 Archive-name: devices/cb2l.1 This will totally reset your battery backed clock (RTC). Particulary useful if some brain-dead software munged your clock registers in a way that SetClock will give you "Clock not found" type messages. [uuencoded executable included. ..bob] # This is a shell archive. # Remove anything above and including the cut line. # Then run the rest of the file through 'sh'. # Unpacked files will be owned by you and have default permissions. #----cut here-----cut here-----cut here-----cut here----# #!/bin/sh # shar: SHell ARchive # Run the following text through 'sh' to create: # callback2life.asm # CallBack2Life.info.uu # callback2life.uu # This is archive 1 of a 1-part kit. # This archive created: Thu May 18 13:08:38 1989 echo "extracting callback2life.asm" sed 's/^X//' << \SHAR_EOF > callback2life.asm X; CallBack2Life.Asm Copyright 1989 by Andrew Kopp 16-May-89 X; ----------------- X; THIS IS PERHAPS NOT THE BEST BUT AT LEAST ONE WAY TO "CALL BACK TO LIFE" X; THE BATTERY BACKUP CLOCK EVEN IF YOU HAVE YOUR PERSONAL EXPERIENCE X; WITH RESETTING CLOCKS ON HARDWARE LEVEL ! X; AFTER A NONE-MEDITATIONING SYSTEM CRASH MY CLOCK WAS NOT FOUND BY X; THE "SETCLOCK LOAD" COMMAND AND OPTIONAL RESET WON`T WORK (V1.3). X; THIS IS A BUG OF THE SETCLOCK 1.3 RELEASE ! X; X; A BLOCKFILL IN THE LOCATION OF THAT DEVICE WAS ABLE TO REVIVE IT ! X; FOR COMPAREABLE FUTURE EVENTS AND FOR YOU I WROTE DOWN MY EXPERIENCE X; IN AN EXECUTEABLE. WHEN THE CODE TERMINATES YOU GET FROM SETCLOCK A X; X; <unset> <unset> <unset> X; X; NOW SET YOU SYSTEM TIMER TO THE ACTUAL TIME AND RUN SETCLOCK WITH SAVE X; OPTION TO STORE IT TO THE BATTERY BACKUP CLOCK. X; IF YOU CAN'T REVIVE YOUR CLOCK WITH THIS PROGRAM WITHOUT REMOVING THE X; THE STANDBY POWER OF YOUR CLOCK PLEASE SEND A NOTE ! X; X; --------------------------------------------------------------------- X; THIS PROGRAM MAY BE FREELY DISTRIBUTED AS LONG AS : X; X; - NO PARTS ARE CHANGED => COPY AS IS X; - NOT MORE THAN 5 US$ FOR DISK COPY FEE X; - NO FEE ON BBS FILEBASES X; X; --------------------------------------------------------------------- X; - PAPERMAIL - - EMAILs - X; X; Andrew Kopp UUCP: via <CB> (see below) X; Zu den Tannen 13 X; D-5810 Witten 3 BBS Ffm Dungeon : <049> 069 4990769 (Charly) X; - Fed.Rep.Ger - German BTX Serv.: 0230279655-0001 X; --------------------------------------------------------------------- X;* X;* ______ / X;* ______\O - The Software Brewery - X;* \\ X;* o Sparkling, fresh software from West-Germany X;* X;* @@@@@ Straight from the bar to your Amiga X;* |~~~|\ X;* | | |/ X;* |___| With our regards to the Software Distillery X;* X;* The Brewers are: X;* Christian Balzer alias <CB>, Lattice C, user interfaces, beer addict. X;* Heiko Rath alias <HR>, Assembler, ROM-Kernal stuff, Marabou addict. X;* Andrew Kopp alias Charly, Aztec C, Hardware & communications, beer addict. X;* Armin Sparr alias MARVIN, Aztec C, ARexx macros, Campari addict. X;* Ralf Woitinas alias RAF, Assembler, anything, Ray-Tracing addict. X;* X;* Beverages: Altenmuenster Brauer Bier, Urfraenkisches Landbier, Jever. X;* X;* Send exotic drinks, comments, flames to: X;* X;* The Software Brewery X;* Christian Balzer UUCP: decwrl!frambo.dec.com!CB X;* Im Wingertsberg 45 ARPA: CB@frambo.dec.com X;* D-6108 Weiterstadt CI$ : 71001,210 (be brief!) X;* West Germany (F.R.G.) Fone: +49 6150 4151 (18:00-21:00 CET!) X;* X XClockBase EQU $DC0000 XSize EQU 31 ; number of words-1 in the map X Xentry: X lea ClockBase,a0 ; start on base of Clock and clear X moveq #Size,d0 ; a block of size+1 words X_l1: clr.w (a0)+ X dbf d0,_l1 X rts X X END X X X; A note from the Editor (<CB>): X; Well fellas, don't you just LOVE those sources that consist of X; a sound 80% comments? :-) ;-) SHAR_EOF echo "extracting CallBack2Life.info.uu" sed 's/^X//' << \SHAR_EOF > CallBack2Life.info.uu X Xbegin 644 CallBack2Life.info XMXQ```0```````````#P`(@`%``,``0#`F+``````````````````````````C XM`````R,``````````````"`````J```````````````````````\`"$``@#$3 XML]@#```````````````````#____``````?___\`````#____P`````/____J XM``````____\`````#_\?_P`````/_Q__``````__'_\`````#_\?_P`````/+ XMP`!_``````__'_\`````#_\?_P`````/_Q__``````__'_\`````#____P``[ XM```/___^``````____P````````````````````````````````````````'; XM\````````!_\````````&^P``````/____X````'@````<```!P"J```<```+ XM$``#```0```<``%``'```!\``"`!\```'______P```/_____^````/_____5 XM@`!_________P'_\````___`?_O___S__\!_\````O__P'_W___Z___`?_?^S XM#_K__\!_]_X/^O__P'_W_@_Z___`?_?^#_K__\!_]X``.O__P'_W@``Z___`4 XM?_>``#K__\!_]_X/^O__P'_W_@_Z___`?_?^#]K__\!_]_X/&O__P'_W___Y' XM___`?_````/__\!_________P'_________`?________\!____X#___P'__9 XM_^`#___`?___Y!/__\!__P````'_P'_X`````#_`?^``````#\!_X``````/B XIP``@``````````@`````(```#@````'@```#_____X``````````````V X`` Xend Xsize 626 SHAR_EOF echo "extracting callback2life.uu" sed 's/^X//' << \SHAR_EOF > callback2life.uu X Xbegin 644 callback2life XM```#\P`````````#``````````(````$``````````$```/I````!$'Y`-P`& XG`'`?0EA1R/_\3G4```/R```#Z@````````/R```#ZP````$```/R[ X`` Xend Xsize 84 SHAR_EOF echo "End of archive 1 (of 1)" # if you want to concatenate archives, remove anything after this line exit