TweetFollow Us on Twitter

Aug 92 Tips
Volume Number:8
Issue Number:4
Column Tag:Tips & Tidbits

Tips & Tidbits

By Neil Ticktin, Editor-in-Chief

MacTutor has a new column called “Tips and Tidbits”. This column is your opportunity to spread the word about little bits of information that you find out about. These tidbits can be programming related or they can be user tips that are particularly useful to programmers.

We really want to hear from you. MacTutor will pay $25 for every tip used, and the Tip of the Month will receive $50. To submit a tip, send in a letter to the magazine. Remember, AppleLink is our preferred method of communication, but feel free to send something via US Mail. If you do send mail, enclose a printed copy and a disk copy of the letter so that it does not have to be retyped.

Let us know what you think. Remember, this is your magazine. Try ‘em out and let us know...

Tip of the month

A frequently asked question is “How to make a menu bar within a window, but makeit SIMPLE?” I have found the answer deep in the UPMG folder on the 7.0 Beta-Bang CD-Rom. This folder is a “must read” for finding clever and simple answers to many questions of this kind. I have written the code below for better readability, but the credit for the trick must be given to the UPMG file. Before calling PopUpMenuSelect, install a MenuHook. In the hook, if the mouse is out of the menu rect (and out of the menu title rect), post a mouseUp event to exitPopUpMenuSelect.

Doing it this way, the user can browse between pop-up menus without releasing themouse button, exactly like in the real menu bar. Warning: abuse of this trick will quickly drive your program to a very disconcerting user-interface. Are you really sure you need a menu bar in thiswindow?

Benoît Widemann

/* 1 */

// Global variables

short gCurrentMenu;// current menu index
MenuHandle gMenu[NUMBER_OF_MENUS];
Rect gMenuTitleRect[NUMBER_OF_MENUS];  // menus title rects in window

// There was a click in window's menubar
// Returns the item selected or 0 if no selection
// If the returned item is non-zero, the menu index is gCurrentMenu

short windowMenuSelect(WindowPtr theWindow)
{
   ProcPtr saveMenuHook;
   Point p;
   short selectedItem;

   SetWRefCon(theWindow, SetCurrentA5());  // save our A5 in window refcon
   saveMenuHook = MenuHook;// save current value in MenuHook
   MenuHook = (ProcPtr)myMenuHook; // install our menu hook
   SetPort(theWindow);
   while (Button()){   // don't use StillDown here!!
   GetMouse(&p);
   for (gCurrentMenu=0; gCurrentMenu<NUMBER_OF_MENUS; gCurrentMenu++) 
 {
   // find in which menu title rect is the mouse
   if (PtInRect(p, &gMenuTitleRect[gCurrentMenu])) {
   InvertRect(&gMenuTitleRect[gCurrentMenu]);
   p.h = gMenuTitleRect[gCurrentMenu].left+1;
   p.v = gMenuTitleRect[gCurrentMenu].bottom+1;
   LocalToGlobal(&p);
   // use only the item part returned
   selectedItem = (short)(PopUpMenuSelect(gMenu[gCurrentMenu], p.v, p.h, 
0) &
0x0000FFFF);
   InvertRect(&gMenuTitleRect[gCurrentMenu]);
   break;
   }
   }
   }
   MenuHook = saveMenuHook;// restore Menu Hook
   return(selectedItem);
}

// the menu hook

pascal void myMenuHook()
{
   Point p;
   long sysA5;

   sysA5 = SetA5(GetWRefCon(FrontWindow())); // restore our A5
   GetMouse(&p);
   if (p.v < 20 && !PtInRect(p, &gMenuTitleRect[gCurrentMenu])) {
   (void)PostEvent(mouseUp, nil);  // exit PopUpMenuSelect
   }
   (void)SetA5(sysA5); // restore system A5
}

NEED FOR SPEED

To execute system routines efficiently, you can by-pass the trap dispatcher byjumping to the routine yourself. Most practicle in tight loops. Take for example the BLockMove routine. Rewrite it as MyBlockMove:

