TweetFollow Us on Twitter

Screen Pokes
Volume Number:1
Issue Number:5
Column Tag:BASIC

Professor Mac’s Screen Pokes

By Dave Kelly

Mike Steiner and Michael M. Boy contributed to this article and we acknowledge their valuable con- tributions.

Professor Mac’s Screen Pokes

One day, Professor Mac was poking around in his Mac’s memory when suddenly he fell in and got stuck. Then along came Mike Steiner with screen memory locations. Professor Mac was then able to write his own program to poke his head out of the Mac screen.

The upper left corner of the screen starts at 108288. The locations progress consecutively starting from the upper left corner of the screen to the bottom right corner moving left to right and down the screen. The bottom right corner of the screen is 130175. These locations are for a 128K Mac. Add (512-128)*1024 for a 512K Mac. Be careful to not poke locations before or after the start and end addresses... unpredictable things will happen.

There are 21888 locations mapping the Macintosh screen. Each line (342 lines) of the screen is represented by 64 memory locations. Thus the first line of the screen goes from 108288 to 108351, the second line starts at 108352 and so on.... (remember to add for 512K Mac)

Each memory location contains 1 sixteen bit word which is bit mapped on the Mac screen. From left to right on the screen, the sixteen bits are mapped from hi order bit to low. A typical memory location is shown in figure 1.

The program pokes zeros into the first 18 lines of the screen, hiding the BASIC menu bars. The menus are still active and can be used to trace or stop the program. The image of Professor Mac is read from data statements and poked into the screen memory locations. Most of the time, you probably won’t want to poke the screen directly, there are easier ways to print on the screen. But this method could be used to check status of a particular location of the screen. The FRE(0) command is used to check which Mac (128K or 512K) is being used because the start and ending screen locations are different and have to be adjusted for the 512K Mac.

Thanks and appreciation go to Mike Steiner of Sierra Vista, Az. and Michael M. Boy of Elgin, Az. for submitting the screen locations.

‘Professor Mac’s Screen Poke
‘By Dave Kelly

WINDOW CLOSE 1
start=108288!  ‘Starting address for 128K MAC
ending=130175! ‘Ending address for 128K 

mac512=(512-128)*1024  ‘address offset for 512K MAC
IF FRE(0)>100000! THEN  start=start+mac512: ending=ending+mac512
erase.top.of.screen:
    FOR i= start TO start +64*18
        POKE i,0
    NEXT i
WINDOW  1
TEXTFONT(2):TEXTSIZE(18)
LOCATE 8,10:PRINT “Prof. Mac says: Read MacTutor!”
TEXTSIZE(12):PRINT
PRINT TAB(22);”Hit mouse button to quit”
print.professor.mac:
a=start+64*100 ‘Start at line 100
b=67  ‘print 67 lines 
FOR j=a TO a+b*64 STEP 64
    FOR k= j+30 TO j+36
        READ value
        POKE k,value
    NEXT k
