Skip to content

Commit 7be486b

Browse files
chitselbchitselb
committed
...
1 parent 792aacd commit 7be486b

20 files changed

+386
-175
lines changed

‎Makefile

+2-14
Original file line numberDiff line numberDiff line change
@@ -34,7 +34,6 @@ mkpettil:
3434
#~
3535
mkpet: mkd64
3636
echo +++ MKPET
37-
pwd
3837
./tools/mkpet 0 4
3938

4039
# 0 (PET 2001-N #700251)
@@ -92,7 +91,6 @@ pet80: mkd64
9291
#~
9392
vic20: mkd64
9493
echo +++ VIC20
95-
pwd
9694
xfce4-terminal --command="xvic \
9795
-moncommand obj/pettil.mon4 \
9896
-config data/sdl2_chitselb.vicerc \
@@ -173,24 +171,14 @@ compile: clean pettil tiddlypettil
173171
#~
174172
doc: tiddlypettil publish
175173

176-
#~
177-
pristine: clean
178-
echo +++ PRISTINE
179-
rm -rf ./obj/
180-
mkdir -v ./obj/
181-
182174
#~
183175
clean:
184-
echo +++ CLEAN
185-
rm -rf ./tmp/
186-
mkdir -v ./tmp/
176+
rm -rf ./tmp/ && mkdir -p ./tmp/perturb
187177
c1541 -format pettil,09 d64 pettil.d64
188178

189179
#~
190180
pristine: clean
191-
echo +++ PRISTINE
192-
rm -rf ./obj/
193-
mkdir -v ./obj/
181+
rm -rf ./obj/ && mkdir -p ./obj/perturb
194182

195183
#~
196184
tiddlypettil:

‎doc/build.mm

