TweetFollow Us on Twitter

Menu Bar XCMD
Volume Number:5
Issue Number:5
Column Tag:HyperChat™

Menu Bar XCMD

By Fred Stauder, HyperChat Editor, Zurich, Switzerland

Note: Source code files accompanying article are located on MacTech CD-ROM or source code disks.

on HyperChat

The Interface Race is On

I attended the Hannover CeBit fair in mid March. It is without doubt the biggest computer exhibition on earth. If you think the MacWorld Expos are getting huge, CeBit is no comparison; it is at least 20 times the size. It lasts for eight days, and even if you tried to go through systematically, there’s no hope. It consists of everything from mainframes down to pocket computers, computer security systems, video conferencing, and much, much more. It was good to see that the Apple stand was one of the most popular (the IIcx and the screens were introduced there).

Some of the exciting things were a 16 gigabyte eraseable(rewritable) library unit that stores 20 cartridges and can change them in 6 seconds. The units can be linked together to hold 224 GB on line and SCSI. Another interesting thing was an information display unit, like a small billboard (A1 size), encased in glass. It contains a waxed plastic roll and a toner mechanism. The end result is that you can print to this thing, and it rolls up to be displayed. the toner is not fixed so you can re-write to it. Color and larger versions are in the works. In the future we will see billboards that will be updated from a remote computer in seconds. This is a very innovative output device, I can hardly wait to see the weird uses people will put to it.

It was such a pleasure attending CeBit; they treated the international press magnificently, and was such a contrast to the unproffesional treatment by Industrade in Switzerland.

There were of course lots of other great goodies but space does not permit. Anyway my job is to tell you about MultiMedia and interface, but it is important to realize how things like, cheaper larger mass storage and innovative output devices can change the way we have to design programs.

OpenLook which has been dubbed the “universal” interface for Unix environments was being shown everywhere, as was Xwindows and presentation manager. Sun was showing off SunWrite, SunPaint, and SunDraw. My impression: 5 years late and not as userfriendly. This was the first non-Mac show that I have been to that most of the Key players were concerned about Human Interface. As CPU’s match CPU’s in performance and cost, and software does the same, it is important to realize the most important thing is: “How long will it take to learn”, and “Do I need a manual”. If your software is intuitive to use and easier to use people are more likely to buy it.

I have a button (fig. 1) that reads "My Boss is the End User".

I think we should all make him our Boss. If I am not making his life easier and bettering his experience then I am not doing my job.

Now for the quiz last month. The monkey lives. How many people have heard the monkey beep on the Mac II? How many of you knew that it is a human sound? I didn’t believe it either until I met Sandi Dobrowolsky in person (formally from Apple and now at Claris), and she demonstrated the monkey sound. She really can have fun near peoples machines because she can reproduce it accurately every time, so people think there is something wrong with their Mac. It is, by the way, the only Human sound to be shipped with a Mac. So “eek eek” Sandi and I hope you and Steve had a great trip “down under” (my home country). So we look forward to hearing Koala and Kangaroo sounds.

The point that I am making is that with a bit of creativity and experimentation you can come up with great sounds and graphics, that won’t get you into copyright problems. Expand your horizons, use the Human Interface Guidelines (they are not absolute rules), experiment and go beyond our present limitations. The interface is the future.

Figure 1.

Your wish is my XCMD

I have two XCMD’s this month that I find quite useful. The first I called invisMenuBar, it makes the menubar invisible and still functional. It is really useful when developing on a small screen. The Human Interface Guidelines clearly state “don’t hide things from the user and don’t surprise them”. So why am I showing you this XCMD? Firstly I would strongly object to people using it in a stack. It is a development/power user tool it may help you develop stacks and browse through other peoples if you have a small screen. Just like MacsBug deviates a long way from the guidelines but is highly useable and appropriate in it’s context. What it does. It simply uses a callback to hypertalk to hide the menubar, then it sets the height of the menubar to the height of it’s natural state. Hypercard is fooled to think that it is hidden so it doesn’t do a menubar redraw, however when you have a mousedown in the menubar it accepts it and draws the menu.

Figure 2.