NEXT j
ON MOUSE GOSUB quit
MOUSE ON:RESTORE
GOTO print.professor.mac
quit:
MENU RESET:END
prof.mac.plot.data:
1   DATA &H00,&H00,&H00,&HE0,&H00, &H00,&H00
2   DATA &H00,&H00,&H01,&HF8,&H00, &H00,&H00
3   DATA &H00,&H00,&H07,&HFC,&H00, &H00,&H00
4   DATA &H00,&H00,&H0F,&HFF,&H00, &H00,&H00
5   DATA &H00,&H00,&H3F,&HFF,&HC0, &H00,&H00
6   DATA &H00,&H00,&H7F,&HFF,&HE0, &H00,&H00
7   DATA &H00,&H01,&HFF,&HFF,&HF8, &H00,&H00
8   DATA &H00,&H03,&HFF,&HFF,&HFE, &H00,&H00
9   DATA &H00,&H07,&HFF,&HFF,&HFF, &H80,&H00
10 DATA &H00,&H1F,&HFF,&HFF,&HFF,  &HC0,&H00
11 DATA &H00,&H3F,&HFF,&HFF,&HFF,  &HF0,&H00
12 DATA &H00,&HFF,&HFF,&HFF,&HFF,  &HFC,&H00
13 DATA &H01,&HFF,&HFF,&HF3,&HFF,  &HFE,&H00
14 DATA &H03,&HFF,&HFF,&HE1,&HFF,  &HFF,&H80
15 DATA &H07,&HFF,&HFF,&HE1,&HFF,  &HFF,&HC0
16 DATA &H0F,&HFF,&HFF,&HF2,&H7F,  &HFF,&HC0
17 DATA &H1F,&HFF,&HFF,&HFF,&H9F,  &HFF,&H80
18 DATA &H0F,&HFF,&HFF,&HFF,&HE7,  &HFF,&H00
19 DATA &H07,&HFF,&HFF,&HFF,&HF9,  &HFE,&H00
20 DATA &H01,&HFF,&HFF,&HFF,&HFE,  &H7C,&H00
21 DATA &H03,&HFF,&HFF,&HFF,&HFF,  &H98,&H00
22 DATA &H03,&H3F,&HFF,&HFF,&HFF,  &HE8,&H00
23 DATA &H06,&H0F,&HFF,&HFF,&HFF,  &HFC,&H00
24 DATA &H06,&H07,&HFF,&HFF,&HFF,  &HFF,&HCC
25 DATA &H06,&H01,&HFF,&HFF,&HFF,  &H87,&H00
26 DATA &H06,&H00,&H7F,&HFF,&HFF,  &H0F,&H80
27 DATA &H06,&H00,&H1F,&HFF,&HFF,  &H0F,&H80
28 DATA &H06,&H00,&H0F,&HFF,&HFF,  &H0F,&H80
29 DATA  &H06,&H03,&H83,&HFF,&HFB, &H05,&H00
30 DATA &H06,&H07,&HC0,&HFF,&HF3,  &H00,&H00
31 DATA &H06,&H0F,&H60,&H3F,&HE3,  &H0A,&H80
32 DATA &H06,&H0E,&H30,&H1F,&HC3,  &H05,&H00
33 DATA &H06,&H0C,&H00,&H07,&H83,  &H02,&H00
34 DATA &H06,&H00,&H00,&H01,&H03,  &H08,&H80
35 DATA &H06,&H00,&H00,&H00,&H03,  &H05,&H00
36 DATA &H06,&H00,&H00,&H00,&H03,  &H00,&H00
37 DATA &H06,&H00,&H00,&H00,&H03,  &H0A,&H80
38 DATA &H06,&H80,&H70,&H70,&H0B,  &H05,&H00
39 DATA &H06,&H81,&HF8,&HFC,&H0B,  &H00,&H00
40 DATA &H06,&HC7,&HFD,&HFF,&H1B,  &H0A,&H80
41 DATA &H06,&H7F,&HFF,&HFF,&HF3,  &H00,&H00
42 DATA &H06,&H3F,&HFF,&HFF,&HE3,  &H1F,&H41
43 DATA &H03,&H07,&HFD,&HFF,&H06,  &H04,&H63
44 DATA &H03,&H81,&HF8,&HFB,&H0E,  &H04,&H55
45 DATA &H01,&HC0,&H00,&H00,&H1C,  &H04,&H49
46 DATA &H00,&HE0,&H00,&H00,&H38,  &H04,&H41
47 DATA &H00,&H7F,&HFF,&HFF,&HF0,  &H00,&H00
48 DATA &H00,&H1F,&HFF,&HFF,&HC0,  &H00,&H00
49 DATA &H00,&H08,&H00,&H00,&H40,  &H00,&H00
50 DATA &H00,&H08,&H00,&H00,&H40,  &H00,&H00
51 DATA &H00,&H0F,&HFF,&HFF,&HC0,  &H00,&H00
52 DATA &H00,&H1A,&HAA,&HAA,&HA0,  &H00,&H00
53 DATA &H00,&H35,&H55,&H55,&H50,  &H00,&H00
54 DATA &H00,&H6F,&HEA,&HFE,&HA8,  &H00,&H00
55 DATA &H00,&HD8,&H35,&H83,&H54,  &H00,&H00
56 DATA &H01,&HB0,&H1B,&H01,&HAA,  &H00,&H00
57 DATA &H03,&H50,&H15,&H01,&H55,  &H00,&H00
58 DATA &H06,&HA8,&H2A,&H82,&HAA,  &H80,&H00
59 DATA &H0D,&H57,&HD5,&H7D,&H7F,  &H40,&H00
60 DATA &H1A,&HFA,&HAF,&HAA,&HC1,  &HA0,&H00
61 DATA &H35,&H05,&H50,&H55,&H80,  &HD0,&H00
62 DATA &H6A,&H02,&HA0,&H2A,&H80,  &HA8,&H00
63 DATA &HD6,&H03,&H60,&H35,&H41,  &H54,&H00
64 DATA &HAB,&H06,&HB0,&H6A,&HBE,  &HAC,&H00
65 DATA &HD5,&HFD,&H5F,&HD5,&H55,  &H54,&H00
66 DATA &HAA,&HAA,&HAA,&HAA,&HAA,  &HAC,&H00
67 DATA &HD5,&H55,&H55,&H55,&H55,  &H54,&H00
68 DATA &HFF,&HFF,&HFF,&HFF,&HFF,  &HFC,&H00
 