/* 2 */

CONST
  kBlockMoveNum = $A02E; 
{Get the BlockMove Trap word from Inside Macintosh Volume III, Appendix 
C}
VAR
  blockMoveAddress:LongInt;
BEGIN
  blockMoveAddress := GetTrapAddress(kBlockMoveNum);
  start loop...
    MyBlockMove(source,dest,size, blockMoveAddress);
  end loop...
END

Write MyBlockMove in assembler like this:

;3

PROCEDURE MyBlockMove
MOVE.L     A2,D2      /*Save off A2. We'll need it later
MOVE.L     (A7)+,D1   /*Move Return address into D1
MOVEA.L    (A7),A2    /*Put BlockMove address into A2
MOVE.L     (A7)+,D0   /*Place size into D0
MOVEA.L    (A7)+,A1   /*Place destination Ptr into A1
MOVEA.L    (A7)+,A0   /*Place source Ptr into A0
MOVE.L     D1,(A7)    /*BlockMove trashes D1 & D2.
                      /*Save D1(Return address) on stack
MOVE.L     D2,-(A7)   /*Save D2(value of A2) on stack
JSR        (A2)       /*Jump to BlockMove
MOVEA.L    (A7)+,A2   /*Restore A2
MOVEA.L    (A7)+,A1   /*Place Return address into A1
JMP        (A1)       /*Jump to Return Address

MyBlockMove must be in a resident segment!!! For any questions, send an applelink to ISS.

Mark Hajek

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Latest Forum Discussions

See All

Brawl Stars veteran-backed Octopo Studio...
The 2024 PlayX4 B2B is kicking off tomorrow in Ilsan, lasting until the 26th in KINTEX Hall 1, and Octopo Studio has announced that they will be making an appearance. Shooting RPG Bounty Pang will be on show as the developers seek publishing... | Read more »
The Astral Express sets off to bring Hon...
After vanquishing yet another threat and adding a fine hat to their wardrobe, you’d think the crew of the Astral Express would be able to kick back after their adventures in Penacony. Clearly not though, as HoYo has announced the next leg of the... | Read more »
Dragons rein supreme in Pokemon Unite as...
If you were looking for the strongest type in Pokemon and asked the fanbase, I would wager most people's thoughts would turn to Dragon. They hit hard, are often powerful, and get used by some of the toughest trainers. Pokemon Unite is honouring... | Read more »
Players can take a peek into the design...
It doesn’t matter how much effort developers put into their classes, or how many special little mechanics there are; if there is one that wields two blades, I’m ignoring everything else. Diablo Immortal recently announced such a class in the shape... | Read more »
Android users have a new option in the c...
When you are in the thick of a firefight or trying to pull off a mid-combat parkour flip through a squad of foes, sometimes touchscreen control just won’t do it for you. For those intense sessions, you could benefit from a good mobile controller,... | Read more »
Jagex releases the first of three origin...
At this point, I am sure everyone has heard of Runescape, and or Runescape Classic. It has been going strong for 23 years, with constant content and story coming out. Luckily for fans of the game, or fantasy in general, Jagex has announced an... | Read more »
Watcher of Realms unveils new story and...
Watcher of Realms players are in for quite the feast this month, as Moonton release two powerful new heroes, including one that will burst down even the most mighty of foes. Recruit your new friends, and then burn through the Main Quest expansion... | Read more »
Reverse: 1999 continues its trip down un...
The field trip to Australia continues in Reverse: 1999 as Phase 2 of Revival! The Uluru Games kicks off. You will be able to collect new characters, engage with new events, get hordes of free gifts, and follow the story of a mushroom-based... | Read more »
Ride into the zombie apocalypse in style...
Back in the good old days of Flash games, there were a few staples; Happy Wheels, Stick RPG, and of course the apocalyptic driver Earn to Die. Fans of the running over zombies simulator can rejoice, as the sequel to the legendary game, Earn to Die... | Read more »
Top Mobile Game Discounts
Every day, we pick out a curated list of the best mobile discounts on the App Store and post them here. This list won't be comprehensive, but it every game on it is recommended. Feel free to check out the coverage we did on them in the links below... | Read more »

Price Scanner via MacPrices.net

Amazon is blowing out clearance 13-inch M1 Ma...
Amazon has clearance Apple 13″ M1 MacBook Airs on Memorial Day sale for $300 off original MSRP, only $699. Their prices are the lowest available for new MacBooks this Holiday shopping season. Stock... Read more
MacBook Sale! 13-inch M2 MacBook Airs are onl...
Best Buy has Apple 13″ MacBook Airs with M2 CPUs in stock and back on sale this week on their online store for $150 off MSRP in Space Gray, Silver, Starlight, and Midnight colors. Prices start at... Read more
Apple increases iPhone trade-in values ahead...
Get up to $650 on the purchase of new or refurbished iPhone at Apple using their official Trade In program, now with increased values ahead of WWDC 2024. Trade in your old iPhone, and Apple will... Read more
Amazon has Apple’s iPad discounted to a new l...
Amazon has Apple’s 10th-generation WiFi iPads on sale discounted up to $40 off MSRP, starting at only $334. With the discounts, Amazon’s prices are the lowest we’ve seen for these iPads: – 10″ 10th-... Read more
13-inch M3 MacBook Airs on sale for $100 off...
Best Buy has Apple 13″ MacBook Airs with M3 CPUs in stock and on sale this week for $100 off MSRP. Prices start at $999. Their prices, along with Amazon’s, are the lowest currently available for new... Read more
Weekend Deal! Best Buy has Apple Watch Series...
Best Buy has Apple Watch Series 9 models on sale for $100 off MSRP on their online store this weekend. Sale prices available for online orders only, in-store prices may vary. Order online, and choose... Read more
Apple Watch SE on sale starting at $199 this...
Best Buy has all Apple Watch SE models on sale this weekend for $50 off MSRP on their online store. Sale prices available for online orders only, in-store prices may vary. Order online, and choose... Read more
Mac Pro with M2 Ultra CPU on sale for $6699,...
In the market for one of Apple’s Mac Pro towers? B&H Photo has the base Mac Pro with an Apple M2 Ultra CPU, 64GB RAM, and 1TB SSD on sale for $6699 including free 1-2 day shipping to most... Read more
New May Verizon promotion: Switch and get a f...
Red Hot Deal Days at Verizon: Switch to Verizon this month, and get the 256GB iPhone 15 Pro for free, with trade-in, when you add a new line of service. Verizon is also offering a free cellular iPad... Read more
Updated Apple MacBook Price Trackers
Our Apple award-winning MacBook Price Trackers are continually updated with the latest information on prices, bundles, and availability for 16″ and 14″ MacBook Pros along with 13″ and 15″ MacBook... Read more

Jobs Board

Salon Manager BTC - *Apple* Blossom Mall -...
Salon Manager BTC - Apple Blossom Mall Location:Winchester, VA, United States (https://jobs.jcp.com/jobs/location/144535/winchester-va-united-states) - Job Read more
Omnichannel Associate - *Apple* Blossom Mal...
Omnichannel Associate - Apple Blossom Mall Location:Winchester, VA, United States (https://jobs.jcp.com/jobs/location/191170/winchester-va-united-states) - Apple Read more
Beauty Consultant - *Apple* Blossom Mall -...
Beauty Consultant - Apple Blossom Mall Location:Winchester, VA, United States (https://jobs.jcp.com/jobs/location/191170/winchester-va-united-states) - Apple Read more
Hair Stylist - *Apple* Blossom Mall - JCPen...
Hair Stylist - Apple Blossom Mall Location:Winchester, VA, United States (https://jobs.jcp.com/jobs/location/191170/winchester-va-united-states) - Apple Blossom Read more
Operations Associate - *Apple* Blossom Mall...
Operations Associate - Apple Blossom Mall Location:Winchester, VA, United States (https://jobs.jcp.com/jobs/location/191170/winchester-va-united-states) - Apple Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.