(*
invisMenuBar-- a sHyperCard external command
that makes the menubar invisible yet functional.

 Written in MPW Pascal.
 Written by Fred Stauder
 ©All rights reserved 1988

pascal :Sources:XCMD:InvisMenuBar.p 
link -o AJS-60:test -rt XCMD=7004 -sn 
Main=InvisMenuBar :Sources:XCMD:InvisMenuBar.p.o 
o -m ENTRYPOINT
 
*)

InvisMenuBar 
Segment name must be the same as the command name. 

UNIT Fred_Stauder;

INTERFACE

USES MemTypes, QuickDraw, OSIntf, ToolIntf, PackIntf, PasLibIntf, HyperXCmd;

PROCEDURE ENTRYPOINT(paramPtr:XCmdPtr);

IMPLEMENTATION
TYPE Str31 = String[31];

PROCEDURE InvisMenuBar(paramPtr:XCmdPtr);    FORWARD;

PROCEDURE ENTRYPOINT(paramPtr:XCmdPtr);
 BEGIN
 InvisMenuBar(paramPtr);
 END;

 PROCEDURE InvisMenuBar(paramPtr:XCmdPtr);
 
XCmdGlue.inc the glue routines
 VAR menuBarHeight:Ptr;
 
 BEGIN
 SendCardMessage(‘hide menubar’);
 menuBarHeight := Ptr($BAB);
 directly  to  the global the only way possible          menuBarHeight^ 
:= $14;
 END; 
 
END.

Listing 1.

The second XCMD allows you to change the window type. This is useful when you want to do a presentation and not have the window title visible. Or if you want to make a small window for a specific purpose. (fig.3.) The windowDefproc and the high order byte holds the window variation code. First you pass a parameter with the XCMD changeWindowType, that gives you the desired window. the types are the same as in Inside mac V I p273.

documentProc=  0 (standard document window)
dBoxProc=  1 (alert box or modal dialog box)
plainDBox =  2 (plain box)
altDBoxProc =  3 (plain box with shadow)
noGrowDocProc  =  4 (document window without size)
rDocProc= 16(rounded-corner window)

Figure 3.

You take the parameter, convert to a Longint, then comes the slightly tricky bit where you have to do bit manipulation to write it to the high order byte of the windowDefproc. You can get the window type by using the function GetWVariant. I will leave this as an exercise for you to write, so that once you have changed the window type you will be able to find out what it is through an XFCN.

Diagram 1. shows how the bits are manipulated to put the window variant into high order byte of theWindow^.DefProc handle. Then I hide and show the cardwindow to update the screen.

Diagram 1.

Listing 2.
 Written in MPW Pascal.
 Written by Fred Stauder
 ©All rights reserved 1988
(*
pascal :changeWindowType.p
link -o Development:Demo:home -rt XCMD=7005sn 
Main=changeWindowType :changeWindowType.p.o -m ENTRYPOINT
*)

changeWindowType name must be the same as the command name

UNIT DummyUnit;
INTERFACE

USES MemTypes, QuickDraw, OSIntf, ToolIntf, PasLibIntf, HyperXCmd;

PROCEDURE ENTRYPOINT(paramPtr:XCmdPtr);

IMPLEMENTATION

Str31 = String[31];

PROCEDURE changeWindowType(paramPtr:XCmdPtr);      FORWARD;

 PROCEDURE ENTRYPOINT(paramPtr:XCmdPtr);
 BEGIN
 changeWindowType(paramPtr);
 END;

 PROCEDURE changeWindowType(paramPtr:XCmdPtr);
 VAR 
 HCWindow:WindowPtr;
 theWindow: WindowPeek;
 tempStr: Str255;
 kind:  Longint;
 newWind: Longint;
 firstMask: Longint;
 firstShift:Longint;
 secondMask:Longint;
 
XCmdGlue.inc the glue routines

 BEGIN 
 GetPort(HCWindow);
 thy port
 ZeroToPas(paramPtr^.params[1]^,tempStr);
 kind := StrToNum(tempStr);

  theWindow := WindowPeek(HCWindow);
  firstMask := BitAnd(Kind,$000000FF);
  firstShift := BitShift(firstMask,24);
  secondMask := BitAnd(LONGINT(theWindow^.windowDefProc),$00FFFFFF);
  
  newWind := BitOR(firstShift,secondMask);
  
 theWindow^.windowDefProc := Handle(newWind);
  SendHCMessage(‘hide cd window’);
  SendHCMessage(‘show cd window’);
 SetPort(HCWindow);
 thy port
 END;
