TweetFollow Us on Twitter

May 90 Letters
Volume Number:6
Issue Number:5
Column Tag:Letters

THINK Pascal 3.0 with MacApp

By Kirk Chase, Editor, MacTutor

THINK Pascal 3.0 Has MacApp Support

Kirk Chase

Anaheim, CA

THINK Pascal 3.0 is shipping now with MacApp support. THINK has really pushed their fine product onto mainstream OOP programmers by giving them a choice of either using the THINK Class Library (TCL) or MacApp. In addition to this, THINK Pascal 3.0 will edit larger files (up to 32,000 lines). They have generalized function calls, methods, and type casting. THe declaration of KeyMap is now done the way it was supposed to be done. One of the better features is the segementation at the procedure level; you can put your procedures into virtual segments, name them, and drag them into the physical segment of your choice. The linker has also been optomized to generate direct procedure calls for monomorphic methods (those methods that are never overridden).

In addition to all these, you get a host of other goodies to play with. On top of the list is the Class Browser. This feature gives you more than just an overview of class hierarchy; the Class Browser is an indespesible navigational aid to your code by creating links between it and the Browser; just double click to go to the definition of a class to edit it, hold the mouse button down to get a pop-up menu of methods to go to, and option, double click to find all the classes that define that method. The next goodie is SARez and SADeRez (“Say Rez” and “Say DeRez”), these long awaited standalone MPW tools will sink the clumsy RMaker. In addition to this, there is the Pascal Source Code Converter which takes your code and makes it MPW/THINK compatible; this is what you do with MacApp to use it in THINK.

Now you can have you MacApp and your speedy development too. From the benchmarks I was given, THINK beat MPW in first compilation speed by almost half and rebuild time is sooo short. Bowers Development’s AppMaker 1.1 supports the TCL. Bear River Institute and Invention Software are both holding training courses.

Unfortunately, there is a price tag to all this. THINK Pascal 3.0 costs $249 (up $100) or you can upgrade for $69. You will also need 2 megabytes to use THINK’s TCL and 4 megabytes to use MacApp. You need to aquire MacApp seperately from Apple (800-282-2732). You can contact Symantec for the upgrade at 800-441-7234 outside California or 800-626-8847 if inside California.

.FileName Syndrome

HOL0166, Roland van Straten

Dutch Macintosh Developer

When I was copying some folders from one harddisk to another I came across an old Finder™ quirk and as a result I started a little discussion on AppleLink.

Jim Reekes of Apple informed me about TechNote #102, which told me some more about my experienced problem. (I should read more!)

So what is the problem with the “.” and “:”?

As we all know (I forgot, shame on me) drivers are named using the “.drivername” convention. If we pass such a name in a PBOpen, FSOpen, or ? we can expect a driver refnum instead of a file refnum in return. If for instance we issue a PBWrite or ? we can have big trouble if the name should read “.Sony”. It could invoke a strange write and the contents of our inserted floppy is gone! So beware!

As for the colon: IM I-521 States “The User may specify a disk name (preceding the file name and seperated from it by a colon)... ; users should not be encouraged to do it. Well it is possible in almost every program.

My TROUBLE is gone

My solution to all this is presented below. Nothing to be proud of but, usable code.

{1}
 
{install the following procedure like this:
   SFPutFile(where,prompt,oldfname,@ClnPrdFilter,replyRec);
   Written by Roland van Straten, no copyright whatsoever }
FUNCTION ClnPrdFilter(item: Integer; theDialog: DialogPtr): Integer;
CONST
  kPoint = $2E;
  kColon = $3A;
VAR
  fNamStr: Str255;
BEGIN
  ClnPrdFilter := item;
  {there is always more than a character otherwise the putSave button 
would be
   grey and putSave value would not be the item number given to this 
filter}
  IF item = putSave THEN BEGIN
    GetDIText(theDialog,putName,fNamStr); {concatenate of GetDItem & 
GetIText}
    {check if first char a “.” and if there is a “:”}
    IF (fNamStr[1]= Char(kPoint)) OR (POS(Char(kColon),fNamStr)<> 0) 
