TweetFollow Us on Twitter

Sep 89 Mousehole
Volume Number:5
Issue Number:9
Column Tag:Mousehole Report

Mousehole Report

By Rusty Hodge & Larry Nedry, Mousehole BBS

From: Cheasy

Re: INIT31 Help wanted

Today I’m writing because of some VERY difficult programming problems. At this time, I am trying to write an INIT for use with the INIT 31 mechanism, which will do something like pop up a dialog box onto the screen. (Yes, indeed, I need this during startup!)

Unfortunately, if I call InitWindows from the toolbox, the startup screen is destroyed and the menu bar will be drawn, along with a fresh erased desktop. This is an very ugly effect, especially if there are more than one or two INITs in my System Folder. So I wrote some code to draw some pseudo-dialog boxes, fill them in, handle something like EditText fields and look for mouseDown events in different regions. They all work nice in my testing program. To make them work, I have to initialize a lot of low-memory globals myself, including my own quickdraw globals. This all worked fine.

But when I try to CopyBits the background of my window before drawing onto it, the routine will crash immediately. Nothing works, and even my own QD globals seem to be destroyed. Has anyone out there a little bit experience dealing with quickdraw at startup (INIT31) time? I am interested in any code which shows how to set up and reference to Quickdraw globals at INIT time.

P.S. I apologize my bad english, but in fact, I am only speaking Pascal. (You can ask me for a German version of this bulletin.)

From: Anthony

Re: INIT resources

I have a question, I am working with INIT’s, and just wanted to see if this bit of code would really do the job. It is written in LS C, and is all of one line,

main()
    {
    Sysbeep(5);
    }

I have saved it as an INIT, but when I add it to the list of INIT resources in the system, and reboot, it doesn’t do anything? Why, I don’t want to use the INIT 31 trick, I want this to be a part of the system file, so I don’t have to worry about users carrying it over with them when they switch pc’s.

From: Retzes

Re: INIT resources

I think there are two possible reasons why the INIT didn’t work. One, at the time the init is called the Sound-manager, Operating-System Utilities, or Sound-Driver has not been initialized. Two, the INIT didn’t get called for some other reason. When making an INIT that uses Quickdraw functions, I think you have to call InitGraf with a pointer to some local variables that resemble the Quickdraw globals. This was what seemed to be necessary when I added a function that displayed the ICN# for the INIT at the bottom of the screen at startup. I found out how to do this with TMON, examining another INIT file. First you must decide what you want your INIT to really do, then decide if its possible with the system existing at startup.

From: Bzweig

Re: May MacTutor error?

I use SetupA4 and RestoreA4 in my LSC XCMDs all the time, and I haven’t encountered any problems yet. I can use string constants in my error messages and debugging messages without any problems. I’ve also found it useful to recompile sprintf as a code resource (so it uses A4 instead of A5) so I can easily dump the values of variables from my XCMD during debugging. The procedure for doing this is buried somewhere in the LSC manual. It’s not too hard.

From: Bzweig

Re: bulletproof XCMDs

I was interested to read Don Koscheka’s article on Modularity and Coupling in the June MacTutor. I think that Don should add one additional attribute to all XCMDs in his libraries: all XCMDs should be bulletproof, and should detect and handle (either softly or explicitly) any errors by the invoking script. I bring this up because the GetFilename XFCN is not bulletproof as written in the article. If the user gives more than four parameters to the XFCN, the SFTypeList array will be blown and bad things will result. The soft way to handle this would be to say:

numTypes = (paramPtr->paramCount = 4) ? paramPtr->paramCount : 4;

The other way would be to return an error message in the function result. It sure would be nice if all XFCNs could return errors in a uniform manner, by the way. I personally begin each error message with the characters “!@!#” which I hope would never be a normal result. I’d like to hear any smoother suggestions. Maybe if everyone could agree on the name of a global to report XCMDerrors, like XCMDerr.

From: Mikec

Re: New folders from HyperCard

Is there any way to create new folders form within HyperCard using an XCMD? I have a HyperCard application that needs to create a new folder with the user’s name every time a new user registers. There is nothing in “Inside Mac.” or the Mac Tech Notes on this. Is this a closely guarded secret of the Mac’s finder? Thanks for any info or support.

From: Tonys