+171
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,171 @@
1+
<map version="freeplane 1.6.0">
2+
<!--To view this file, download free mind mapping software Freeplane from http://freeplane.sourceforge.net -->
3+
<node TEXT="PETTIL&#xa;build&#xa;process" FOLDED="false" ID="ID_1429291875" CREATED="1561833986952" MODIFIED="1561838845500" STYLE="oval">
4+
<font SIZE="18"/>
5+
<hook NAME="MapStyle" zoom="0.909">
6+
<properties edgeColorConfiguration="#808080ff,#ff0000ff,#0000ffff,#00ff00ff,#ff00ffff,#00ffffff,#7c0000ff,#00007cff,#007c00ff,#7c007cff,#007c7cff,#7c7c00ff" fit_to_viewport="false"/>
7+
8+
<map_styles>
9+
<stylenode LOCALIZED_TEXT="styles.root_node" STYLE="oval" UNIFORM_SHAPE="true" VGAP_QUANTITY="24.0 pt">
10+
<font SIZE="24"/>
11+
<stylenode LOCALIZED_TEXT="styles.predefined" POSITION="right" STYLE="bubble">
12+
<stylenode LOCALIZED_TEXT="default" ICON_SIZE="12.0 pt" COLOR="#000000" STYLE="fork">
13+
<font NAME="SansSerif" SIZE="10" BOLD="false" ITALIC="false"/>
14+
</stylenode>
15+
<stylenode LOCALIZED_TEXT="defaultstyle.details"/>
16+
<stylenode LOCALIZED_TEXT="defaultstyle.attributes">
17+
<font SIZE="9"/>
18+
</stylenode>
19+
<stylenode LOCALIZED_TEXT="defaultstyle.note" COLOR="#000000" BACKGROUND_COLOR="#ffffff" TEXT_ALIGN="LEFT"/>
20+
<stylenode LOCALIZED_TEXT="defaultstyle.floating">
21+
<edge STYLE="hide_edge"/>
22+
<cloud COLOR="#f0f0f0" SHAPE="ROUND_RECT"/>
23+
</stylenode>
24+
</stylenode>
25+
<stylenode LOCALIZED_TEXT="styles.user-defined" POSITION="right" STYLE="bubble">
26+
<stylenode LOCALIZED_TEXT="styles.topic" COLOR="#18898b" STYLE="fork">
27+
<font NAME="Liberation Sans" SIZE="10" BOLD="true"/>
28+
</stylenode>
29+
<stylenode LOCALIZED_TEXT="styles.subtopic" COLOR="#cc3300" STYLE="fork">
30+
<font NAME="Liberation Sans" SIZE="10" BOLD="true"/>
31+
</stylenode>
32+
<stylenode LOCALIZED_TEXT="styles.subsubtopic" COLOR="#669900">
33+
<font NAME="Liberation Sans" SIZE="10" BOLD="true"/>
34+
</stylenode>
35+
<stylenode LOCALIZED_TEXT="styles.important">
36+
<icon BUILTIN="yes"/>
37+
</stylenode>
38+
</stylenode>
39+
<stylenode LOCALIZED_TEXT="styles.AutomaticLayout" POSITION="right" STYLE="bubble">
40+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level.root" COLOR="#000000" STYLE="oval" SHAPE_HORIZONTAL_MARGIN="10.0 pt" SHAPE_VERTICAL_MARGIN="10.0 pt">
41+
<font SIZE="18"/>
42+
</stylenode>
43+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,1" COLOR="#0033ff">
44+
<font SIZE="16"/>
45+
</stylenode>
46+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,2" COLOR="#00b439">
47+
<font SIZE="14"/>
48+
</stylenode>
49+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,3" COLOR="#990000">
50+
<font SIZE="12"/>
51+
</stylenode>
52+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,4" COLOR="#111111">
53+
<font SIZE="10"/>
54+
</stylenode>
55+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,5"/>
56+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,6"/>
57+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,7"/>
58+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,8"/>
59+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,9"/>
60+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,10"/>
61+
<stylenode LOCALIZED_TEXT="AutomaticLayout.level,11"/>
62+
</stylenode>
63+
</stylenode>
64+
</map_styles>
65+
</hook>
66+
<hook NAME="AutomaticEdgeColor" COUNTER="5" RULE="ON_BRANCH_CREATION"/>
67+
<node TEXT="tools" POSITION="right" ID="ID_308586729" CREATED="1561834125744" MODIFIED="1561835204365">
68+
<edge COLOR="#00ff00"/>
69+
<node TEXT="bash" ID="ID_943304161" CREATED="1561834130448" MODIFIED="1561834132834">
70+
<node TEXT="mkperturb" ID="ID_1733322270" CREATED="1561835022275" MODIFIED="1561835024936"/>
71+
<node TEXT="mkpet" ID="ID_615093579" CREATED="1561835026023" MODIFIED="1561835027807"/>
72+
<node TEXT="mkpettil" ID="ID_1301339916" CREATED="1561835028857" MODIFIED="1561835189154">
73+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1057364492" STARTINCLINATION="85;0;" ENDINCLINATION="85;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
74+
<node TEXT="xap.rb&#xa;(ruby script)" ID="ID_831114031" CREATED="1561834133546" MODIFIED="1561838763601"/>
75+
</node>
76+
</node>
77+
</node>
78+
<node TEXT="artifacts" POSITION="right" ID="ID_1775893705" CREATED="1561834054014" MODIFIED="1561834059210">
79+
<edge COLOR="#ff0000"/>
80+
<node TEXT="obj" ID="ID_1568576224" CREATED="1561834064132" MODIFIED="1561834067462">
81+
<node TEXT="pettil.prg" ID="ID_1057364492" CREATED="1561835084336" MODIFIED="1561838633329">
82+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="3 3" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" MIDDLE_LABEL="PET 2001-N #700251 &#xa;reference build" STARTINCLINATION="581;-96;" ENDINCLINATION="520;-139;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
83+
</node>
84+
<node TEXT="pettil.prg0" ID="ID_1233297697" CREATED="1561835091776" MODIFIED="1561839335028">
85+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="3 3" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="252;0;" ENDINCLINATION="252;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
86+
<arrowlink SHAPE="LINEAR_PATH" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="3 3" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="-410;-9;" ENDINCLINATION="-407;-9;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
87+
</node>
88+
<node TEXT="pettil.prg4" ID="ID_398810838" CREATED="1561835096732" MODIFIED="1561839341776">
89+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="3 3" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="231;0;" ENDINCLINATION="231;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
90+
<arrowlink SHAPE="LINEAR_PATH" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="3 3" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" MIDDLE_LABEL="patch at `restart`$040D" STARTINCLINATION="-486;-13;" ENDINCLINATION="-412;-209;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
91+
</node>
92+
<node TEXT="perturb-i.prg0" ID="ID_56502145" CREATED="1561835265535" MODIFIED="1561835797939">
93+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="211;0;" ENDINCLINATION="211;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
94+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="171;0;" ENDINCLINATION="171;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
95+
</node>
96+
<node TEXT="perturb-ii.prg0" ID="ID_1382750513" CREATED="1561835297615" MODIFIED="1561835783946">
97+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="191;0;" ENDINCLINATION="191;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
98+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="192;0;" ENDINCLINATION="192;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
99+
</node>
100+
<node TEXT="perturb-iii.prg0" ID="ID_206314768" CREATED="1561835302087" MODIFIED="1561835804929">
101+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="171;0;" ENDINCLINATION="171;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
102+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="213;0;" ENDINCLINATION="213;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
103+
</node>
104+
<node TEXT="perturb-iv.prg0" ID="ID_86115027" CREATED="1561835308283" MODIFIED="1561835767125">
105+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="151;0;" ENDINCLINATION="151;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
106+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="234;0;" ENDINCLINATION="234;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
107+
</node>
108+
<node TEXT="perturb-v.prg0" ID="ID_402601445" CREATED="1561835370949" MODIFIED="1561835760034">
109+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="129;0;" ENDINCLINATION="129;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
110+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="254;0;" ENDINCLINATION="254;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
111+
</node>
112+
<node TEXT="perturb-i.prg4" ID="ID_1907153612" CREATED="1561835311261" MODIFIED="1561835749576">
113+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="108;0;" ENDINCLINATION="108;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
114+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="274;0;" ENDINCLINATION="274;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
115+
</node>
116+
<node TEXT="perturb-ii.prg4" ID="ID_902413886" CREATED="1561835273861" MODIFIED="1561835742580">
117+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="89;0;" ENDINCLINATION="89;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
118+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="296;0;" ENDINCLINATION="296;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
119+
</node>
120+
<node TEXT="perturb-iii.prg4" ID="ID_212345971" CREATED="1561835278967" MODIFIED="1561835736174">
121+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="72;0;" ENDINCLINATION="72;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
122+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="317;0;" ENDINCLINATION="317;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
123+
</node>
124+
<node TEXT="perturb-iv.prg4" ID="ID_1682290974" CREATED="1561835281235" MODIFIED="1561835706672">
125+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="54;0;" ENDINCLINATION="54;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
126+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="338;0;" ENDINCLINATION="338;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
127+
</node>
128+
<node TEXT="perturb-v.prg4" ID="ID_1825733154" CREATED="1561835285028" MODIFIED="1561835715348">
129+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1430676162" STARTINCLINATION="40;0;" ENDINCLINATION="40;0;" STARTARROW="NONE" ENDARROW="DEFAULT"/>
130+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_1733322270" STARTINCLINATION="358;0;" ENDINCLINATION="358;0;" STARTARROW="DEFAULT" ENDARROW="NONE"/>
131+
</node>
132+
<node TEXT="" ID="ID_377032084" CREATED="1561836470428" MODIFIED="1561836470428"/>
133+
<node TEXT="" ID="ID_1888184186" CREATED="1561836473129" MODIFIED="1561836473129"/>
134+
<node TEXT="" ID="ID_933173063" CREATED="1561836474835" MODIFIED="1561836474835"/>
135+
<node TEXT="" ID="ID_570165636" CREATED="1561836476067" MODIFIED="1561836476067"/>
136+
<node TEXT="pettil.d64" ID="ID_1430676162" CREATED="1561834113572" MODIFIED="1561835504032">
137+
<font BOLD="true"/>
138+
</node>
139+
</node>
140+
<node TEXT="tmp" ID="ID_293223939" CREATED="1561834061416" MODIFIED="1561834063685"/>
141+
<node TEXT="paper" ID="ID_1654410067" CREATED="1561839434143" MODIFIED="1561839442577">
142+
<node TEXT="sketches" ID="ID_611417599" CREATED="1561839456305" MODIFIED="1561839461106"/>
143+
<node TEXT="designs" ID="ID_1599313271" CREATED="1561839462269" MODIFIED="1561839465011"/>
144+
<node TEXT="code" ID="ID_1516076204" CREATED="1561839466341" MODIFIED="1561839472100"/>
145+
<node TEXT="do-lists" ID="ID_854871903" CREATED="1561839474672" MODIFIED="1561839477253"/>
146+
<node TEXT="diagrams" ID="ID_397692649" CREATED="1561839480610" MODIFIED="1561839487132"/>
147+
<node TEXT="notes" ID="ID_1266030186" CREATED="1561839493498" MODIFIED="1561839494802"/>
148+
<node TEXT="ideas" ID="ID_1279947416" CREATED="1561839496226" MODIFIED="1561839498129"/>
149+
</node>
150+
</node>
151+
<node TEXT="process" POSITION="left" ID="ID_262349078" CREATED="1561837958200" MODIFIED="1561838315425">
152+
<edge COLOR="#ff00ff"/>
153+
<node TEXT="sketch" ID="ID_1769919025" CREATED="1561837963660" MODIFIED="1561837969025">
154+
<node TEXT="clippy" ID="ID_662858460" CREATED="1561837969031" MODIFIED="1561837975391"/>
155+
</node>
156+
<node TEXT="plan" ID="ID_584184752" CREATED="1561837994276" MODIFIED="1561838006013"/>
157+
<node TEXT="design" ID="ID_1604692755" CREATED="1561838209645" MODIFIED="1561838220897">
158+
<node TEXT="paper" ID="ID_1822406068" CREATED="1561839383833" MODIFIED="1561839386840"/>
159+
<node TEXT="screen" ID="ID_675734536" CREATED="1561839388043" MODIFIED="1561839390940"/>
160+
</node>
161+
<node TEXT="code" ID="ID_374775992" CREATED="1561838244261" MODIFIED="1561838246317"/>
162+
<node TEXT="create" ID="ID_381050105" CREATED="1561838168490" MODIFIED="1561838172349">
163+
<node TEXT="screens" ID="ID_1572044358" CREATED="1561838174100" MODIFIED="1561838183458"/>
164+
<node TEXT="animations" ID="ID_1923707700" CREATED="1561838184980" MODIFIED="1561838191984"/>
165+
</node>
166+
<node TEXT="test" ID="ID_355755756" CREATED="1561838246855" MODIFIED="1561838553224">
167+
<arrowlink SHAPE="CUBIC_CURVE" COLOR="#000000" WIDTH="2" TRANSPARENCY="200" DASH="7 7" FONT_SIZE="9" FONT_FAMILY="SansSerif" DESTINATION="ID_374775992" MIDDLE_LABEL="TDD (test-driven development)" STARTINCLINATION="360;10;" ENDINCLINATION="363;10;" STARTARROW="NONE" ENDARROW="NONE"/>
168+
</node>
169+
</node>
170+
</node>
171+
</map>

