Re: Copyright Symbol © on the Apple II GS

[vastats@gmail.com]

On Sunday, January 13, 2013 8:47:17 AM UTC+9, Steve Nickolas wrote:
> On Sat, 12 Jan 2013, BLuRry wrote:
> 
> 
> 
> > I guess that I should disclose that Jace is a complete ripoff of 
> 
> > AppleWin.  Except for the part where I build everything from scratch and 
> 
> > sometimes looked at how AppleWin did things to get ideas but did things 
> 
> > differently just because I felt like it.  Oh, and wrote everything to be 
> 
> > fully object-oriented and modular.  and it's in Java, not C.  Other than 
> 
> > that it's a baseless ripoff, maybe at least 5% of it is still based on 
> 
> > small fragments of applewin...
> 
> >
> 
> > (ok, so this was a joke and Jace is not a ripoff of Applewin, though I 
> 
> > guess you could say it was heavily inspired by AppleWin and other 
> 
> > excellent emulators like MAME)
> 
> 
> 
> I would think Dapple owes far more to ApplePC, than JACE to AppleWin...
> 
> 
> 
> -uso.

Well, as long as we are doing ripoffs here, here is my ripoff of mmphosis's code above in my 30 minutes of sloppy keyboarding and coding, LOL.  

1 REM LETTER PUT TO HGR SCREEN
2 REM CONCEPT (C) BY MMPHOSIS
3 REM EXPANDED UPON BY BILLM
4 REM MAX CHARS PER LINE = 32
5 REM THERE IS ANOTHER WAY THAT WAS SHOWN IN CALL-A.P.P.L.E. IN 1980
6 REM BUT I AM NOT KEYING IN THAT PROGRAM AGAIN. (FOR NOW)

7 REM ====================
8 REM START INIT OF SCREEN
9 REM ====================
10  HGR
20  HCOLOR= 3
25 DIM T$(42,7), L(42,7), D$(240),MK(240)
26 P$="cr _.|ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789"

100 REM ====================
101 REM READ THE CHARACTER DATA
102 REM ====================
120 REM PIPE (|) IS A BLOCK IN CHARACTER SET
129  FOR LT= 1 TO 42
130  FOR Y = 1 TO 7
140    READ A$
145    T$(LT,Y) = A$
150    L(LT,Y) =  LEN (A$)
151  NEXT Y,LT


199 REM ====================
200 REM READ THE STRINGS FOR OUTPUT
201 REM ====================
202 LINES=6
203 D$(1)="cr _.|"
204 D$(2)="ABCDEGHIJKLMNOPQRSTUVWXYZ"
205 D$(3)="0123456789|HELLO WORLD"
206 D$(4)="PHONE HOME E.T."
207 D$(5)="THIS IS A TEST OF THE HGR 
208 D$(6)="TEXT OUTPUT"

212 REM =======================
213 REM PROCESS THE LINES
214 REM =======================
215 FOR Z=1 TO LINES
216 LN=LEN(D$(Z))
218 FOR A=1 TO LN
220 FOR B=1 TO 42
222 IF MID$(D$(Z),A,1)=MID$(P$,B,1) THEN MK(A)=B
224 NEXT B , A

249 REM ====================
250 REM OUTPUT THE STRING
251 REM ====================

254 FOR K=0 TO LN-1
259 FOR TY=1 TO 7
260    FOR X = 1 TO L(MK(K+1),TY)
270      P =  MID$ (T$(MK(K+1),TY),X,1) <  > "."
280      IF P THEN  HPLOT (X+(K*9)),(TY+(Z*8))
290  NEXT X, TY, K,Z

997 REM ====================
998 REM DATA FOR THE CHARACTERS
999 REM ====================

1000 REM (C) Symbol
1001 DATA ..XXXX..
1002 DATA .X....X.
1003 DATA X.XXX..X
1004 DATA X.X....X
1005 DATA X.XXX..X
1006 DATA .X....X.
1007 DATA ..XXXX..

1010 REM (R) SYMBOL
1011 DATA ..XXXX..
1012 DATA .X....X.
1013 DATA X..XX..X
1014 DATA X..X...X
1015 DATA X..X...X
1016 DATA .X.....X
1017 DATA ..XXXX..

1020 REM SPACE SYMBOL
1021 DATA ........
1022 DATA ........
1023 DATA ........
1024 DATA ........
1025 DATA ........
1026 DATA ........
1027 DATA ........