Re: INIT using dialog manager

How do I create an INIT using LS Pascal which accesses the dialog manager, such as a simple StopAlert call? I think I know how to access the Quickdraw globals using CurrentA5, but once the dialog has been dismissed, the system bombs. Am I missing some other initializations or have resources labeled incorrectly?

From: Siegel

Re: INIT using dialog manager

You’ll need to call InitWindows, InitFonts, and InitDialogs as well. It’s generally un-INIT-like to fire up the Window Manager. If you want to give a message, use ShowInit to draw your INIT’s icon with an X in it, or something similar.

From: Rguerra

Re: KeyMap Kraziness

Can someone PLEASE help me with manipulating the keyMap and modifier keys in assembly? I have user-definable modifiers stored (derived directly from the event record’s modifiers field. I know that the modifier keys all live in bytes 6 and 7 of the keymap. I can easily MOVE these bytes to a data register, but I can’t seem to figure out how to manipulate the bits of either the stored modifiers or the keyMap bytes, and then determine if they are the same. I have to do this directly in assembly since this is in a patch. I know that this will only take about 4 lines of code, but I can’t quite get it right. (It’s so frustrating since I can do the check so easily in Pascal.) Can someone help? I’d appreciate it.

From: Gurglekat

Re: KeyMap Kraziness

Give the BTST instruction a whirl. I’d tell you more about it but my Motorola 68000 manual seems to have escaped me.

From: Siegel

Re: More Help

To create your own port and fill up black, try this:

main()
{
 GrafPort myPort;   /* static storage */
 InitGraf(&thePort);
 OpenPort(&myPort);
 PaintRect(&myPort.portRect);
}

From: Apage

Re: More Help

Your most obvious problem in this code is your calls to EraseRect and FrameRect.

The Pascal traps are expecting them to be passed as a Pointer to rectangles, however the C compiler will try passing all 16 bytes of each rectangle onto the stack, as per C calling parameters. Change your calls to the following and try again:

        EraseRect(&myPort.portRect);
        FrameRect(&myPort.portRect);

From: Bcbg

Re: More Help

When you call the ROM in C, you must be aware of the standard calling conventions.Every object more than 4 bytes in size or every VAR parameter is passed by “address” and not by “value”. It means that to call EraseRect, you must do:

EraseRect (&myPort.portRect);

Same thing for FrameRect. If you used LSC 3.0 or MPW C 3.0, the compiler would tell you these problems...

From: Cforden

Re: LSC Assembly: Save registers for call?

What registers must I save before I call another routine? Inside Mac (phone book ed.) and LSC (3.0 manual) both hint that registers D0-D2 and A0-A1 are generally considered expendable and are generally trashed by routines. However saying that they (LSC and the toolbox) trash them is not quite the same as saying I am allowed to trash them or let them get trashed. In fact I found that if I did not save those registers prior to calling my LSC wordBreak() routine and restore them upon return, the toolbox would get confused and crash the system. I couldn’t find explicit guidance in Williams’ book “Programming the Macintosh in Assembly Language” (Sybex), but many examples showed all registers being saved by routines.

From: Noisy

Re: LSC Assembly: Save registers for call?

Hmmmm...I thought that the LSC (v3.x) manual (pg. 151) was pretty clear about saving D0-D2/A0-A1, and IMvI says the same. As for what an application can trash, I haven’t had any problems trashing registers prior to Toolbox calls. Like yourself, though, I did get into trouble with ‘call-back’ routines: routines that are provided by the application, but actually called by the Toolbox. (The one that bit me was a List clikLoop) I have adopted the ‘better safe than sorry’ attitude of pushing/popping ALL registers in call-back routines, just to ensure future compatibility if nothing else. The space and time wasted by pushing registers is nothing compared to the agony of trying to figure out which one got trashed by whom!

From: Siegel

Re: LSC Assembly: Save registers for call?

The conservative way to go is to save any registers you use, and if any routines that you call use them, be sure they’re correct.

From: Bruceq

Re: Alternate Screen/Snd

I am currently writing a game for the Mac and need to use the Alternate Screen/sound buffers to make it playable on non 020 machines. I know that I can use the alt. buffers if I force the user to boot off of the master disk, but I would really like to have the game load off of the users harddisk if possible. The problem is the case of MultiFinder running. Does _Launch still allocate the alt buffers for you when asked? What if another program had loaded previously? Will MultiFinder reserve that space or swap it out if the foreground application needs the alternate buffers? Or has Apple decided not to support the alt buffers in the future. I don’t need to use a frame buffer on a 68020 or 030 machine because of the extra HorsePower, but doing full screen animated graphics on a Plus or SE with out the frame buffer is the pits.

Any ideas or higher knowledge?

From: Gurglekat

Re: WMgrPort ?’s

There is a low memory global called DeskHook, $A6C, which according to my Inside Mac X-ref is “Address of procedure for painting desktop or responding to clicks on desktop.” You might ask jbx, whose CompuServe address is 73177,1404, how he did the pop-up menu bar in hierDA -- I’m pretty sure he used this routine. If not, you might want to contact the DeskPict people.

From: Gus

Re: ANIMATION

Hey there guys. I’m writing a freeware game for the MAC and am interested in how you guys do flicker free animation?? I’ve tried everything. Is there some secret I don’t know about?? Code would really be appreciated. Also I’m using a Mac+ and I’m, writing in LSC. I would really appreciate any help as you guys are my last hope before that programming black hole.

From: Inbox

Re: ANIMATION

You can read about it in Scott Knaster’s ‘How to Program Macintosh Software’. Anyway, here’s the advice given there: (I’ll condense it...) It says that the first thing that occurs in the vertical retrace interrupt, is that the global variable Ticks gets incremented. So you can draw right after the interrupt occurs, before the beam actually draws the stuff on the screen. So, here’s the suggested code of your drawing proc:

  Var  tickValue : longint;
  begin
  tickvalue := TickCount;{calls ROM to get value of Ticks}
  repeat until (tickValue <> TickCount)
  { start drawing fast!! here...}

That loop waits until the interrupt occurs, and then you should draw. Keep in mind that the top of the window should be drawn before the bottom (if possible) because the electron beam goes from top to bottom.

From: Tan

Re: Scrolling

What you could do is to use ScrollRect, that’ll take care of most of the window that’s scrolled. The new portion of the window contents that need to be redrawn can be clipped. As there’s less to draw on the screen, it would be faster. Of course, another way is to cache a margin around the current visible area in an offscreen bitmap and blit it in when you scroll to the cached area. You’ll need four caches for each of the four directions you can scroll in. I think Excel does something like that to speed the scrolling.

From: Moreno

Re: Scrolling

Here is some pseudo code for determining if you should draw a line in your apps window

theUpdateRgn := NewRgn; { create a temporary region, NewRgn returns a 
region HANDLE }
ScrollRect(windowRect_Minus_One_Line_at_Top_Or_Bottom, +_or_-_One_Line_Height,
0, theUpdateRgn);
{ don’t forget to subtrac the scrollbars from the window rect }
trect:=theUpdateRgn^^.rgnBBox;
SetRect(DrawingRect,{ you fill in the blanks it’s not MY
program}left,top,right,bottom);
IF RectInRgn(DrawingRect, YourWindow^.visRgn) AND RectInRgn(DrawingRect,
YourWindow^.clipRgn) THEN
BEGIN
{ draw the top or bottom line if scrolling by on line }
END;

From: Inbox

Re: TEdit

Does anyone know of a good way to replace (or designate) the text in a Text Edit record? I did the following, and it didn’t quite work... vat sheesh.. make that VAR

  myTeh : TEHandle;
  myStrHandle : StringHandle;
  myStr : String[20];
begin
myStr := ‘ 20 letters go here  ... ‘;
myStrHandle := NewString(myStr);
myTeh^^.hText := Handle(myStrHandle);
TECalText(myTeh);
end;

What happens is that a garbage char gets displayed along with the first 17 or so characters of myStr; And the ASCII value of the char is 20, and so is the length of the string. So, I think that the type coercion from StringHandle to Handle makes it point to the length of the string and not to the contents. I don’t know what to do with this, because I’m using LSP 2.0. If this was in C, no problem. But I don’t know how to do this in Pascal. So, I FOUGHT THE ROM AND THE ROM WON!!! < a sob is heard here> ANY suggestions are greatly appreciated.

From: Gurglekat

Re: TEdit

Just in case you’ve not got an answer yet, the garbage character is the Pascal length byte. NewString passes you back a StringHandle, which points to a chunk of mem headed by the length byte, which is followed by the letters of the string. In order to do what you are doing while maintaining your code, it might be best to do

BlockMove(@myStrHandle^^[1], @myStrHandle^^[0], length(myStr));
SetHandleSize(Handle(myStrHandle)), GetHandleSize( Handle(myStrHandle))-1);