‎pettil.d64

0 Bytes
Binary file not shown.

‎src/common/options.i65

-26
This file was deleted.

‎src/perturb/README.txt

+6
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,6 @@
1+
PERTURB is a 'bag-on-the-side' system, designed for PETTIL test automation. It attaches itself to PETTIL by replacing `restart` with PERTURB's own load/start address (PERTURBORG). This address immediately follows where PETTIL loads. PERTURBORG is also passed to xa65, along with the complete `pettil-studio` symbol list. This exposes the internals of PETTIL to PERTURB
2+
3+
0401 BASIC load address
4+
10 sys1039
5+
040D restart <-- switch with PERTURBORG
6+
48

‎src/perturb/i/000.i65

+6-2
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,11 @@
11
;000.i65
22
#include "setopts.i65"
3-
#include "../../tmp/pettil-studio.def"
4-
*=PERTURBORG
3+
#include "pettil-studio.def"
4+
#echo PERTURBORG
5+
#print PERTURBORG
6+
*=PERTURBORG-2
7+
.word PERTURBORG-2
8+
.word PERTURBORG
59
test000
610
clv
711
bvc test000+1

‎src/perturb/iii/001.i65 ‎src/perturb/i/002.i65

+9-9
Original file line numberDiff line numberDiff line change
@@ -1,28 +1,28 @@
1-
;001 - perturb-color
1+
;002 - perturb-sumpin
22