END.

Next month I will show you an XCMD that will allow you to resize the card window of Hypercard such as in Fig. 3.

Send articles ideas, comments etc to Applelink: STAUDER.

end HyperChat

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

EtreCheck 3.1.5 - For troubleshooting yo...
EtreCheck is an app that displays the important details of your system configuration and allow you to copy that information to the Clipboard. It is meant to be used with Apple Support Communities to... Read more
WALTR 2 2.0.8 - $39.95
WALTR 2 helps you wirelessly drag-and-drop any music, ringtones, videos, PDF, and ePub files onto your iPhone, iPad, or iPod without iTunes. It is the second major version of Softorino's critically-... Read more
Carbon Copy Cloner 4.1.12 - Easy-to-use...
Carbon Copy Cloner backups are better than ordinary backups. Suppose the unthinkable happens while you're under deadline to finish a project: your Mac is unresponsive and all you hear is an ominous,... Read more
Dropbox 16.3.27 - Cloud backup and synch...
Dropbox is an application that creates a special Finder folder that automatically syncs online and between your computers. It allows you to both backup files and keep them up-to-date between systems... Read more
Microsoft OneNote 15.29 - Free digital n...
OneNote is your very own digital notebook. With OneNote, you can capture that flash of genius, that moment of inspiration, or that list of errands that's too important to forget. Whether you're at... Read more
Spotify 1.0.44.100. - Stream music, crea...
Spotify is a streaming music service that gives you on-demand access to millions of songs. Whether you like driving rock, silky R&B, or grandiose classical music, Spotify's massive catalogue puts... Read more
SpamSieve 2.9.27 - Robust spam filter fo...
SpamSieve is a robust spam filter for major email clients that uses powerful Bayesian spam filtering. SpamSieve understands what your spam looks like in order to block it all, but also learns what... Read more
VueScan 9.5.62 - Scanner software with a...
VueScan is a scanning program that works with most high-quality flatbed and film scanners to produce scans that have excellent color fidelity and color balance. VueScan is easy to use, and has... Read more
Fantastical 2.3.2 - Create calendar even...
Fantastical 2 is the Mac calendar you'll actually enjoy using. Creating an event with Fantastical is quick, easy, and fun: Open Fantastical with a single click or keystroke Type in your event... Read more
PCalc 4.4.4 - Full-featured scientific c...
PCalc is a full-featured, scriptable scientific calculator with support for hexadecimal, octal, and binary calculations, as well as an RPN mode, programmable functions, and an extensive set of unit... Read more

Latest Forum Discussions

See All

Track Santa with these three festive app...
Christmas is fast approaching and that means it's time to prepare for Santa's yearly pilgrimage around the globe. Christmas Eve is an exciting time as parents help their kids get ready to welcome Santa. You've got the cookies and milk all planned... | Read more »
Galaxy on Fire 3 and four other fantasti...
Galaxy on Fire 3 - Manticore brings the series back for another round of daring space battles. It's familiar territory for folks who are familiar with the franchise. If you've beaten the game and are looking to broaden your horizons, might we... | Read more »
The best apps for your holiday gift exch...
What's that, you say? You still haven't started your holiday shopping? Don't beat yourself up over it -- a lot of people have been putting it off, too. It's become easier and easier to procrastinate gift shopping thanks to a number of apps that... | Read more »
Toca Hair Salon 3 (Education)
Toca Hair Salon 3 1.0 Device: iOS Universal Category: Education Price: $2.99, Version: 1.0 (iTunes) Description: | Read more »
Winter comes to Darkwood as Seekers Note...
MyTona, based in the chilly Siberian city of Yakutsk, has brought a little festive fun to its hidden object game Seekers Notes: Hidden Mystery. The Christmas update introduces some new inhabitants to players, and with them a chance to win plenty of... | Read more »
Bully: Anniversary Edition (Games)
Bully: Anniversary Edition 1.03.1 Device: iOS Universal Category: Games Price: $6.99, Version: 1.03.1 (iTunes) Description: *** PLEASE NOTE: This game is officially supported on the following devices: iPhone 5 and newer, iPod Touch... | Read more »
PINE GROVE (Games)
PINE GROVE 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: A pine grove where there are no footsteps of people due to continuous missing cases. The case is still unsolved and nothing has... | Read more »
Niantic teases new Pokémon announcement...
After rumors started swirling yesterday, it turns out there is an official Pokémon GO update on its way. We’ll find out what’s in store for us and our growing Pokémon collections tomorrow during the Starbucks event, but Niantic will be revealing... | Read more »
3 reasons why Nicki Minaj: The Empire is...
Nicki Minaj is as business-savvy as she is musically talented and she’s proved that by launching her own game. Designed by Glu, purveyors of other fine celebrity games like cult favorite Kim Kardashian: Hollywood, Nicki Minaj: The Empire launched... | Read more »
Clash of Clans is getting its own animat...
Riding on its unending wave of fame and success, Clash of Clans is getting an animated web series based on its Clash-A-Rama animated shorts.As opposed to the current shorts' 60 second run time, the new and improved Clash-A-Rama will be comprised of... | Read more »

