TweetFollow Us on Twitter

Scrolling ZBASIC
Volume Number:3
Issue Number:4
Column Tag:Basic School

Scrolling in ZBASIC

By Dave Kelly, MacTutor Editorial Board

ZBASIC SCROLLING

Thus far it has not been made widely known what or how the ZBasic Scroll Buttons could be used. Of course, they return a value relating to the position of the scroll bar, but until now how to use the scroll bar for scrolling text has eluded me. Part of the problem comes when reading in the ZBasic manual which states "SCROLLing windows with Buttons or Scroll bars will cause interesting AND unpredictable results." (pg. D-56). This implies to me that SCROLLing is not meant to be used with Scroll bars. However, after questioning Zedcor about this, they sent me a demo scroll program which does just that, scrolling with Scroll bars. There is a requirement however. The routine doesn't quite work right without version 3.05 or greater. Earlier versions of ZBasic don't clear the screen and update properly. [In particular, the current official version 3.03, when doing a slow scroll, begins mashing the bottom window frame to a nice black mush. The next official release is due April 2nd. A new manual is also being prepared. -Ed] Hopefully, by the time you are reading this you have already upgraded to version 3.05 or greater. Zedcor really has been very good at updating those people who have already purchased ZBasic. You should know that they want $19.95 to upgrade if you have had your copy for 60 days or more. Most of the upgrades have included significant improvements which should have worked to begin with (those upgrades should be free!). Most improvements have been bug fixes. I'm looking forward to the much needed editor that will soon be included in a future upgrade. Zedcor promises to soon release an editor that will highlight keywords in bold face similar to the MS BASIC editor.

Well, back to SCROLLing. The Zedcor demo program demonstrates to us how we can use Scroll bars and the SCROLL statement to scroll text. The SCROLL statement allows you to scroll a selected area of a window. Although the concept of how the scrolling works is simple, the implementation is somehow complex. The thing that makes it seem complex is the many variables that are required to keep track of how much the window needs to be scrolled and which line of text should be displayed at the top of the screen. If you take time to study out the routine you can easily adapt it for use in your own programs.

The Scroll bars in ZBasic are set up by using the SCROLL BUTTON statement. A SCROLL BUTTON is a control which works much like other buttons in that when ON DIALOG is used to trap events the BUTTON (button number) function will return the value of the SCROLL bar's position. The syntax for the SCROLL BUTTON is:

SCROLL BUTTON [#] button number, current value [[, min value], max value][,[page 
up/down][, (x1,y1)- (x2,y2)] [, type]]].  

The unfortunate thing about the ZBasic Scroll bars is that there is no provision for scrolling the text being edited in an EDIT FIELD statement. (Up to now, none of the versions of BASIC have provided a way to do this, except the still undocumented statements for text edit in version 3.0 of MS BASIC). The alternative is to use the toolbox statements (which are not yet proven to be reliable) to access the text edit routines in the ROMs. This would still require some manipulation to use the Scroll bars with the ROM text edit routines. It would be nice to have routines which automatically link text edit capabilities with the scrolling. Even some routines that linked scroll bars and text edit half way would be a help. For reference, take a look at the January 1986 issue of MacTutor. In that article I show examples of using CLR Libraries for scrolling text. (These libraries are now included with version 3.0 of MS BASIC and also with the MS BASIC Compiler). The CLR Libraries statements make using Scroll bars easier, but even these are limited. ZBasic's scroll bars may be considered as totally independent of other functions or statements. CLR Libraries are easier to implement (but they don't work with ZBasic).

There are two kinds of scrolling demonstrated by Zedcor's demo program. SoftScrolling is done by scrolling the text by one pixel at a time. Normal scrolling will scroll one line at a time. The line height is calculated by getting font information via the GETFONTINFO toolbox call. For most text applications the normal scrolling is more appropriate. Softscrolling is somewhat slow because it takes more steps to scroll one pixel at a time than to scroll a whole line.