1030 REM UNDERSCORE
1031 DATA ........
1032 DATA ........
1033 DATA ........
1034 DATA ........
1035 DATA ........
1036 DATA ........
1037 DATA XXXXXXXX

1040 REM PERIOD
1041 DATA ........
1042 DATA ........
1043 DATA ........
1044 DATA ........
1045 DATA ........
1046 DATA ........
1047 DATA XX......

1050 REM BLOCK
1051 DATA XXXXXXXX
1052 DATA XXXXXXXX
1053 DATA XXXXXXXX
1054 DATA XXXXXXXX
1055 DATA XXXXXXXX
1056 DATA XXXXXXXX
1057 DATA XXXXXXXX

1110 REM A
1111 DATA ...XX...
1112 DATA ..X..X..
1113 DATA .X....X.
1114 DATA .XXXXXX.
1115 DATA .X....X.
1116 DATA X......X
1117 DATA X......X

1120 REM B
1121 DATA XXXXXXX.
1122 DATA X......X
1123 DATA X......X
1124 DATA XXXXXXX.
1125 DATA X......X
1126 DATA X......X
1127 DATA XXXXXXX.

1130 REM C
1131 DATA .XXXXXX.
1132 DATA X......X
1133 DATA X.......
1134 DATA X.......
1135 DATA X.......
1136 DATA X......X
1137 DATA .XXXXXX.

1140 REM D
1141 DATA XXXXXXX.
1142 DATA X......X
1143 DATA X......X
1144 DATA X......X
1145 DATA X......X
1146 DATA X......X
1147 DATA XXXXXXX.

1150 REM E
1151 DATA XXXXXXXX
1152 DATA X.......
1153 DATA X.......
1154 DATA XXXXX...
1155 DATA X.......
1156 DATA X.......
1157 DATA XXXXXXXX

1160 REM F
1161 DATA XXXXXXXX
1162 DATA X.......
1163 DATA X.......
1164 DATA XXXXX...
1165 DATA X.......
1166 DATA X.......
1167 DATA X.......

1170 REM G
1171 DATA .XXXXXX.
1172 DATA X......X
1173 DATA X.......
1174 DATA X....XXX
1175 DATA X......X
1176 DATA X......X
1177 DATA .XXXXXX.

1180 REM H
1181 DATA X......X
1182 DATA X......X
1183 DATA X......X
1184 DATA XXXXXXXX
1185 DATA X......X
1186 DATA X......X
1187 DATA X......X

1190 REM I
1191 DATA .XXXXX..
1192 DATA ...X....
1193 DATA ...X....
1194 DATA ...X....
1195 DATA ...X....
1196 DATA ...X....
1197 DATA .XXXXX..

1200 REM J
1201 DATA ..XXXXX.
1202 DATA ....X...
1203 DATA ....X...
1204 DATA ....X...
1205 DATA ....X...
1206 DATA X...X...
1207 DATA .XXX....

1210 REM K
1211 DATA X....X.
1212 DATA X...X..
1213 DATA X..X...
1214 DATA X.XX...
1215 DATA XX..X..
1216 DATA X....X.
1217 DATA X.....X

1220 REM L
1221 DATA X.......
1222 DATA X.......
1223 DATA X.......
1224 DATA X.......
1225 DATA X.......
1226 DATA X.......
1227 DATA XXXXXXXX

1230 REM M
1231 DATA X..XX..X
1232 DATA XX.XX.XX
1233 DATA X.X..X.X
1234 DATA X......X
1235 DATA X......X
1236 DATA X......X
1237 DATA X......X

1240 REM N
1241 DATA X......X
1242 DATA XX.....X
1243 DATA X.X....X
1244 DATA X..X...X
1245 DATA X...X..X
1246 DATA X....X.X
1247 DATA X.....XX

1250 REM O
1251 DATA .XXXXXX.
1252 DATA X......X
1253 DATA X......X
1254 DATA X......X
1255 DATA X......X
1256 DATA X......X
1257 DATA .XXXXXX.

1260 REM P
1261 DATA XXXXXXX.
1262 DATA X......X
1263 DATA X......X
1264 DATA XXXXXXX.
1265 DATA X.......
1266 DATA X.......
1267 DATA X.......

1270 REM Q
1271 DATA .XXXXXX.
1272 DATA X......X
1273 DATA X......X
1274 DATA X......X
1275 DATA X....X.X
1276 DATA X.....X.
1277 DATA .XXXXX.X