THEN BEGIN
      SelIText(theDialog,putName,0,32767); {hilight the edit text item}
      SysBeep(0); {inform user about error}
      ClnPrdFilter := 100; {fake 0-event, another round of modal_dialog_ing}
    END;
  END;
END;

It is possible to filter the characters completely by using SFPPutFile(...). You are able to remove characters at the moment they are actually typed into the Edit Text Item. I found that this was not neccesary. It takes two filters and there is not much to gain.

Stolen from Apple Computer

David T. Craig

Wichita, Kansas

MacTutor magazine contained in its “The Completer MacTutor, Volume 2” two letters concerning the Macintosh ROM and a special ROM icon (see “Stolen from a Mac?” on page 556 and “Stolen from Apple Computer, Part II” on page 571). This icon, whose image appears below, appears to be used by Apple as a form of ROM protection from illegal ROM use.

MacTutor described the icon location and its display routine for the Macintosh Plus ROM. I searched my Macintosh II’s ROM for this icon and found the icon display routine at address $40860646 and the 128 bytes of the icon image starting at address $40860656.

I found the icon display routine using MacsBug by searching for the word $60FE which corresponds to the 68000 instruction “BRA *-2” which branches to itself resulting in an infinite loop and machine lockup. The actual MacsBug command I used to find the icon display routine was

F 40800000 40000 60FE

where $40800000 is the starting address of the ROM (obtained from the low-memory global pointer ROMBase at $02AE) and $40000 (256K) is the byte size of the ROM in my Macintosh II.

From MacsBug, you may see the icon display routine by typing IL 40860646. To see the icon data type DP 40860656.

The ROM code that displays the icon (A1 points to the screen):

40860646LEA *+$0010, A0
4086064AMOVEQ  #$18, D1
4086064CMOVE.L (A0)+, A1
4086064EADDA.W D0, A1
40860650DBF D1, *-$0004
40860654BRA.S  *+$0000

CompileIt!

Tom Pittman

San Jose, CA

While I’m sure that HyperBasic is a valuable contribution to the set of Macintosh development tools, it can hardly be said to have broken the C and Pascal monopoly on XCMD and XFCN creation: that happened over a year ago when CompileIt! mad HyperTalk a viable language for creating HyperCard externals.

I took the liberty to rewrite in HyperTalk the two HyperBasic benchmarks from February Kelly’s Corner. Note that the scripts are both shorter and more readable (no GOTOs); there is no concern with explicit type conversion nor call backs, as these are handled automatically by CompileIt! I tested both scripts in interpreted HyperCard, which is much easier than using MacsBug (though CompileIt! also generates procedure names for MacsBug and offers several other features to ease the pain of debugging). I then compiled the debugged scripts and immediately ran the resulting XCMDs, which were installed automatically in my designated target stack. MacTutor’s readers may be interested in the results:

--2

on SieveofEratosthenes
 put the ticks into time1
 repeat 10
 put 0 into count
 repeat with i=1 to 8191
 put 1 into char i of Flags
 end repeat
 repeat with i=1 to 8191
 if char i of Flags is not zero then
 put i*2+3 into Prime
 put i+Prime into k
 repeat while k<=8190
 put 0 into char k of Flags
 add Prime to k
 end repeat
 end if
 end repeat
 end repeat
 put the ticks into time2
 put count&&”primes in”&&(time2-time1)/60&&”seconds” into field 1
end SieveofEratosthenes