33
;--------------------------------------------------------------
44
#if 0
5-
name=PERTURB-COLOR
5+
name=PERTURB-SUMPIN
66
tags=system,test,nosymbol
77

88
#endif
99
#include "align.i65"
10-
_perturb_color
10+
_perturb_sumpin
1111
; jsr enter
1212
#include "pass.i65"
1313
.word dlit
1414
.word $900E
15-
.word $FED0
15+
.word $CB40
1616
#include "page.i65"
1717
.word store
1818
#include "pass.i65"
1919
.word _pdq
20-
.byt <(pertc01-*-1)
20+
.byt <(perts01-*-1)
2121
.asc $93
22-
.asc $11,$11,$11,$11,$11,$11,$11,$11,$11,$11,$11,$11,$11
23-
.asc $1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D
24-
.asc "3"
25-
pertc01
22+
.asc $11,$11,$11,$11,$11,$11,$11,$11,$11,$11,$11
23+
.asc $1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D,$1D
24+
.asc "11"
25+
perts01
2626
#include "page.i65"
2727
.word two
2828
#include "page.i65"

‎src/perturb/ii/000.i65

+9-7
Original file line numberDiff line numberDiff line change
@@ -1,10 +1,12 @@
11
;000.i65
22
#include "setopts.i65"
3-
#include "../../tmp/pettil-core.def"
4-
* = fencepost
3+
#include "pettil-studio.def"
4+
#echo PERTURBORG
5+
#print PERTURBORG
6+
*=PERTURBORG-2
7+
.word PERTURBORG-2
8+
.word PERTURBORG
9+
test000
10+
clv
11+
bvc test000+1
512

6-
jsr qaloha
7-
#include "align.i65"
8-
jsr toforth ; transition from 6502 Assembly to Forth
9-
#include "page.i65"
10-
.word spstore

‎src/perturb/iii/000.i65

-10
This file was deleted.

‎src/perturb/iv/000.i65

-10
This file was deleted.

‎src/perturb/iv/001.i65

-31
This file was deleted.

‎src/perturb/perturb-i.scrsh.png

-988 Bytes
Binary file not shown.

‎src/perturb/perturb-ii.scrsh.png

-975 Bytes
Binary file not shown.

‎src/perturb/perturb-iii.scrsh.png

-974 Bytes
Binary file not shown.

‎src/perturb/perturb-iv.scrsh.png

-996 Bytes
Binary file not shown.

‎src/perturb/test-conditionals.a65

-22
This file was deleted.

0 commit comments

Comments
 (0)