1280 REM R
1281 DATA XXXXXXX.
1282 DATA X......X
1283 DATA X......X
1284 DATA XXXXXXX.
1285 DATA X....X..
1286 DATA X.....X.
1287 DATA X......X

1290 REM S
1291 DATA .XXXXXX.
1292 DATA X......X
1293 DATA X.......
1294 DATA .XXXXXX.
1295 DATA .......X
1296 DATA X......X
1297 DATA .XXXXXX.

1300 REM T
1301 DATA .XXXXXXX
1302 DATA ....X...
1303 DATA ....X...
1304 DATA ....X...
1305 DATA ....X...
1306 DATA ....X...
1307 DATA ....T...

1310 REM U
1311 DATA X......X
1312 DATA X......X
1313 DATA X......X
1314 DATA X......X
1315 DATA X......X
1316 DATA X......X
1317 DATA .XXXXXX.

1320 REM V
1321 DATA X......X
1322 DATA X......X
1323 DATA .X....X.
1324 DATA .X....X.
1325 DATA ..X..X..
1326 DATA ..X..X..
1327 DATA ...XX...

1330 REM W
1331 DATA X......X
1332 DATA X......X
1333 DATA X......X
1334 DATA X......X
1335 DATA X.X..X.X
1336 DATA XX.XX.XX
1337 DATA X..XX..X


1340 REM X
1341 DATA X......X
1342 DATA .X....X.
1343 DATA ..X..X..
1344 DATA ...XX...
1345 DATA ..X..X..
1346 DATA .X....X.
1347 DATA X......X

1350 REM Y
1351 DATA .X.....X
1352 DATA ..X...X.
1353 DATA ...X.X..
1354 DATA ....X...
1355 DATA ....X...
1356 DATA ....X...
1357 DATA ....X...

1360 REM Z
1361 DATA .XXXXXXX
1362 DATA ......X.
1363 DATA .....X..
1364 DATA ....X...
1365 DATA ...X....
1366 DATA ..X.....
1367 DATA .XXXXXXX

1370 REM 0
1371 DATA .XXXXXX.
1372 DATA X.....XX
1373 DATA X....X.X
1374 DATA X...X..X
1375 DATA X..X...X
1376 DATA X.X....X
1377 DATA .XXXXXX.

1380 REM 1
1381 DATA ...XX...
1382 DATA ..X.X...
1383 DATA ....X...
1384 DATA ....X...
1385 DATA ....X...
1386 DATA ....X...
1387 DATA .XXXXXXX

1390 REM 2
1391 DATA ..XXXXX.
1392 DATA .X.....X
1393 DATA ......X.
1394 DATA ....XX..
1395 DATA ...X....
1396 DATA ..X.....
1397 DATA .XXXXXXX

1400 REM 3
1401 DATA .XXXXXX.
1402 DATA X......X
1403 DATA .......X
1404 DATA ....XXX.
1405 DATA .......X
1406 DATA X......X
1407 DATA .XXXXXX.

1410 REM 4
1411 DATA ...XX...
1412 DATA ..X.X...
1413 DATA .X..X...
1414 DATA XXXXXXXX
1415 DATA ....X...
1416 DATA ....X...
1417 DATA ....X...

1420 REM 5
1421 DATA XXXXXXXX
1422 DATA X.......
1423 DATA X.......
1424 DATA XXXXXXX.
1425 DATA .......X
1426 DATA X......X
1427 DATA XXXXXXX

1430 REM 6
1431 DATA .....XX.
1432 DATA ....X...
1433 DATA ...X....
1434 DATA ..XXXX..
1435 DATA .X....X.
1436 DATA X.....X.
1437 DATA .XXXXXX.

1440 REM 7
1441 DATA .XXXXXXX
1442 DATA X.....X.
1443 DATA ......X.
1444 DATA .....X..
1445 DATA ....X...
1446 DATA ...X....
1447 DATA ..X.....

1450 REM 8
1451 DATA .XXXXXX.
1452 DATA X......X
1453 DATA X......X
1454 DATA .XXXXXX.
1455 DATA X......X
1456 DATA X......X
1457 DATA .XXXXXX.

1460 REM 9
1451 DATA .XXXXXX.
1452 DATA X......X
1453 DATA X......X
1454 DATA .XXXXXX.
1455 DATA .....X..
1456 DATA ....X...
1457 DATA ...X....

9000 REM =====================
9010 REM END OF PROGRAM
9020 REM =====================
9999 END