on accuracy
 put the ticks into time1
 put 0.0 into s
 put 0.0 into x
 put 0.00123 into del
 repeat 1000
 add x*x to s
 add del to x
 end repeat
 put the ticks into time2
 put “s=”&s&&”x=”&x&&”in”&&(time2-time1/60&&”seconds” into field 1
end accuracy

Although the sieve as written ran much slower than the published HyperBasic result, I was able to apply some of the code improvement techniques suggested in CompileIt! documentation to get the seive time down to 7.1 seconds on a Plus (compared to HyperBasic’s 7.48). The accuracy benchmark ran unmodified in 2.03 seconds, compared to HyperBasic’s published 2.12 seconds, and produced the correct result s=503.543802; I assume the incorrect result given in Kelly’s Corner is the publisher’d error, not HyperBasic’s. Both scripts were tested with CompileIt! version 1.5, which should have begun shipping in February.

CompileIt! is written entirely in HyperTalk, so it is not necessary to leave HyperCard to compile an XCMD. Although compile time in the current version is slower than HyperBasic, CompileIt! gives the programmer access to over 800 ROM routines (all the traps from all five Inside Macintosh volumes), all documented low-memory globals, and many defined data structures and constants. The list of built-in names is easily expanded to include new constants, data structures, traps, and callbacks, such as those for SuperCard and other programs that take HyperCard-style externals.

CompileIt! is available from Heizer Software (800) 888-7667 as well as several Mac retail outlets.

On the Arrival

Kirk Chase

Anaheim, CA

A number of new items have been recently introduced into the market. On top of the list is the Mac IIfx. This one is sweet. Running at 40Mhz, it is 100% faster than the IIci. Add to this Apple’s new color card with the QuickDraw coprocessor, and you will see 1 bit performance at 24 bits.

Premtech Corporation has announced there Macnifier. This image enlager for the Mac’s 9 inch screen reduces eyestrain by enlarging the image. It also has an anit-glare filter on it. You can contact Premtech at 404-662-1533.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Lyn 1.7.2 - Lightweight image browser an...
Lyn is a fast, lightweight image browser and viewer designed for photographers, graphic artists, and Web designers. Featuring an extremely versatile and aesthetically pleasing interface, it delivers... Read more
Lyn 1.7.2 - Lightweight image browser an...
Lyn is a fast, lightweight image browser and viewer designed for photographers, graphic artists, and Web designers. Featuring an extremely versatile and aesthetically pleasing interface, it delivers... Read more
Tunnelblick 3.6.7beta02 - GUI for OpenVP...
Tunnelblick is a free, open source graphic user interface for OpenVPN on OS X. It provides easy control of OpenVPN client and/or server connections. It comes as a ready-to-use application with all... Read more
jAlbum Pro 13.4 - Organize your digital...
jAlbum Pro has all the features you love in jAlbum, but comes with a commercial license. You can create gorgeous custom photo galleries for the Web without writing a line of code! Beginner-friendly... Read more
calibre 2.65.1 - Complete e-book library...
Calibre is a complete e-book library manager. Organize your collection, convert your books to multiple formats, and sync with all of your devices. Let Calibre be your multi-tasking digital librarian... Read more
jAlbum 13.4 - Create custom photo galler...
With jAlbum, you can create gorgeous custom photo galleries for the Web without writing a line of code! Beginner-friendly, with pro results - Simply drag and drop photos into groups, choose a design... Read more
Backblaze 4.2.0.966 - Online backup serv...
Backblaze is an online backup service designed from the ground-up for the Mac. With unlimited storage available for $5 per month, as well as a free 15-day trial, peace of mind is within reach with... Read more
Backblaze 4.2.0.966 - Online backup serv...
Backblaze is an online backup service designed from the ground-up for the Mac. With unlimited storage available for $5 per month, as well as a free 15-day trial, peace of mind is within reach with... Read more
Tunnelblick 3.6.7beta02 - GUI for OpenVP...
Tunnelblick is a free, open source graphic user interface for OpenVPN on OS X. It provides easy control of OpenVPN client and/or server connections. It comes as a ready-to-use application with all... Read more
calibre 2.65.1 - Complete e-book library...
Calibre is a complete e-book library manager. Organize your collection, convert your books to multiple formats, and sync with all of your devices. Let Calibre be your multi-tasking digital librarian... Read more

Siralim 2 (RPG / Roguelike) (Games)
Siralim 2 (RPG / Roguelike) 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: Siralim 2 is an old-school monster catching RPG. Summon and customize hundreds of creatures to fight for you as... | Read more »
Clean Text (Productivity)
Clean Text 1.0 Device: iOS Universal Category: Productivity Price: $3.99, Version: 1.0 (iTunes) Description: | Read more »
Gemini - A Journey of Two Stars (Games)
Gemini - A Journey of Two Stars 1.0.1 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0.1 (iTunes) Description: *** SPECIAL LAUNCH SALE: $2.99 (25% off) *** "A mesmerizing and unexpectedly emotional journey." -- Los... | Read more »
How to get four NFL superstars for your...
Even though you're probably well on your way to building a top notch squad for the new season in Madden NFL Mobile, let's say you could beef it up by adding Rob Gronkowski, Antonio Brown, Von Miller, and Todd Gurley to your roster. That's... | Read more »
Cartoon Network Superstar Soccer: Goal!!...
Cartoon Network Superstar Soccer: Goal!!! – Multiplayer Sports Game Starring Your Favorite Characters 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: Become a soccer superstar with your... | Read more »
NFL Huddle: What's new in Topps NFL...
Can you smell that? It's the scent of pigskin in the air, which either means that cliches be damned, pigs are flying in your neck of the woods, or the new NFL season is right around the corner. [Read more] | Read more »
FarmVille: Tropic Escape tips, tricks, a...
Maybe farming is passé in mobile games now. Ah, but farming -- and doing a lot of a other things too -- in an island paradise might be a little different. At least you can work on your tan and sip some pina coladas while tending to your crops. [... | 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 »

Price Scanner via MacPrices.net

Global Tablet Shipments Projected to Increase...
Digitimes’ Jim Hsiao reports that global tablet shipments will increase by 16.3 percent sequentially to reach nearly 47 million units in 2016′s third quarter, but that volume will still be down over... Read more
Apple’s 2016 Back to School promotion: Free B...
Purchase a new Mac or iPad using Apple’s Education Store and take up to $300 off MSRP. All teachers, students, and staff of any educational institution qualify for the discount. Shipping is free, and... Read more
Apple refurbished iPad Air 2s available start...
Apple has Certified Refurbished iPad Air 2 available starting at $339. Apple’s one-year warranty is included with each model, and shipping is free: - 128GB Wi-Fi iPad Air 2: $499 - 64GB Wi-Fi iPad... Read more
13-inch 2.5GHz MacBook Pro available for $961...
Overstock has the 13″ 2.5GHz MacBook Pro available for $961.63 including free shipping. Their price is $138 off MSRP. Read more
Clearance 12-inch Retina MacBooks, Apple refu...
Apple has Certified Refurbished 2015 12″ Retina MacBooks available starting at $929. Apple will include a standard one-year warranty with each MacBook, and shipping is free. The following... Read more
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

Jobs Board

*Apple* /Mac Support Engineer - GFI Digital,...
FI Digital, Inc. is currently seeking candidates for a full time Apple Support Engineer to add to our Maryland Heights, Missouri IT team. Candidates must be dynamic Read more
SW Engineer *Apple* TV - Apple Inc. (United...
The Apple TV team is looking for excellent software engineers with experience in hardware, media management, media playback, content delivery and a passion for Read more
Senior *Apple* Administrator - Pratt Instit...
POSITION SUMMARY: Directs the coordination and standardization of campus-wide Apple systems, including planning, analysis and implementation of Apple -related Read more
*Apple* Solutions Consultant - Apple (United...
# Apple Solutions Consultant Job Number: 51218534 Pleasant Hill, California, United States Posted: Aug. 18, 2016 Weekly Hours: 40.00 **Job Summary** As an Apple Read more
*Apple* Retail - Multiple Positions Victor,...
Job Description:SalesSpecialist - Retail Customer Service and SalesTransform 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.