before installing the handle and TECalText’ing. However, I think you should use

   TEInsert(@myStr[1],length(myStr),myTeh);

which avoids the StringHandle muddle altogether. TEInsert will take care of space for the text, if that’s what you’re worried about.

From: Gurglekat

Re: TEdit

Ah. Forgot to mention -- the TECalText becomes unnecessary if you use the TEInsert method.

From: Inbox

Re: TEdit

I thought that this was the garbage char. Thank you very much for your suggestion. However, I don’t think that TEInsert is the way to go because I have to clear the text that was already there. Anyway, I’m using this scheme in a spreadsheet program I’m writing (and, no, I don’t plan to put Microsoft out of business) for input to and from cells. The new text has to be shown when a new cell is selected, and that’s where the garbage char problem comes in. Is there a better way to do cell input?

From: Pdyson

Re: Shutdown under Multifinder

A good Multifinder-friendly app quits gracefully when the user gives the Restart or Shutdown command from the Finder’s Special menu. But what is the secret of writing an app to receive and obey this message from the Finder? I downloaded the TEsample.C from Apple DTS, modified it for LSC 3.0 and Lo! it simply refuses to die when the Finder calls for a restart.

The app has 4 mstr resources (100-103) and (since I simply cribbed it from DTS) should be correct in the way it dispatches events. I am mystified.