Community Search:
MacTech Search:

Software Updates via MacUpdate

Duplicate Annihilator 5.7.7 - Find and d...
Duplicate Annihilator takes on the time-consuming task of comparing the images in your iPhoto library using effective algorithms to make sure that no duplicate escapes. Duplicate Annihilator... Read more
OS X Server 4.1.3 - For OS X 10.10 Yosem...
Designed for OS X and iOS devices, OS X Server makes it easy to share files, schedule meetings, synchronize contacts, develop software, host your own website, publish wikis, configure Mac, iPhone,... Read more
pwSafe 4.1 - Secure password management...
pwSafe provides simple and secure password management across devices and computers. pwSafe uses iCloud to keep your password databases backed-up and synced between Macs and iOS devices. It is... Read more
Kodi 15.0.rc1 - Powerful media center to...
Kodi (was XBMC) is an award-winning free and open-source (GPL) software media player and entertainment hub that can be installed on Linux, OS X, Windows, iOS, and Android, featuring a 10-foot user... Read more
Coda 2.5.11 - One-window Web development...
Coda is a powerful Web editor that puts everything in one place. An editor. Terminal. CSS. Files. With Coda 2, we went beyond expectations. With loads of new, much-requested features, a few surprises... Read more
Bookends 12.5.7 - Reference management a...
Bookends is a full-featured bibliography/reference and information-management system for students and professionals. Access the power of Bookends directly from Mellel, Nisus Writer Pro, or MS Word (... Read more
Maya 2016 - Professional 3D modeling and...
Maya is an award-winning software and powerful, integrated 3D modeling, animation, visual effects, and rendering solution. Because Maya is based on an open architecture, all your work can be scripted... Read more
RapidWeaver 6.2.3 - Create template-base...
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
MacFamilyTree 7.5.2 - Create and explore...
MacFamilyTree gives genealogy a facelift: it's modern, interactive, incredibly fast, and easy to use. We're convinced that generations of chroniclers would have loved to trade in their genealogy... Read more
Paragraphs 1.0.1 - Writing tool just for...
Paragraphs is an app just for writers. It was built for one thing and one thing only: writing. It gives you everything you need to create brilliant prose and does away with the rest. Everything in... Read more

Rage of Bahamut is Giving Almost All of...
The App Store isn't what it used to be back in 2012, so it's not unexpected to see some games changing their structures with the times. Now we can add Rage of Bahamut to that list with the recent announcement that the game is severely cutting back... | Read more »
Adventures of Pip (Games)
Adventures of Pip 1.0 Device: iOS iPhone Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: ** ONE WEEK ONLY — 66% OFF! *** “Adventures of Pip is a delightful little platformer full of charm, challenge and impeccable... | Read more »
Divide By Sheep - Tips, Tricks, and Stre...
Who would have thought splitting up sheep could be so involved? Anyone who’s played Divide by Sheep, that’s who! While we’re not about to give you complete solutions to everything (because that’s just cheating), we will happily give you some... | Read more »
NaturalMotion and Zynga Have Started Tea...
An official sequel to 2012's CSR Racing is officially on the way, with Zynga and NaturalMotion releasing a short teaser trailer to get everyone excited. Well, as excited as one can get from a trailer with no gameplay footage, anyway. [Read more] | Read more »
Grab a Friend and Pick up Overkill 3, Be...
Overkill 3 is a pretty enjoyable third-person shooter that was sort of begging for some online multiplayer. Fortunately the begging can stop, because its newest update has added an online co-op mode. [Read more] | Read more »
Scanner Pro's Newest Update Adds Au...
Scanner Pro is one of the most popular document scanning apps on iOS, thanks in no small part to its near-constant updates, I'm sure. Now we're up to update number six, and it adds some pretty handy new features. [Read more] | Read more »
Heroki (Games)
Heroki 1.0 Device: iOS Universal Category: Games Price: $7.99, Version: 1.0 (iTunes) Description: CLEAR THE SKIES FOR A NEW HERO!The peaceful sky village of Levantia is in danger! The dastardly Dr. N. Forchin and his accomplice,... | Read more »
Wars of the Roses (Games)
Wars of the Roses 1.0 Device: iOS Universal Category: Games Price: $4.99, Version: 1.0 (iTunes) Description: | Read more »
TapMon Battle (Games)
TapMon Battle 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: It's time to battle!Tap! Tap! Tap! Try tap a egg to hatch a Tapmon!Do a battle with another tapmons using your hatched tapmons! *... | Read more »
Alchemic Dungeons (Games)
Alchemic Dungeons 1.0 Device: iOS Universal Category: Games Price: $.99, Version: 1.0 (iTunes) Description: ### Release Event! ### 2.99$->0.99$ for limited time! ### Roguelike Role Playing Game! ### Alchemic Dungeons is roguelike... | Read more »

Price Scanner via MacPrices.net

Seagate Backup Plus Drives Feature 200GB of C...
Seagate Technology plc has announced that its Backup Plus family of external storage offerings will now include 200GB of OneDrive cloud storage, a major added value, and the addition of Lyve’s photo... Read more
Canon PIXMA MG3620 Wireless Inkjet All-in-One...
Canon U.S.A., Inc. has announced the PIXMA MG3620 Wireless (1) Inkjet All-in-One (AIO) printer for high-quality photo and document printing. Built with convenience in mind for the everyday home user... Read more
July 4th Holiday Weekend 13-inch MacBook Pro...
Save up to $150 on the purchase of a new 2015 13″ Retina MacBook Pro at the following resellers this weekend. Shipping is free with each model: 2.7GHz/128GB MSRP $1299 2.7GHz/... Read more
27-inch 3.5GHz 5K iMac on sale for $2149, sav...
Best Buy has the 27″ 3.5GHz 5K iMac on sale for $2149.99. Choose free shipping or free local store pickup (if available). Sale price for online orders only, in-store prices may vary. Their price is $... Read more
Apple now offering refurbished 2015 11-inch...
The Apple Store is now offering Apple Certified Refurbished 2015 11″ MacBook Airs as well as 13″ MacBook Airs (the latest models), available for up to $180 off the cost of new models. An Apple one-... Read more
15-inch 2.5GHz Retina MacBook Pro on sale for...
Amazon.com has the 15″ 2.5GHz Retina MacBook Pro on sale for $2274 including free shipping. Their price is $225 off MSRP, and it’s the lowest price available for this model. Read more
Finally Safe To Upgrade To Yosemite’?
The reason I’ve held back from upgrading my MacBook Air from OS X 10.9 Mavericks to 10.10 Yosemite for nearly a year isn’t just procrastination. Among other bugs reported, there have been persistent... Read more
Logo Pop Free Vector Logo Design App For OS X...
128bit Technologies has released of Logo Pop Free 1.2 for Mac OS X, a vector based, full-fledged, logo design app available exclusively on the Mac App Store for the agreeable price of absolutely free... Read more
21-inch 1.4GHz iMac on sale for $999, save $1...
B&H Photo has new 21″ 1.4GHz iMac on sale for $999 including free shipping plus NY sales tax only. Their price is $100 off MSRP. Best Buy has the 21″ 1.4GHz iMac on sale for $999.99 on their... Read more
16GB iPad mini 3 on sale for $339, save $60
B&H Photo has the 16GB iPad mini 3 WiFi on sale for $339 including free shipping plus NY tax only. Their price is $60 off MSRP. Read more

Jobs Board

Frameworks Engineer, *Apple* Watch - Apple...
**Job Summary** Join the team that is shaping the future of software development for Apple Watch! As a software engineer on the Apple Watch Frameworks team you will Read more
Mobile Payments Counsel, *Apple* Pay (digit...
**Job Summary** Apple is looking for an atto ey to join Apple 's Legal Department to support Apple Pay. **Key Qualifications** 4+ years of relevant experience Read more
*Apple* Solutions Consultant - Retail Sales...
**Job Summary** The ASC is an Apple employee who serves as the Apple business manager and influencer in a hyper-business critical Reseller's store which delivers Read more
Partner Marketing Manager, Merchant- *Apple*...
**Job Summary** The Apple Pay partner marketing team is looking for a marketing manager to develop and drive US marketing programs with our merchant partners. The right Read more
*Apple* Solutions Consultant - Retail Sales...
**Job Summary** As an Apple Solutions Consultant (ASC) you are the link between our customers and our products. Your role is to drive the Apple business in a retail Read more
All contents are Copyright 1984-2011 by Xplain Corporation. All rights reserved. Theme designed by Icreon.