|
|
|
Re: Apple II character set entry on wikipedia [message #371925 is a reply to message #371923] |
Thu, 09 August 2018 11:41 |
|
Originally posted by: fadden
On Thursday, August 9, 2018 at 7:38:31 AM UTC-7, Jeff Blakeney wrote:
> On 2018-08-08 5:28 PM, fadden wrote:
>> https://en.wikipedia.org/wiki/Apple_II_character_set
>>
>> That page seems totally, bizarrely wrong. Am I just reading it wrong?
>
> Well, seeing as almost all the characters are just in the HTML source as
> regular text and they don't seem to be attempting to set the font to one
> of the Apple II true type fonts that are available, it isn't too
> surprising that it looks wrong. The mouse text characters at least are
> PNG images so should be fairly accurate.
I don't just mean the glyphs. Look at the character encoding ("code point") values. For example, the //c version seems to have inverse in the high-ASCII range and normal in the low-ASCII range.
|
|
|
Re: Apple II character set entry on wikipedia [message #371931 is a reply to message #371923] |
Thu, 09 August 2018 12:04 |
Charlie
Messages: 255 Registered: November 2012
Karma: 0
|
Senior Member |
|
|
On 8/9/2018 10:38 AM, Jeff Blakeney wrote:
> On 2018-08-08 5:28 PM, fadden wrote:
>> https://en.wikipedia.org/wiki/Apple_II_character_set
>>
>> That page seems totally, bizarrely wrong. Am I just reading it wrong?
>
> Well, seeing as almost all the characters are just in the HTML source as
> regular text and they don't seem to be attempting to set the font to one
> of the Apple II true type fonts that are available, it isn't too
> surprising that it looks wrong. The mouse text characters at least are
> PNG images so should be fairly accurate.
The Apple IIgs mouse text characters 70 and 71 are incorrect.
Charlie
|
|
|
|
|
|
|
|
Re: Apple II character set entry on wikipedia [message #372273 is a reply to message #372247] |
Wed, 15 August 2018 18:33 |
mmphosis
Messages: 163 Registered: November 2012
Karma: 0
|
Senior Member |
|
|
Applesoft BASIC program to display all 256 TEXT characters...
https://www.applefritter.com/comment/85264#comment-85264
The following version works for both 80 and 40 columns...
NEW
0 TEXT : H$ = "0123456789ABCDEF": W = (PEEK(33) = 80) + 1 : IF W=2 THEN
W$="."
1 HOME : VTAB 3: HTAB 13 * W + 1 - W
2 FOR H = 1 TO 16: PRINT W$MID$(H$,H,1);:NEXT:PRINT
3 FOR V = 1 TO 16: PRINT
4 HTAB 11 * W:A = PEEK (41) * 256
5 LET A = A + PEEK (40)
6 PRINT MID$ (H$,V,1)W$;
7 FOR H = 1 TO 16
8 POKE A + H + 11,C:C = C + 1
9 NEXT H,V
REM 80 COLUMNS
PR#3
RUN
POKE 49167,0 : REM Show ALTCHRSET
POKE 49166,0 : REM Don't show ALTCHRSET
REM 40 COLUMNS
PR#0
RUN
POKE 49167,0 : REM Show ALTCHRSET
POKE 49166,0 : REM Don't show ALTCHRSET
|
|
|
Re: Apple II character set entry on wikipedia [message #372362 is a reply to message #372273] |
Fri, 17 August 2018 04:08 |
|
Originally posted by: Brian Patrie
On 2018-08-15 17:33, mmphosis wrote:
> Applesoft BASIC program to display all 256 TEXT characters...
>
> https://www.applefritter.com/comment/85264#comment-85264
>
> The following version works for both 80 and 40 columns...
>
> NEW
> 0 TEXT : H$ = "0123456789ABCDEF": W = (PEEK(33) = 80) + 1 : IF W=2 THEN
> W$="."
> 1 HOME : VTAB 3: HTAB 13 * W + 1 - W
> 2 FOR H = 1 TO 16: PRINT W$MID$(H$,H,1);:NEXT:PRINT
> 3 FOR V = 1 TO 16: PRINT
> 4 HTAB 11 * W:A = PEEK (41) * 256
> 5 LET A = A + PEEK (40)
> 6 PRINT MID$ (H$,V,1)W$;
> 7 FOR H = 1 TO 16
> 8 POKE A + H + 11,C:C = C + 1
> 9 NEXT H,V
>
> REM 80 COLUMNS
> PR#3
> RUN
> POKE 49167,0 : REM Show ALTCHRSET
> POKE 49166,0 : REM Don't show ALTCHRSET
>
> REM 40 COLUMNS
> PR#0
> RUN
> POKE 49167,0 : REM Show ALTCHRSET
> POKE 49166,0 : REM Don't show ALTCHRSET
I'm rather fond of this little bugger i whipped up several years ago.
1 TEXT : HOME : PRINT CHR$(17): FOR H = 0 TO 15: COLOR= H: VLIN 0,31
AT H: NEXT : FOR V = 0 TO 15: COLOR= V: HLIN 0,15 AT V * 2 + 1: NEXT
9 TEXT : VTAB 18: IF PEEK (64435) = 6 THEN GET Z$: IF Z$ > CHR$ (31)
THEN POKE 49167 - ( PEEK (49182) > 127),.: GOTO 9
Type any non-control character to toggle alternate character set.
Type any control character to exit.
Remove the PRINT CHR$(17) for it not to force 40 columns.
|
|
|
|
Re: Apple II character set entry on wikipedia [message #372402 is a reply to message #372247] |
Fri, 17 August 2018 15:00 |
mmphosis
Messages: 163 Registered: November 2012
Karma: 0
|
Senior Member |
|
|
https://archive.org/stream/Apple_IIgs_Hardware_Reference_HiR es#page/n275
# @ [ \ ] ` { | } ˜ U.S. English ISO-IR-006
£ @ [ \ ] ` { | } ˜ U.K. English CP01101
£ à ° ç § ` é ù è ¨ French ISO-IR-025
# @ Æ Ø Å ` æ ø å ˜ Danish CP01107
£ § ¡ Ñ ¿ ` ʺ ñ ç ˜ Spanish
£ § ʺ ç é ù à ò è ì Italian
# § Ä Ö Ü ` ä ö ü ß German ISO-IR-021
# @ Ä Ö Å ` ä ö å ˜ Swedish
https://en.wikipedia.org/wiki/ISO/IEC_646
Not that the TEXT mode characters would have mattered much because the
system software used the graphics mode of the IIGS...
I think the ʺ glyph (I made this up to look like a longer double quote)
should have been ° (degree or masculine ordinal?) in Spanish and Italian.
Swedish was missing a few characters (CP01106.) How many Swedish IIGS's
were sold?
Are these ROM characters set in the IIGS ROM, or in a separate character set
ROM?
|
|
|
|
|
|
|
Re: Apple II character set entry on wikipedia [message #372553 is a reply to message #372273] |
Sun, 19 August 2018 11:16 |
Michael AppleWin Debu
Messages: 1262 Registered: March 2013
Karma: 0
|
Senior Member |
|
|
Here is a small patch (lines 1 & 2) that will print the hex header correctly in both 40 and 80 column mode:
1 HOME : VTAB 3: HTAB 13 * W + 1 - W:L$=H$:IF PEEK(49176) > 127 THEN L$ = " 0 1 2 3 4 5 6 7 8 9 A B C D E F"
2 PRINT L$
That is:
NEW
0 TEXT : H$ = "0123456789ABCDEF": W = (PEEK(33) = 80) + 1 : IF W=2 THEN
W$="."
1 HOME : VTAB 3: HTAB 13 * W + 1 - W:L$=H$:IF PEEK(49176) > 127 THEN L$ = " 0 1 2 3 4 5 6 7 8 9 A B C D E F"
2 PRINT L$
3 FOR V = 1 TO 16: PRINT
4 HTAB 11 * W:A = PEEK (41) * 256
5 LET A = A + PEEK (40)
6 PRINT MID$ (H$,V,1)W$;
7 FOR H = 1 TO 16
8 POKE A + H + 11,C:C = C + 1
9 NEXT H,V
Cheers
|
|
|
|
Re: Apple II character set entry on wikipedia [message #372578 is a reply to message #372489] |
Sun, 19 August 2018 14:34 |
Michael AppleWin Debu
Messages: 1262 Registered: March 2013
Karma: 0
|
Senior Member |
|
|
Thanks for the correction Mike.
The '3' had been on my TO VERIFY list for a while now if Sather was correct or not. Looks like he wasn't. Thanks for the nudge to get this this done.
I also fixed the glyphs being shifted up. Verified on my real Apple ][+.
I've updated the PRINT.ALL.CHARS to work with Applesoft and Integer Basic
AppleSoft
1 TEXT:HOME:FOR I=0 TO 31:FOR Y=0 TO 7:POKE 1024 + 128*Y + I, I + 32*Y:NEXT:NEXT:VTAB 22:PRINT
Integer Basic
1 TEXT:CALL-936:FOR I=0 TO 31:FOR Y=0 TO 7:POKE 1024 + 128*Y + I, I + 32*Y:NEXT Y:NEXT I:VTAB 22:PRINT:END
|
|
|