Price Scanner via MacPrices.net

Never Settle for Low Performing Wifi With iOS...
AppYogi Software has announced the release of WiFi Signal Strength Status App 1.0, the company’s new utility developed exclusively for macOS. WiFi Signal Strength Status App features a unique, single... Read more
New 2016 13-inch Touch Bar MacBook Pros in st...
B&H Photo has stock of new 2016 Apple 13″ Touch Bar MacBook Pro models, each including free shipping plus NY sales tax only: - 13″ 2.9GHz/512GB Touch Bar MacBook Pro Space Gray: $1999 - 13″ 2.... Read more
New 2016 15″ Touch Bar MacBook Pros in stock...
B&H Photo has new 2016 Apple 15″ Touch Bar MacBook Pro models in stock today including free shipping plus NY sales tax only: - 15″ 2.7GHz Touch Bar MacBook Pro Space Gray: $2799 - 15″ 2.7GHz... Read more
DietSensor App Targeting Diabetes and Obesity...
DietSensor, Inc., a developer of smart food and nutrition applications designed to fight diabetes and obesity and help improve overall fitness, has announced the launch of its DietSensor app for... Read more
Holiday 2016 13-inch 2.0GHz MacBook Pro sales...
B&H has the non-Touch Bar 13″ MacBook Pros in stock today for $50-$100 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.0GHz MacBook Pro Space Gray (MLL42LL/A): $1449 $... Read more
Holiday sale: Apple TVs for $51-$40 off MSRP,...
Best Buy has dropped their price on the 64GB Apple TV to $159.99 including free shipping. That’s $40 off MSRP. 32GB Apple TVs are on sale right now for $98 on Sams Club’s online store. That’s $51 off... Read more
12-inch Retina MacBooks, Apple refurbished, n...
Apple has restocked a full line of Certified Refurbished 2016 12″ Retina MacBooks, now available for $200-$260 off MSRP. Refurbished 2015 models are available starting at $929. Apple will include a... Read more
Holiday sale: 12-inch Retina MacBook for $100...
B&H has 12″ Retina MacBooks on sale for $100 off MSRP as part of their Holiday sale. Shipping is free, and B&H charges NY sales tax only: - 12″ 1.1GHz Space Gray Retina MacBook: $1199 $100... Read more
Apple refurbished 13-inch MacBook Airs availa...
Apple has Certified Refurbished 13″ MacBook Airs available starting at $849. An Apple one-year warranty is included with each MacBook, and shipping is free: - 13″ 1.6GHz/8GB/128GB MacBook Air: $849 $... Read more
Apple refurbished iMacs available for up to $...
Apple has Certified Refurbished 2015 21″ & 27″ iMacs available for up to $350 off MSRP. Apple’s one-year warranty is standard, and shipping is free. The following models are available: - 21″ 3.... Read more

Jobs Board

*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
US- *Apple* Store Leader Program - Apple (Un...
…Summary Learn and grow as you explore the art of leadership at the Apple Store. You'll master our retail business inside and out through training, hands-on Read more
Automotive Detailer - *Apple* Used Autos -...
We are currently conductinginterviews and will be accepting applications for a part-time detailer. Apple Used Autos is a great place to work andstart a career. We Read more
*Apple* Retail - Multiple Positions - Apple,...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
*Apple* Retail - Multiple Positions- Trumbul...
Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, you're also the Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.