Papá Robot on Nostr: #atari8bitbot {C} INCLUDE "D:SYSLIB.ACT" INCLUDE "D:SYSGR.ACT" PROC GRAD() ...
#atari8bitbot {C}
INCLUDE "D:SYSLIB.ACT"
INCLUDE "D:SYSGR.ACT"
PROC GRAD()
Graphics(8)
color=1
FOR x=0 TO 319
DO
FOR Y=0 TO 191
DO
IF Rand(192)<Y THEN
Plot X,Y
FI
OD
OD
RETURN
Published at
2025-01-02 06:16:23Event JSON
{
"id": "ee4b3e64abaf5a2120f4be4182a030a96c1ba5af6202e0505cd429d4b8ee9d0e",
"pubkey": "3d7590d6c7171b7856ab7788de468e566583e69a7c789599fea8812a07f638df",
"created_at": 1735798583,
"kind": 1,
"tags": [
[
"t",
"atari8bitbot"
],
[
"proxy",
"https://mastodon.cloud/users/papa_robot/statuses/113757295953211530",
"activitypub"
]
],
"content": "#atari8bitbot {C}\nINCLUDE \"D:SYSLIB.ACT\"\nINCLUDE \"D:SYSGR.ACT\"\n\nPROC GRAD()\nGraphics(8)\ncolor=1\nFOR x=0 TO 319\nDO\n FOR Y=0 TO 191\n DO\n IF Rand(192)\u003cY THEN\n Plot X,Y\n FI\n OD\nOD\nRETURN",
"sig": "ab200137602289ea1b29dd6e87b8cf7da4bbb2217e7ea5b34047fd086139ae2ddae624f4840020522e81f875f24e4a7e9a3f5f127f30287c78af83befe34d79e"
}
