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

Apple iOS 9.3.5 - The latest version of...
iOS is the world’s most advanced mobile operating system, and it’s the foundation of iPhone, iPad, and iPod touch. It comes with a collection of apps and features that let you do the everyday things... Read more
Parallels Desktop 12.0.0 - Run Windows a...
Parallels allows you to run Windows and Mac applications side by side. Choose your view to make Windows invisible while still using its applications, or keep the familiar Windows background and... Read more
Spotify 1.0.36.124. - 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
Firefox 48.0.2 - Fast, safe Web browser.
Firefox offers a fast, safe Web browsing experience. Browse quickly, securely, and effortlessly. With its industry-leading features, Firefox is the choice of Web development professionals and casual... Read more
BBEdit 11.6.1 - Powerful text and HTML e...
BBEdit is the leading professional HTML and text editor for the Mac. Specifically crafted in response to the needs of Web authors and software developers, this award-winning product provides a... Read more
OmniGraffle Pro 6.6.1 - Create diagrams,...
OmniGraffle Pro helps you draw beautiful diagrams, family trees, flow charts, org charts, layouts, and (mathematically speaking) any other directed or non-directed graphs. We've had people use... Read more
OmniGraffle 6.6.1 - Create diagrams, flo...
OmniGraffle helps you draw beautiful diagrams, family trees, flow charts, org charts, layouts, and (mathematically speaking) any other directed or non-directed graphs. We've had people use Graffle to... Read more
Dropbox 8.4.21 - Cloud backup and synchr...
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
BetterTouchTool 1.84 - Customize Multi-T...
BetterTouchTool adds many new, fully customizable gestures to the Magic Mouse, Multi-Touch MacBook trackpad, and Magic Trackpad. These gestures are customizable: Magic Mouse: Pinch in / out (zoom... Read more
ScreenFlow 6.1 - Create screen recording...
ScreenFlow is powerful, easy-to-use screencasting software for the Mac. With ScreenFlow you can record the contents of your entire monitor while also capturing your video camera, microphone and your... Read more

Become the King of Avalon in FunPlus’ la...
King Arthur is dead. Considering the legend dates back to the 5th century, it would be surprising if he wasn’t. But in the context of real-time MMO game King of Avalon: Dragon Warfare, Arthur’s death plunges the kingdom into chaos. Evil sorceress... | Read more »
Nightgate (Games)
Nightgate 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: *** Launch Sale: 25% OFF for a limited time! *** In the year 2398, after a great war, a network of intelligent computers known as... | Read more »
3 best fantasy football apps to get you...
Last season didn't go the way you wanted it to in fantasy football. You were super happy following your drafts or auctions, convinced you had outsmarted everyone. You were all set to hustle on the waiver wire, work out some sweet trades, and make... | Read more »
Pokemon GO update: Take me to your leade...
The Team Leaders in Pokemon GO have had it pretty easy up until now. They show up when players reach level 5, make their cases for joining their respective teams, and that's pretty much it. Light work, as Floyd Mayweather might say. [Read more] | Read more »
Ruismaker FM (Music)
Ruismaker FM 1.0 Device: iOS Universal Category: Music Price: $4.99, Version: 1.0 (iTunes) Description: Following up on the success of Ruismaker, here's her crazy twin-sister, designed for people who want to design their own... | Read more »
Space Marshals 2 (Games)
Space Marshals 2 1.0.15 Device: iOS iPhone Category: Games Price: $5.99, Version: 1.0.15 (iTunes) Description: The sci-fi wild west adventure in outer space continues with Space Marshals 2. This tactical top-down shooter puts you in... | Read more »
Dungeon Warfare (Games)
Dungeon Warfare 1.0 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0 (iTunes) Description: Dungeon Warfare is a challenging tower defense game where you become a dungeon lord to defend your dungeon against greedy... | Read more »
Solitairica (Games)
Solitairica 1.0.7 Device: iOS Universal Category: Games Price: $3.99, Version: 1.0.7 (iTunes) Description: Solitairica takes RPG combat and challenging rogue-like progression to a fresh new place—the world of solitaire! | Read more »
Bowmasters tips, tricks and hints
At least for this writer, archery was one of the more pleasant surprises of the 2016 Rio Olympics. As opposed to target shooting with guns, which was dreadfully boring, watching people shoot arrows at targets was pretty darn cool. [Read more] | Read more »
Best apps for watching live TV
The Olympics have come and gone, leaving nearly everyone in a temporary state of "What the heck am I going to watch on TV right now?" Besides old reruns of Golden Girls, but that goes without saying. [Read more] | Read more »

Price Scanner via MacPrices.net

BookBook Releases SurfacePad, BookBook &...
BookBook has released three new covers just for iPad Pro: SurfacePad, BookBook and BookBook Rutledge Edition. BookBook for iPad Pro is a gorgeous leather case reminiscent of a vintage sketchbook.... Read more
Clean Text 1.0 for iOS Reduces Text Cleanup a...
Apimac today announced availability of Clean Text for iOS, a tool for webmasters, graphic designers, developers and magazine editors to reduce text cleanup and editing time, and also for any iPhone... Read more
27-inch iMacs on sale for up to $220 off MSRP
B&H Photo has 27″ Apple iMacs on sale for up to $200 off MSRP including free shipping plus NY sales tax only: - 27″ 3.3GHz iMac 5K: $2099 $200 off MSRP - 27″ 3.2GHz/1TB Fusion iMac 5K: $1899 $100... Read more
Apple refurbished 13-inch MacBook Airs availa...
Apple has Certified Refurbished 2016 and 2015 13″ MacBook Airs now available starting at $849. An Apple one-year warranty is included with each MacBook, and shipping is free: - 2016 13″ 1.6GHz/8GB/... Read more
Apple refurbished iPad mini 2s available for...
Apple is offering Certified Refurbished iPad mini 2s for up to $80 off the cost of new minis. An Apple one-year warranty is included with each model, and shipping is free: - 16GB iPad mini 2 WiFi: $... Read more
Save up to $600 with Apple refurbished Mac Pr...
Apple has Certified Refurbished Mac Pros available for up to $600 off the cost of new models. An Apple one-year warranty is included with each Mac Pro, and shipping is free. The following... Read more
Mac Pros on sale for $200 off MSRP
B&H Photo has Mac Pros on sale for $200 off MSRP. Shipping is free, and B&H charges sales tax in NY only: - 3.7GHz 4-core Mac Pro: $2799, $200 off MSRP - 3.5GHz 6-core Mac Pro: $3799, $200... Read more
Will We See A 10.5″ iPad Pro in 2017? – The ‘...
A MacRumors report, cites a research note from KGI Securities analyst Ming-Chi Kuo, saying a new size iPad model is in the works. According to the highly respected Cho, who has a strong track record... Read more
IOGEAR USB-C Docking Station Transforms Lapto...
IOGEAR has announced the launch of its innovative USB-C Docking Station with Power Delivery which turns USB-C enabled laptops into desktop workstations. The new IOGEAR USB-C Docking Station features... Read more
12-inch Retina MacBooks on sale for up to $10...
Amazon has 2016 12″ Apple Retina MacBooks on sale for $100 off MSRP. Shipping is free: - 12″ 1.1GHz Space Gray Retina MacBook: $1199 $100 off MSRP - 12″ 1.1GHz Silver Retina MacBook: $1224.99 $75 off... Read more

Jobs Board

*Apple* Professional Learning Specialist - A...
# Apple Professional Learning Specialist Job Number: 51234243 Portland, Maine, Maine, United States Posted: Aug. 18, 2016 Weekly Hours: 40.00 **Job Summary** The Read more
*Apple* Mobile Master - Best Buy (United Sta...
What does a Best Buy Apple Mobile Master do? At Best Buy, our mission is to leverage the unique talents and passions of our employees to inspire, delight, and enrich Read more
*Apple* Retail - Multiple Positions Akron, O...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
Simply Mac *Apple* Specialist- Repair Techn...
…The Technician is a master at working with our customers to diagnose and repair Apple devices in a manner that exceeds the expectations set forth by Apple Read more
*Apple* Retail - Multiple Positions Germanto...
Job Description: Sales Specialist - Retail Customer Service and Sales Transform Apple Store visitors into loyal Apple customers. When customers enter the store, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.