From: MacDTS

Re: Shutdown under Multifinder

I would guess the “Quit” item in the File menu has more than what you’re specifying in ‘mstr’. Look for some spaces after the Quit string. I’ve heard about this problem before with LSC.

From: Pdyson

Re: Shutdown under Multifinder

Aaah, the way things become obvious after someone else points them out. Problem due to my own sloppy typing, no fault of LSC here.

Much thanks for the help.

From: Rapier

Re: GrowZone, cbNeeded

I’ve got a GrowZone proc that seemed to work fine, except that, occasionally, I get a negative number for cbNeeded. I’m using LSP 2.01, and my test program is allocating $9000 bytes. The value of cbNeeded is FFFF9008!! Is this an OS bug, a weirdness with LSP’s Zone, or something unheard of??.

I don’t want to add a special negative number handler without knowing why, and I want to put off going into Macsbug if someone already knows what’s happening.

Any help would be appreciated.

From: Brad

Re: GrowZone, cbNeeded

How are you allocating the memory? If you are using $9000 as a constant, try changing it to $09000, which will force the Compiler to use a LONGINT. It might be sign extending the $9000 (which is -28672 in decimal), in which case you would be asking for a HUGE block of memory. I think the memory manager treats memory requests as unsigned.

From: Nfong

Re: ioFLAttrib

I’m trying to set the protect bit in ioFlAttrib with PBSetCatInfo but can’t seem to get it to work. It returns with no error but doesn’t do anything. Anyone got any suggestions?

From: Inbox

Re: bundle bit

Does anyone know whether it’s possible to set the bundle bit using ResEdit? I’m using LSC 3.0, and couldn’t get the icon to be recognized.

From: Spud

Re: bundle bit

There was an old version of ResEdit that had the Changed and Bundle bits mixed up; you clicked on the Bundle checkbox and the Changed bit was set, and vice versa. The good ol’ boys at Apple have fixed that little mishap since then, and I’m sure that the version here (version 1.2) has the fix.

From: Zarko

Re: PenMode funnies

Beware of wrong PenMode() calls. If you mistakenly pass srcXOR (0x02) instead of patXOR (0x0A), then the intended XOR drawing effect WILL take place on a Mac II, but not on a Mac+. IM says that the source modes will cause no drawing to take place - not true for the II.

From: Eau

Re: bundle bit