Z-INDEX Scrolling

ZBasic has provided BASIC programmers with some unique statements not found in other versions of BASIC. We will discuss one of these now in order to familiarize ourselves with it. The INDEX$ statement provides users with an automatic way to insert, delete, edit and find data stored in an array.

The Macintosh version of ZBasic allows ten INDEX$ arrays to be active (only one INDEX$ array in other versions). The array looks and feels much like any other array that you may decide to use except that there are special statements to enhance array manipulation. The first thing that is done when using INDEX$ statements is to set up some memory which can be used for the arrays. This is accomplished with the CLEAR nnnnnnn [,index#] statement, where index# is the number of the INDEX$ array to be used. You may consider this as a multi-dimension array except that the second dimension range is from 0 to 9. You may use the MEM [(index#)] to determine the total memory available. ZBasic allows you to insert, replace, delete and find data with the following statements:

INDEX$ (element# [,index#]) = string : use to set an array element to a string.

INDEX$I (element# [,index#]) = string : use to insert a string at element#. The array contents in elements equal to or greater than element# are moved to the next higher element# to make room for the new element.

INDEX$D (element# [,index#]) = string : use to delete a string at element#. The array contents in elements equal to or greater than element# are moved down to the next lower element#.

Clearly these are valuable statements especially when inserting data into a file or into a proper order. The example program demonstrates the use of INDEX$ to insert data into a list. The scroll demo has been integrated into the program to scroll through the list. Also the INDEXF statement is used to search for a set string and the program lists the remainder of the list starting with the value searched for. To reset to all records, just find the first record again. There could be much more refinement to the program I'll leave that up to you. The programs are sufficient examples to get you started. One problem I ran into while working with the INDEX-SCROLL example is that I forgot to access the first window after closing the second window (which was used for input). By simply using the WINDOW #1 statement the output will then go to the first window for subsequent statements. If you don't do this you may get a bomb because you closed the window you specified for printing, but didn't respecify a new window. There are a few other subtle things that may affect the way your program works. The Zedcor example uses GOTO occasionally. I try to stay away from this one whenever I can, but since the Zedcor routine works, why re-invent the wheel. You may want to change all GOTOs to GOSUBs to be consistent with the structured programming approach. I modified some of the GOTOs already so there are fewer than there used to be.

REM *********** Text Window Scroll Bar(s) Example
REM    ZBasic 3.05 or Greater 1/87 A.G ZEDCOR, INC.
REM    with modifications & explainations 2/87 
REM    by D. Kelly  MacTutor™
REM *************************************************
WINDOW OFF
COORDINATE WINDOW
WIDTH -2
False = 0 : True = NOT False
X=MEM(-1) :REM *** Disable Line Wrap ***
WINDOW 1,"Untitled",(50,50)-(450,255),9
 REM ** Initial Window Size **
TEXT 4,9
MENU 1,0,1,"File"
MENU 1,1,1,"Open"
MENU 1,2,0,"-"
MENU 1,3,1,"Quit"
MENU 2,0,1,"Scroll Type"
MENU 2,1,1,"Normal Scroll"
MENU 2,2,1,"Soft Scroll"
DIM Ascent,Descent,WidMax,Leading
CALL GETFONTINFO(Ascent)
Height=Ascent+Descent+Leading :REM * Font Size *
GOSUB "Openfile"
OV=False 
OH=True 
Softscroll=False : REM ** Softscroll = Soft-Scroll Flag **
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1 
SCROLL BUTTON 2,OH,OH,255,10,,2
ON DIALOG GOSUB "Dialog"
ON MENU GOSUB "MenuEvent"
WINDOW#1,A$ : REM *** File name to Title ***
DIALOG ON
MENU ON
BREAK ON : REM **0=Normal Scroll 1=Soft Scroll **
"Loop"    : GOTO "Loop" : REM  Main Event Trapping Loop

DIALOG OFF: BREAK OFF :MENU OFF
REM *** Turn OFF dialogs for rest of PGM ***
"MenuEvent"
Menunumber = MENU(0)
Menuitem = MENU(1)
LONG IF Menunumber = 1 
IF Menuitem = 1 THEN GOSUB "Openfile"
IF Menuitem = 3 THEN STOP
END IF
IF Menuitem = 1 THEN Softscroll = 0 ELSE Softscroll = 1
MENU
RETURN

"Dialog"  : D=DIALOG(0) : REM  Dialog Events here.. 
ON D GOTO "Button","X","ACTIVE","GoAway","Update","X","X","Zoom","Zoom"
"ACTIVE"
WINDOW #DIALOG(D) 
RETURN : REM ** Activate this Window **
"Button"
IF DIALOG(D)=1 THEN Buttonvalue=BUTTON(1)  ELSE "Side"
X=OV-Buttonvalue
IF ABS(X) > SL THEN OV=Buttonvalue : CLS : GOTO "Update"
IF X>0 THEN DV=Height :DL=-1 : Leading=0 : P=Ascent ELSE       DV=-Height 
:DL=+1 :Leading=SL+1 :  P=(SL-1)*Height+Ascent
WHILE OV<>Buttonvalue
IF Softscroll THEN DV=SGN(DV) : II=1 ELSE II=Height
FOR II=II TO Height 
SCROLL (0,0)-(W6,W7),,DV : REM  SCROLL 1 line or 1 Pixel
PRINT %(-BUTTON(2)*WidMax, P+(DV*(II-Height)));    INDEX$(OV-1+Leading);
NEXT 
OV=OV+DL : REM  Remove NEXT if soft-scroll not used
WEND   : RETURN
"Zoom" 
CLS : RETURN : REM  ERASE IF ZOOM-IN OR ZOOM OUT
"Side" 
SCROLL(0,0)-(W6,W7),(OH-BUTTON(2))*WidMax,0:OH=BUTTON(2)
"Update"
W6=WINDOW(6)-1 : W7=WINDOW(7)-1 : SL=W7/Height
FOR II= OV TO OV+SL-1 : REM  Re-Draw Full Screen 
PRINT %(-BUTTON(2)*WidMax, (II-OV)*Height+Ascent);INDEX$(II);
NEXT
COLOR 0 :BOX FILL 0,SL*Height TO W6,W7 :COLOR -1
REM *Erase Bottom*
"X" 
RETURN : REM  **** Just RETURN routine ****
"GoAway"
STOP
"Openfile" : A$=FILES$(1,"TEXT",,V%) 
IF A$="" THEN BEEP : STOP ELSE CLS
OPEN "I",#1,A$,1,V% 
CLEAR LOF(1)+32
TL=0 
IF MEM=0 THEN STOP
WHILE NOT EOF(1)
REM ****> Read TEXT file into INDEX$ array <*****
LINEINPUT#1,W$
INDEX$(TL)=W$ 
TL=TL+1 : REM FILL INDEX$ FROM FILE
WEND 
CLOSE 
RETURN
REM ****************************************************
REM ** Some Possible Changes: 
REM ** Line 210 Change 'ABS(X) > SL' to 'ABS(X) > 1' Single REM      
  Line Soft    
REM ** Add 'CLEAR 0' to Erase INDEX$ Array When Text 
REM         Window Closed. 
REM **********************************************************


REM ********* INDEX Scroll Bar(s) Demo
REM *** ZBasic 3.05 or Greater
REM *** by D. Kelly  MacTutor™  April 1987
REM****************************************
WINDOW OFF
COORDINATE WINDOW
DIM ST(30,1)
CLEAR 11000
TL = 0
WIDTH -2
False = 0 : True = NOT False
X=MEM(-1) :REM *** Disable Line Wrap
WINDOW 1,"INDEX / SCROLL Demo",(50,50)-(450,255),9
REM  ** Initial Window Size **
TEXT 4,9
MENU 1,0,1,"File"
MENU 1,1,1,"Quit"
MENU 2,0,1,"Scroll Type"
MENU 2,1,1,"Normal Scroll"
MENU 2,2,1,"Soft Scroll"
MENU 3,0,1,"INDEX Demo"
MENU 3,1,1,"Add Record/A"
MENU 3,2,1,"Insert Record/I"
MENU 3,3,1,"Edit Record/E"
MENU 3,4,1,"Find Record/F"
MENU 3,5,1,"Delete Record/D"
DIM Ascent,Descent,WidMax,Leading
CALL GETFONTINFO(Ascent)
Height=Ascent+Descent+Leading :REM * Font Size *
OV=False 
OH=True 
Softscroll=False : REM  Softscroll = Soft-Scroll Flag 
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1 
SCROLL BUTTON 2,OH,OH,255,10,,2
ON DIALOG GOSUB "Dialog"
ON MENU GOSUB "MenuEvent"
DIALOG ON
MENU ON
BREAK ON : REM 0=Normal Scroll 1=Soft Scroll 
"Loop"    : GOTO "Loop" : REM  Main Event Loop

DIALOG OFF: BREAK OFF :MENU OFF
REM  Turn OFF dialogs for rest of PGM
"MenuEvent"
Menunumber = MENU(0)
Menuitem = MENU(1)
ON Menunumber GOSUB "File","Scroll","Index"
MENU
RETURN

"File"
IF Menunumber = 1 THEN STOP
RETURN
"Scroll"
IF Menuitem = 1 THEN Softscroll = 0 ELSE Softscroll = 1
RETURN
"Index"
ON Menuitem GOSUB "Add","Insert","Change","Find","Delete"
RETURN
"Dialog"  : D=DIALOG(0) : REM Dialog come here.. 
ON D GOTO "Button", "X", "Active", "GoAway", "Update", "X", "X", 
 "Zoom", "Zoom"
"Active"
WINDOW #DIALOG(D) 
RETURN : REM ** Activate this Window **
"Button"
IF DIALOG(D)=1 THEN Buttonvalue=BUTTON(1)  ELSE "Side"
X=OV-Buttonvalue
IF ABS(X) > SL THEN OV=Buttonvalue : CLS : GOTO "Update"
IF X>0 THEN DV=Height :DL=-1 :Leading=0 :P=Ascent ELSE 
 DV=-Height :DL=+1 :Leading=SL+1 : P=(SL-1)*Height+Ascent
WHILE OV<>Buttonvalue
IF Softscroll THEN DV=SGN(DV) : II=1 ELSE II=Height
FOR II=II TO Height 
SCROLL (0,0)-(W6,W7),,DV : REM SCROLL 1 line or 1 Pixel
PRINT %(-BUTTON(2)*WidMax, P+(DV*(II-Height)));    INDEX$(OV-1+Leading);
NEXT 
OV=OV+DL : REM Remove NEXT if soft-scroll not used 
WEND   : RETURN
"Zoom" 
CLS : RETURN : REM  ERASE IF ZOOM-IN OR ZOOM OUT
"Side" 
SCROLL(0,0)-(W6,W7),(OH-BUTTON(2))*WidMax,0:OH=BUTTON(2)
"Update"
W6=WINDOW(6)-1 : W7=WINDOW(7)-1 : SL=W7/Height
FOR II= OV TO OV+SL-1 : REM Re-Draw Full Screen 
PRINT %(-BUTTON(2)*WidMax, (II-OV)*Height+Ascent);INDEX$(II);
NEXT
COLOR 0 :BOX FILL 0,SL*Height TO W6,W7 :COLOR -1
REM *Erase Bottom*
"X" 
RETURN : REM  **** Just RETURN routine ****
"GoAway"
WINDOW CLOSE DIALOG(4):RETURN
"Insert"
WINDOW 2,"Insert",(100,100)-(400,200),-263
TEXT 2,0 : LOCATE 1,2
INPUT "Insert record before #:";N
IF N<0 THEN N=0
IF N>TL THEN N=TL
INPUT "Insert record: ";W$
INDEX$I (N) = W$
TL = TL + 1
WINDOW CLOSE 2
WINDOW 1
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1
CLS:GOSUB "Update"
RETURN
"Add"
WINDOW 2,"Insert",(100,100)-(400,200),-263
TEXT 2,0 : LOCATE 1,2
INPUT "Add record: ";W$
INDEX$ (TL) = W$
TL = TL + 1
WINDOW CLOSE 2
WINDOW 1
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1
RETURN
"Delete"
WINDOW 2,"Delete",(100,100)-(400,200),-263
TEXT 2,0 : LOCATE 1,2
INPUT "Record number to delete: (<0 to abort)";N
IF N>=0 THEN INDEX$D(N) : TL = TL - 1
WINDOW CLOSE 2
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1
WINDOW 1
CLS:GOSUB "Update"
RETURN
"Change"
WINDOW 2,"Change",(100,100)-(400,200),-263
TEXT 2,0 : LOCATE 1,2
INPUT "Record number to Change: (<0 to abort)";N
PRINT "Current record is ";INDEX$(N)
INPUT "Change record to:";W$
IF W$ = "" THEN W$ = INDEX$(N)
INDEX$(N) = W$
WINDOW CLOSE 2
WINDOW 1
CLS:GOSUB "Update"
RETURN
"Find"
WINDOW 2,"Find",(100,100)-(400,200),-263
TEXT 2,0 : LOCATE 1,2
INPUT "Record string to Find:";W$
OV=INDEXF(W$)
WINDOW CLOSE 2
WINDOW 1
SCROLL BUTTON 1,OV,OV,TL-1,TL/10,,1
CLS:GOSUB "Update"
RETURN

There is some new news on the BASIC WARS scene. Pterodactyl Software is back to work on the PCMacBasic compiler. Version 1.96 is out and a new manual. Most of the improvements are in reliability. Functionally it appears to be the same BASIC as before, but with less problems with HFS. It now finds all of the necessary files no matter where they are located. PCMacBasic still has good potential as it is the only BASIC that will interface with MDS and MPW. MPW support is coming very soon. Most of my comments from my previous reviews still hold except for what I have mentioned here.

Stay in touch for more info on products for BASIC. Currently ZBasic is at version 3.05, True Basic is at 1.1 (still), Softworks Basic (no change), MS Basic interpreter 3.0, MS Basic Compiler 1.0, PCMacBasic 1.96.

Any questions, just drop me a note care of MacTutor. I'm trying to answer some of your questions now. Please be patient because some of the questions you have asked involve changes that Zedcor is making as they constantly improve ZBasic. DIALOG statements which I commented on in the January 1987 MacTutor do not work properly in versions before 3.05. If you compile the programs in this month's issue with anything earlier than 3.05 you will see that there are problems with those earlier versions. It has been extremely difficult to work with a product which has evolved so rapidly. When troubleshooting programs I have written, it has been a challenge to determine if the problems were caused by bugs in the compiler or bugs in my source code. Check your own code first, then if you're pretty sure your code is ok you can start blaming the compiler. I've found times when both the compiler and the source code (my source code) was at fault. Please write if you are experiencing some difficulties.

 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Skype 8.52.0.138 - Voice-over-internet p...
Skype allows you to talk to friends, family and co-workers across the Internet without the inconvenience of long distance telephone charges. Using peer-to-peer data transmission technology, Skype... Read more
Bookends 13.2.6 - Reference management a...
Bookends is a full-featured bibliography/reference and information-management system for students and professionals. Bookends uses the cloud to sync reference libraries on all the Macs you use.... Read more
BusyContacts 1.4.0 - Fast, efficient con...
BusyContacts is a contact manager for OS X that makes creating, finding, and managing contacts faster and more efficient. It brings to contact management the same power, flexibility, and sharing... Read more
Chromium 77.0.3865.75 - Fast and stable...
Chromium is an open-source browser project that aims to build a safer, faster, and more stable way for all Internet users to experience the web. Version 77.0.3865.75: A list of changes is available... Read more
DiskCatalogMaker 7.5.5 - Catalog your di...
DiskCatalogMaker is a simple disk management tool which catalogs disks. Simple, light-weight, and fast Finder-like intuitive look and feel Super-fast search algorithm Can compress catalog data for... Read more
Alfred 4.0.4 - Quick launcher for apps a...
Alfred is an award-winning productivity application for OS X. Alfred saves you time when you search for files online or on your Mac. Be more productive with hotkeys, keywords, and file actions at... Read more
A Better Finder Rename 10.45 - File, pho...
A Better Finder Rename is the most complete renaming solution available on the market today. That's why, since 1996, tens of thousands of hobbyists, professionals and businesses depend on A Better... Read more
iFinance 4.5.11 - Comprehensively manage...
iFinance allows you to keep track of your income and spending -- from your lunchbreak coffee to your new car -- in the most convenient and fastest way. Clearly arranged transaction lists of all your... Read more
OmniGraffle Pro 7.11.3 - 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
BBEdit 12.6.7 - 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

Latest Forum Discussions

See All

Five Nights at Freddy's AR: Special...
Five Nights at Freddy's AR: Special Delivery is a terrifying new nightmare from developer Illumix. Last week, FNAF fans were sent into a frenzy by a short teaser for what we now know to be Special Delivery. Those in the comments were quick to... | Read more »
Rush Rally 3's new live events are...
Last week, Rush Rally 3 got updated with live events, and it’s one of the best things to happen to racing games on mobile. Prior to this update, the game already had multiplayer, but live events are more convenient in the sense that it’s somewhat... | Read more »
Why your free-to-play racer sucks
It’s been this way for a while now, but playing Hot Wheels Infinite Loop really highlights a big issue with free-to-play mobile racing games: They suck. It doesn’t matter if you’re trying going for realism, cart racing, or arcade nonsense, they’re... | Read more »
Steam Link Spotlight - The Banner Saga 3
Steam Link Spotlight is a new feature where we take a look at PC games that play exceptionally well using the Steam Link app. Our last entry talked about Terry Cavanaugh’s incredible Dicey Dungeons. Read about how it’s a great mobile experience... | Read more »
PSA: GRIS has some issues
You may or may not have seen that Devolver Digital just released GRIS on the App Store, but we wanted to do a quick public service announcement to say that you might not want to hop on buying it just yet. The puzzle platformer has come to small... | Read more »
Explore the world around you in new matc...
Got a hankering for a fresh-feeling Match-3 puzzle game that offers a unique twist? You might find exactly what you’re looking for with What a Wonderful World, a new spin on the classic mobile genre which merges entertaining puzzles with global... | Read more »
Combo Quest (Games)
Combo Quest 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: Combo Quest is an epic, time tap role-playing adventure. In this unique masterpiece, you are a knight on a heroic quest to retrieve... | Read more »
Hero Emblems (Games)
Hero Emblems 1.0 Device: iOS Universal Category: Games Price: $2.99, Version: 1.0 (iTunes) Description: ** 25% OFF for a limited time to celebrate the release ** ** Note for iPhone 6 user: If it doesn't run fullscreen on your device... | Read more »
Puzzle Blitz (Games)
Puzzle Blitz 1.0 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0 (iTunes) Description: Puzzle Blitz is a frantic puzzle solving race against the clock! Solve as many puzzles as you can, before time runs out! You have... | Read more »
Sky Patrol (Games)
Sky Patrol 1.0.1 Device: iOS Universal Category: Games Price: $1.99, Version: 1.0.1 (iTunes) Description: 'Strategic Twist On The Classic Shooter Genre' - Indie Game Mag... | Read more »

Price Scanner via MacPrices.net

Save $150-$250 on 10.2″ WiFi + Cellular iPads...
Verizon is offering $150-$250 discounts on Apple’s new 10.2″ WiFi + Cellular iPad with service. Buy the iPad itself and save $150. Save $250 on the purchase of an iPad along with an iPhone. The fine... Read more
Apple continues to offer 13″ 2.3GHz Dual-Core...
Apple has Certified Refurbished 2017 13″ 2.3GHz Dual-Core non-Touch Bar MacBook Pros available starting at $1019. An standard Apple one-year warranty is included with each model, outer cases are new... Read more
Apple restocks 2018 MacBook Airs, Certified R...
Apple has restocked Certified Refurbished 2018 13″ MacBook Airs starting at only $849. Each MacBook features a new outer case, comes with a standard Apple one-year warranty, and is shipped free. The... Read more
Sunday Sale! 2019 27″ 5K 6-Core iMacs for $20...
B&H Photo has the new 2019 27″ 5K 6-Core iMacs on stock today and on sale for up to $250 off Apple’s MSRP. Overnight shipping is free to many locations in the US. These are the same iMacs sold by... Read more
Weekend Sale! 2019 13″ MacBook Airs for $200...
Amazon has new 2019 13″ MacBook Airs on sale for $200 off Apple’s MSRP, with prices starting at $899, each including free shipping. Be sure to select Amazon as the seller during checkout, rather than... Read more
2019 15″ MacBook Pros now on sale for $350-$4...
B&H Photo has Apple’s 2019 15″ 6-Core and 8-Core MacBook Pros on sale today for $350-$400 off MSRP, starting at $2049, with free overnight shipping available to many addresses in the US: – 2019... Read more
Buy one Apple Watch Series 5 at Verizon, get...
Buy one Apple Watch Series 5 at Verizon, and get a second Watch for 50% off. Plus save $10 on your first month of service. The fine print: “Buy Apple Watch, get another up to 50% off on us. Plus $10... Read more
Sprint offers 64GB iPhone 11 for free to new...
Sprint will include the 64GB iPhone 11 for free for new customers with an eligible trade-in in of the iPhone 7 or newer through September 19, 2019. The fine print: “iPhone 11 64GB $0/mo. iPhone 11... Read more
Verizon offers new iPhone 11 models for up to...
Verizon is offering Apple’s new iPhone 11 models for $500 off MSRP to new customers with an eligible trade-in (see list below). Discount is applied via monthly bill credits over 24 months. Verizon is... Read more
AT&T offers free $300 reward card + free...
AT&T Wireless will include a second free 64GB iPhone 11 with the purchase of one eligible iPhone at full price. They will also include a free $300 rewards card. The fine print: “Buy an elig.... Read more

Jobs Board

Student Employment (Blue *Apple* Cafe) Spri...
Student Employment (Blue Apple Cafe) Spring 2019 Penn State University Campus/Location: Penn State Brandywine Campus City: Media, PA Date Announced: 12/20/2018 Date Read more
Best Buy *Apple* Computing Master - Best Bu...
**732359BR** **Job Title:** Best Buy Apple Computing Master **Job Category:** Store Associates **Location Number:** 000171-Winchester Road-Store **Job Description:** Read more
*Apple* Mobile Master - Best Buy (United Sta...
**732324BR** **Job Title:** Apple Mobile Master **Job Category:** Store Associates **Location Number:** 000013-Fargo-Store **Job Description:** **What does a Best Read more
Best Buy *Apple* Computing Master - Best Bu...
**732455BR** **Job Title:** Best Buy Apple Computing Master **Job Category:** Sales **Location Number:** 000449-Auburn Hills-Store **Job Description:** **What does a Read more
*Apple* Mobility Pro - Best Buy (United Stat...
**732490BR** **Job Title:** Apple Mobility Pro **Job Category:** Store Associates **Location Number:** 000449-Auburn Hills-Store **Job Description:** At Best Buy, Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.