Yes, you can set the bundle bit with ResEdit. Do ‘command-I’ when a file is selected, and a window will appear, which has a checkbox for Bundle. To get the Finder to recognize the icon, you will probably have to move the file to a different folder. The Finder will not automatically pick up changed bundle bits. Of course, the file should also contain resources defining the icons.

When I’ve got an application, and I want the Finder to re-read the bundle information, I move it between the top-level and a subdirectory on my hard disk. This works pretty well. Hope this helps.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

MacUpdate Desktop 6.0.8 - Search and ins...
MacUpdate Desktop 6 brings seamless 1-click installs and version updates to your Mac. With a free MacUpdate account and MacUpdate Desktop 6, Mac users can now install almost any Mac app on macupdate.... Read more
BitTorrent Sync 2.1.1 - Sync files secur...
BitTorrent Sync allows you to sync unlimited files between your own devices, or share a folder with friends and family to automatically sync anything. File transfers are encrypted. Your information... Read more
Quicksilver 1.3.0 - Application launcher...
Quicksilver is a light, fast and free Mac application that gives you the power to control your Mac with keystrokes alone. Quicksilver allows you to find what you need quickly and easily, then act... Read more
iWatermark Pro 1.72 - Easily add waterma...
iWatermark Pro is the essential watermarking app for professional, business, and personal use. iWatermark, is the number 1 and only watermarking tool available for all 4 platforms iPhone/iPad, Mac,... Read more
RapidWeaver 6.3 - Create template-based...
RapidWeaver is a next-generation Web design application to help you easily create professional-looking Web sites in minutes. No knowledge of complex code is required, RapidWeaver will take care of... Read more
Adobe Photoshop CC 2015 16.0.1 - Profess...
Photoshop CC 2015 is available as part of Adobe Creative Cloud for as little as $19.99/month (or $9.99/month if you're a previous Photoshop customer). Photoshop CS6 is still available for purchase (... Read more
Together 3.4.6 - Store and organize all...
Together helps you organize your Mac, giving you the ability to store, edit and preview your files in a single clean, uncluttered interface. Smart storage. With simple drag-and-drop functionality,... Read more
Monosnap 3.1.0 - Versatile screenshot ut...
Monosnap lets you capture screenshots, share files, and record video and .gifs! Capture: Capture full screen, just part of the screen, or a selected window Make your crop area pixel perfect with... Read more
Cocktail 8.5.1 - General maintenance and...
Cocktail is a general purpose utility for OS X that lets you clean, repair and optimize your Mac. It is a powerful digital toolset that helps hundreds of thousands of Mac users around the world get... Read more
Vienna 3.0.6 :5eaf312: - RSS and Atom ne...
Vienna is a freeware and Open-Source RSS/Atom newsreader with article storage and management via a SQLite database, written in Objective-C and Cocoa, for the OS X operating system. It provides... Read more

Five Nights at Freddy's 4 has Been...
In keeping with tradition, Five Nights at Freddy's 4 has made its way to the App Store with zero warning fanfare. Honestly I'd be disappointed it if happened any other way at this point. [Read more] | Read more »
Doom & Destiny Advanced (Games)
Doom & Destiny Advanced 2.3.4.0 Device: iOS Universal Category: Games Price: $.99, Version: 2.3.4.0 (iTunes) Description: ---SUPER GIGA LAUNCH DISCOUNT! Get it now for cheap or pay more later!---An additional 143 MB download is... | Read more »
Five Nights at Freddys 4 (Games)
Five Nights at Freddys 4 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: This time, the terror has followed you home. | Read more »
This Week at 148Apps: July 27-31, 2015
Winding Down July With 148Apps How do you know what apps are worth your time and money? Just look to the review team at 148Apps. We sort through the chaos and find the apps you're looking for. The ones we love become Editor’s Choice, standing out... | Read more »
You'll Want to Keep an Eye Out for...
If you're the kind of person who had fun hunting down and completing all the codex puzzles in Assassin's Creed 2, then are you ever in for a treat. The Guides looks like it's going to be a very robust collection of similarily odd, seemingly... | Read more »
Vivid Games has Announced Real Boxing 2...
The original Real Boxing was a pretty impressive bit of fisticuffs, but if the trailer Vivid Games is showing off for GamesCom is any indication Real Boxing 2 is going to be even better. [Read more] | Read more »
PAC-MAN Championship Edition DX - Tips,...
[Read more] | Read more »
Card King: Dragon Wars - Tips, Tricks an...
[Read more] | Read more »
Pac-Man Championship Edition DX has brou...
Bandai Namco has released Pac-Man Championship Edition DX on iOS and Android, which features the classic arcade gameplay that we've all grown to love. Pac-Man Championship Edition DX can be enjoyed in much shorter bursts than the arcade versions... | Read more »
Cosmonautica (Games)
Cosmonautica 1.1 Device: iOS Universal Category: Games Price: $6.99, Version: 1.1 (iTunes) Description: Cast off! Are you ready for some hilarious adventures in outer space? | Read more »

Price Scanner via MacPrices.net

MacBook 12 Retina Pundit’s New Favorite Mac
If you’re eyeing the purchase of a new 12-inch Retina MacBook, but wondering if you can live with a single USB-C port, 2011-level CPU performance, and the unorthodox keyboard, you should find... Read more
PDF Element Tool Kit For PDF For Windows 10,...
South Surrey, British Columbia based software developer Wondershare has posted an interesting infographic tracking the development of Microsoft’s flagship Windows operating system over the years,... Read more
27-inch 3.5GHz 5K iMac on sale for $81 off MS...
Adorama has the 27″ 3.5GHz 5K iMac on sale for $2218, $81 off MSRP, including a free copy of Apple’s 3-Year AppleCare Protection Plan. Shipping is free, and Adorama charges sales tax in NY & NJ... Read more
Back-to-School with Tablet and Smartphone Acc...
Belkin helps you prepare for the coming school year with a wide variety of the latest mobile and tablet accessories to outfit both grade school and college students. The line-up includes charging... Read more
11-inch MacBook Airs on sale for $100 off MSR...
Best Buy has 11-inch MacBook Airs on sale for $100 off MSRP. Choose free shipping or free local store pickup (if available). Sale prices for online orders only, in-store prices may vary: - 11″ 1.6GHz... Read more
iPad Air 2 on sale for up to $100 off MSRP
Best Buy has iPad Air 2s on sale for up to $100 off MSRP on their online store for a limited time. Choose free shipping or free local store pickup (if available). Sale prices available for online... Read more
Sale! 13-inch MacBook Pros on sale for $100 o...
B&H Photo has 13″ MacBook Pros on sale for $100 off MSRP. Shipping is free, and B&H charges NY sales tax only: - 13″ 2.5GHz/500GB MacBook Pro: $999.99 save $100 - 13″ 2.7GHz/128GB Retina... Read more
Sale! Save $100 on 13-inch MacBook Airs this...
B&H Photo has the 13″ 1.6GHz/128GB MacBook Air on sale for $899.99 including free shipping plus NY tax only. Their price is $100 off MSRP, and it’s the lowest price available for this model.... Read more
Worldwide Tablet Market Decline Continues, Ap...
The worldwide tablet market declined -7.0% year-over-year in the second quarter of 2015 (2Q15) with shipments totaling 44.7 million units according to preliminary data from the International Data... Read more
TP-LINK TL-PA8030P KIT Powerline Featuring Ho...
Consumer and business networking products provider TP-LINK is now shipping its TL-PA8030P KIT AV1200 3-Port Gigabit Passthrough Powerline Starter Kit that expands your home’s network over its... Read more

Jobs Board

*Apple* Retail - Multiple Positions (US) - A...
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
Infrastructure Engineer - *Apple* /Mac - Hil...
Infrastructure Engineer - Apple /Mac Job Code: 1608 # of openings: 1 Description Our fortune 500 client is looking to hire an experienced Infrastructure Engineer to join Read more
Executive Administrative Assistant, *Apple*...
…supporting presentation development for senior leadership. * User experience with Apple hardware and software is preferred. Additional Requirements The following list Read more
*Apple* Bus Company is now hirin - Apple Bus...
Apple Bus Company is now hiring school bus drivers in the Pettis County area. Class B CDL preferred. Free training provided. No nights or weekends required. Flexible Read more
*Apple* Certified Mac Technician - Updated 6...
…and friendly, hands-on technical support to customers troubleshooting and repairing Apple /Mac products with courtesy, speed and skill. Use your problem-solving skills Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.