Browse Source

move stuff into folders

master
vampirefrog 2 months ago
parent
commit
19a79218a4
243 changed files with 66653 additions and 24262 deletions
  1. +79
    -44
      Makefile
  2. +0
    -151
      drive.lab
  3. +0
    -895
      drive.s
  4. BIN
      en/hlk.x
  5. BIN
      en/human302/bin/bind.x
  6. BIN
      en/human302/bin/drive.x
  7. BIN
      en/human302/bin/process.x
  8. BIN
      en/mxdrv/mdxp.x
  9. BIN
      en/mxdrv/mxp.x
  10. +42
    -0
      human302/ask/env1.ask
  11. +41
    -0
      human302/ask/env2.ask
  12. +41
    -0
      human302/ask/env3.ask
  13. +41
    -0
      human302/ask/env4.ask
  14. +39
    -0
      human302/ask/env5.ask
  15. +10
    -0
      human302/autoexec.bat
  16. BIN
      human302/basic2/audio.fnc
  17. +13
    -0
      human302/basic2/basic.cnf
  18. BIN
      human302/basic2/basic.x
  19. BIN
      human302/basic2/graph.fnc
  20. BIN
      human302/basic2/image.fnc
  21. BIN
      human302/basic2/mouse.fnc
  22. BIN
      human302/basic2/music.fnc
  23. BIN
      human302/basic2/music3.fnc
  24. BIN
      human302/basic2/sprite.fnc
  25. BIN
      human302/basic2/stick.fnc
  26. +1
    -0
      human302/beep.sys
  27. +0
    -0
      human302/bin/attrib.en.strings
  28. +0
    -0
      human302/bin/attrib.lab
  29. +71
    -71
      human302/bin/attrib.s
  30. +0
    -0
      human302/bin/attrib.x
  31. +1433
    -0
      human302/bin/backup.lab
  32. +10676
    -0
      human302/bin/backup.s
  33. BIN
      human302/bin/backup.x
  34. +0
    -0
      human302/bin/bind.en.strings
  35. +0
    -0
      human302/bin/bind.lab
  36. +651
    -654
      human302/bin/bind.s
  37. +0
    -0
      human302/bin/bind.x
  38. +0
    -0
      human302/bin/cache.lab
  39. +46
    -46
      human302/bin/cache.s
  40. +0
    -0
      human302/bin/cache.x
  41. +0
    -0
      human302/bin/chkdsk.lab
  42. +220
    -220
      human302/bin/chkdsk.s
  43. +0
    -0
      human302/bin/chkdsk.x
  44. BIN
      human302/bin/copy2.x
  45. +0
    -0
      human302/bin/copyall.lab
  46. +200
    -200
      human302/bin/copyall.s
  47. +0
    -0
      human302/bin/copyall.x
  48. BIN
      human302/bin/diskcopy.x
  49. +3
    -1
      human302/bin/drive.en.strings
  50. +158
    -0
      human302/bin/drive.lab
  51. +906
    -0
      human302/bin/drive.s
  52. +0
    -0
      human302/bin/drive.x
  53. +240
    -0
      human302/bin/ed.hlp
  54. +1406
    -0
      human302/bin/ed.lab
  55. BIN
      human302/bin/ed.x
  56. +0
    -0
      human302/bin/fc.en.strings
  57. +0
    -0
      human302/bin/fc.lab
  58. +329
    -330
      human302/bin/fc.s
  59. +0
    -0
      human302/bin/fc.x
  60. +0
    -0
      human302/bin/find.lab
  61. +312
    -315
      human302/bin/find.s
  62. +0
    -0
      human302/bin/find.x
  63. BIN
      human302/bin/format.x
  64. BIN
      human302/bin/hdid.x
  65. +0
    -0
      human302/bin/key.lab
  66. +225
    -230
      human302/bin/key.s
  67. +0
    -0
      human302/bin/key.x
  68. +0
    -0
      human302/bin/more.lab
  69. +191
    -191
      human302/bin/more.s
  70. +0
    -0
      human302/bin/more.x
  71. +0
    -0
      human302/bin/move.lab
  72. +0
    -0
      human302/bin/move.x
  73. +0
    -0
      human302/bin/pr.lab
  74. +290
    -290
      human302/bin/pr.s
  75. +0
    -0
      human302/bin/pr.x
  76. +0
    -0
      human302/bin/process.en.strings
  77. +0
    -0
      human302/bin/process.lab
  78. +197
    -203
      human302/bin/process.s
  79. +0
    -0
      human302/bin/process.x
  80. BIN
      human302/bin/recover.x
  81. BIN
      human302/bin/restore.x
  82. +0
    -0
      human302/bin/sort.lab
  83. +183
    -184
      human302/bin/sort.s
  84. +0
    -0
      human302/bin/sort.x
  85. BIN
      human302/bin/speed.x
  86. +0
    -0
      human302/bin/subst.lab
  87. +140
    -140
      human302/bin/subst.s
  88. +0
    -0
      human302/bin/subst.x
  89. BIN
      human302/bin/switch.x
  90. +0
    -0
      human302/bin/sys.lab
  91. +96
    -96
      human302/bin/sys.s
  92. +0
    -0
      human302/bin/sys.x
  93. BIN
      human302/bin/timer.x
  94. +0
    -0
      human302/bin/tree.lab
  95. +92
    -90
      human302/bin/tree.s
  96. +0
    -0
      human302/bin/tree.x
  97. BIN
      human302/bin/uskcgm.x
  98. +0
    -0
      human302/bin/where.lab
  99. +142
    -142
      human302/bin/where.s
  100. +0
    -0
      human302/bin/where.x

+ 79
- 44
Makefile View File

@ -9,44 +9,64 @@ COLUMNS=120
# build tools
RUN68=run68
XPATH=./
XPATH=./misc/
HAS=$(RUN68) $(XPATH)has.x
HLK=$(RUN68) $(XPATH)hlk.r
.PHONY: all
all: \
iplrom30.s \
iplromxv.s \
human.s \
commando.s \
cmd.s \
float2.s \
process.s \
has.s \
hlk.s \
bind.s \
opmdrv3.s \
mopmdrv.s \
pcm8.s \
mxdrv/mxp.s \
mxdrv/mdxp.s \
mxdrv/mxc.s \
mxdrv/2.06+15/mxdrv.s \
mxdrv/2.06+162_03/mxdrv16x.s \
mxdrv/2.06+16_Rel.1/mxdrv16.s \
mxdrv/2.06+16_Rel.2/mxdrv16.s \
mxdrv/2.06+16_Rel.3/mxdrv16.s \
mxdrv/2.06+16_Rel.3/mxdrv30.s \
mxdrv/2.06+16_Rel2++/mxdrvpp.s \
mxdrv/2.06+17_Rel.X5-S/mxdrv17.s
iplrom/iplrom30.s \
iplrom/iplromxv.s \
human302/human.s \
human302/commando.s \
human302/cmd.s \
human302/sys/float2.s \
human302/bin/attrib.s \
human302/bin/backup.s \
human302/bin/bind.s \
human302/bin/cache.s \
human302/bin/chkdsk.s \
human302/bin/copyall.s \
human302/bin/drive.s \
human302/bin/fc.s \
human302/bin/find.s \
human302/bin/key.s \
human302/bin/more.s \
human302/bin/pr.s \
human302/bin/process.s \
human302/bin/sort.s \
human302/bin/subst.s \
human302/bin/sys.s \
human302/bin/tree.s \
human302/bin/where.s \
misc/has.s \
misc/hlk.s \
misc/db.s \
sound/opmdrv3.s \
sound/mopmdrv.s \
sound/pcm8/0.48b/pcm8.s \
sound/mxdrv/mxp.s \
sound/mxdrv/mdxp.s \
sound/mxdrv/mxc.s \
sound/mxdrv/2.06+15/mxdrv.s \
sound/mxdrv/2.06+162_03/mxdrv16x.s \
sound/mxdrv/2.06+16_Rel.1/mxdrv16.s \
sound/mxdrv/2.06+16_Rel.2/mxdrv16.s \
sound/mxdrv/2.06+16_Rel.3/mxdrv16.s \
sound/mxdrv/2.06+16_Rel.3/mxdrv30.s \
sound/mxdrv/2.06+16_Rel2++/mxdrvpp.s \
sound/mxdrv/2.06+17_Rel.X5-S/mxdrv17.s
.PHONY: translations
translations: \
en/bind.x \
en/process.x \
en/float2.x \
en/mxdrv/mxc.x \
en/mxdrv/mxp.x \
en/mxdrv/2.06+17_Rel.X5-S/mxdrv17.x
en/human302/bin/bind.x \
en/human302/bin/process.x \
en/human302/sys/float2.x \
en/sound/mxdrv/mxc.x \
en/sound/mxdrv/mxp.x \
en/sound/mxdrv/mdxp.x \
en/sound/mxdrv/hlk.x \
en/sound/mxdrv/2.06+17_Rel.X5-S/mxdrv17.x
en/%.s: %.s en/%.sed
sed -f $(patsubst %.s,%.sed,$@) < $< > $@
@ -70,31 +90,47 @@ en/%.o: en/%.s
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -m68000 --sp -q1 -B -M -o$(COLUMNS) -e$(patsubst %.s,%.lab,$@) --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
mxdrv/%.s: mxdrv/%.[xr] mxdrv/%.lab
sound/mxdrv/%.s: sound/mxdrv/%.[xr] sound/mxdrv/%.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -h -k -m68030 -q1 -B -M -w16 -o120 -g"$(patsubst %.s,%.lab,$@)" --overwrite "$<" "$@"
sed -i -f const.sed -f clean-s.sed $@
human302/*/%.s: human302/*/%.[xr] human302/*/%.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -h -k -m68000 -q1 -B -M -w16 -o120 -g"$(patsubst %.s,%.lab,$@)" --overwrite "$<" "$@"
sed -i -f const.sed -f clean-s.sed $@
human302/%.s: human302/%.[xr] human302/%.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -h -k -m68000 -q1 -B -M -w16 -o120 -g"$(patsubst %.s,%.lab,$@)" --overwrite "$<" "$@"
sed -i -f const.sed -f clean-s.sed $@
misc/%.s: misc/%.[xr] misc/%.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -h -k -m68000 -q1 -B -M -w16 -o120 -g"$(patsubst %.s,%.lab,$@)" --overwrite "$<" "$@"
sed -i -f const.sed -f clean-s.sed $@
sound/pcm8/0.48b/%.s: sound/pcm8/0.48b/%.[xr] sound/pcm8/0.48b/%.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -h -k -m68030 -q1 -B -M -w16 -o120 -g"$(patsubst %.s,%.lab,$@)" --overwrite "$<" "$@"
sed -i -f const.sed -f clean-s.sed $@
iplrom30.s: iplrom30.dat iplrom30.lab iplrom30.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -i -m68030 -m68882 -zfe0000,ff0038 -q1 -B -M -w16 --exclude-fefunc-mac -Tiplrom30.tab -giplrom30.lab --overwrite $< $@
iplrom/iplrom30.s: iplrom/iplrom30.dat iplrom/iplrom30.lab iplrom/iplrom30.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -i -m68030 -m68882 -zfe0000,ff0038 -q1 -B -M -w16 --exclude-fefunc-mac -Tiplrom/iplrom30.tab -giplrom/iplrom30.lab --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
iplromxv.s: iplromxv.dat iplromxv.lab iplromxv.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -i -m68030 -m68882 -zfe0000,ff0010 -q1 -B -M -w16 --exclude-fefunc-mac -Tiplromxv.tab -giplromxv.lab --overwrite $< $@
iplrom/iplromxv.s: iplrom/iplromxv.dat iplrom/iplromxv.lab iplrom/iplromxv.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -i -m68030 -m68882 -zfe0000,ff0010 -q1 -B -M -w16 --exclude-fefunc-mac -Tiplrom/iplromxv.tab -giplrom/iplromxv.lab --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
mdxp.s: mdxp.r mdxp.lab
sound/mxdrv/mdxp.s: sound/mxdrv/mdxp.r sound/mxdrv/mdxp.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -m68000 --sp -q1 -B -M -o$(COLUMNS) -g$(patsubst %.s,%.lab,$@) --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
human.s: human.sys human.lab
human302/human.s: human302/human.sys human302/human.lab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -m68030 --sp -q1 -B -M -o$(COLUMNS) -g$(patsubst %.s,%.lab,$@) --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
opmdrv3.s: opmdrv3.x opmdrv3.lab opmdrv3.tab
sound/opmdrv3.s: sound/opmdrv3.x sound/opmdrv3.lab sound/opmdrv3.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -m68000 --sp -q1 -B -M -o$(COLUMNS) -w16 -g$(patsubst %.s,%.lab,$@) -T$(patsubst %.s,%.tab,$@) --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
mopmdrv.s: mopmdrv.x mopmdrv.lab mopmdrv.tab
sound/mopmdrv.s: sound/mopmdrv.x sound/mopmdrv.lab sound/mopmdrv.tab
dis_include=$(DIS_INCLUDE) $(DIS) $(DIS_DEBUG) -b2 -h -m68000 --sp -q1 -B -M -o$(COLUMNS) -w16 -g$(patsubst %.s,%.lab,$@) -T$(patsubst %.s,%.tab,$@) --overwrite $< $@
sed -i -f const.sed -f clean-s.sed $@
@ -105,6 +141,5 @@ sclean:
find . -type f -name "*.s" -exec rm -f {} \;
clean:
rm -f *.o mxdrv/*.o mxdrv/*/*.o
rm -f en/*.o en/mxdrv/*.o en/mxdrv/*/*.o
rm -f en/*.sed en/mxdrv/*.sed en/mxdrv/*/*.sed
find . -type f -name '*.o' -exec rm -f {} \;
find . -type f -name '*.sed' -exec rm -f {} \;

+ 0
- 151
drive.lab View File

@ -1,151 +0,0 @@
*********************************************
*
* Label file for drive.x
*
* DIS version 3.16
*
*********************************************
000000 P Start
000040 P
000048 P
000064 P
000078 P
0000cc P
000114 P
000198 P
0001d0 P
0001d2 P
000222 P
000228 P
00024a P
00025c P
000272 P
000284 P
0002a2 P
0002b4 P
0002b6 P
0002c8 P
000346 P
0003de P
0004f8 P
000516 P
000528 P
00052a P
00053a P
00054e P
00056e P
00057e P
0005ae P
0005c4 P
0005ca P
0005d0 P
0005e6 P
0005fe P
000606 P
00060a P
000616 P
00061c P
000634 P
000646 P
00064a P
00064c P
000654 P
000662 P
000668 P
000674 P
000694 P
000698 P
0006a8 P
0006aa P
0006c2 P
0006c6 P
0006d0 P
0006d6 P
0006e2 P
0006f4 P
0006f8 P
0006fc P
00070c P
000710 P
000716 P
000724 P
00072a P
00073a P
000740 P
000756 P
00075c P
00077a P
00077e P
000786 DU
0007b2 DS
0007b9 DS
00084f DS
0008a8 DU
0008ab DS
000947 DS
00095c DS
000962 DS
000982 DS
00099f DS
0009a2 DS
0009ac DS
0009c0 DS
0009ca DS
0009d7 DS
0009eb DS
000a16 DS
000a1a DS
000a2e DS
000a42 DS
000a54 DS
000a6c DS
000a84 DS
000a98 DS
000ab0 DS
000ac4 DS
000adc DS
000af4 DS
000b0c DS
000b20 DS
000b34 DS
000b59 DS
000b6e DS
000b97 DS
000bc0 DS
000be9 DS
000c12 DS
000c3b DS
000c64 DS
000c8d DS
000cb6 DS
000ce0 DS
000d0a DS
000d34 DS
000d3b DS
000d3f DU
000d42 DL
000d46 DU
000e5e DU
000f76 DB
000f77 DB
000f78 DW
000f7a DB
000f7c DW
000f7f DB
000f80 DW
000f82 DW
000f84 DW
000f86 DW
000f8c DB
000fda DU
000fdf DU
000fe2 DU
000fe4 DB
000fe6 DU
001004 DU
001022 DB
001023 DB
001024 DB
001026 DW
00142a DU
00142c DU End

+ 0
- 895
drive.s View File

@ -1,895 +0,0 @@
;=============================================
; Filename drive.x
;
;
; Base address 000000
; Exec address 000000
; Text size 000786 byte(s)
; Data size 0005bc byte(s)
; Bss size 0006ea byte(s)
; 144 Labels
;
; Commandline dis -b2 -h -m68000 --sp -q1 -B -M -o120 -gdrive.lab --overwrite drive.x drive.s
; DIS version 3.16
;=============================================
.include inc/doscall.mac
.include inc/iocscall.mac
.include inc/fefunc.mac
.cpu 68000
.text
Start:
lea.l (L00142a),sp
clr.b (L001022)
clr.b (L001023)
DOS _VERNUM
cmp.w #$0332,d0
bcc.w L00056e
movea.l (Start-$0000e0),a0
addq.l #1,a0
lea.l (L000d46),a1
lea.l (L000e5e),a2
bsr.w L000616
move.l d0,(L000d42)
lea.l (L000e5e),a0
L000040:
tst.b (a0)
beq.s L000078
bsr.w L0006d0
L000048:
move.b (a0)+,d0
beq.s L000040
cmp.b #$64,d0 ;'d'
beq.s L000064
cmp.b #$76,d0 ;'v'
bne.w L00053a
move.b #-$01,(L001023)
bra.s L000048
L000064:
tst.l (L000d42)
bne.w L00053a
move.b #-$01,(L001022)
bra.s L000048
L000078:
DOS _CURDRV
move.w d0,-(sp)
DOS _CHGDRV
addq.l #2,sp
move.w d0,d4
clr.l d5
move.l (L000d42),d0
bne.s L0000cc
tst.b (L001022)
beq.w L0001d0
DOS _VERNUM
cmp.w #$0162,d0
bcs.w L00053a
DOS _CURDRV
move.w d0,d2
move.w #$ffff,-(sp)
move.w #$ffff,-(sp)
DOS _DRVXCHG
addq.l #4,sp
move.w d0,d1
tst.l d0
bmi.w L00053a
pea.l (L0009eb)
DOS _PRINT
addq.l #4,sp
cmp.w d1,d2
beq.w L0001d0
bra.w L000198
L0000cc:
cmp.l #$00000002,d0
bhi.w L00053a
lea.l (L000d46),a0
cmpi.b #$3a,($0001,a0) ;':'
bne.w L00053a
tst.b ($0002,a0)
bne.w L00053a
move.b (a0),d0
or.b #$20,d0
sub.b #$61,d0 ;'a'
move.b d0,d2
cmp.w d4,d0
bhi.w L00052a
and.l #$000000ff,d2
cmpi.l #$00000001,(L000d42)
beq.w L0001d2
L000114:
tst.b (a0)+
bne.s L000114
cmpi.b #$3a,($0001,a0) ;':'
bne.w L00053a
tst.b ($0002,a0)
bne.w L00053a
move.b (a0),d0
or.b #$20,d0
sub.b #$61,d0 ;'a'
move.b d0,d1
cmp.w d4,d0
bhi.w L00052a
and.l #$000000ff,d1
cmp.w d1,d2
beq.w L00052a
move.w d1,-(sp)
addq.w #1,(sp)
move.w d2,-(sp)
addq.w #1,(sp)
DOS _DRVXCHG
addq.l #4,sp
DOS _FFLUSH
pea.l (L0009a2)
DOS _PRINT
addq.l #4,sp
move.w d2,-(sp)
addi.w #$0041,(sp)
DOS _PUTCHAR
addq.l #2,sp
pea.l (L00099f)
DOS _PRINT
addq.l #4,sp
move.w d1,-(sp)
addi.w #$0041,(sp)
DOS _PUTCHAR
addq.l #2,sp
pea.l (L0009ac)
DOS _PRINT
addq.l #4,sp
DOS _CURDRV
cmp.w d2,d0
beq.s L000198
cmp.w d1,d0
bne.s L0001d0
move.w d1,d0
move.w d2,d1
move.w d0,d2
L000198:
move.w d1,-(sp)
DOS _CHGDRV
addq.l #2,sp
pea.l (L0009c0)
DOS _PRINT
addq.l #4,sp
move.w d2,-(sp)
addi.w #$0041,(sp)
DOS _PUTCHAR
addq.l #2,sp
pea.l (L0009ca)
DOS _PRINT
addq.l #4,sp
move.w d1,-(sp)
addi.w #$0041,(sp)
DOS _PUTCHAR
addq.l #2,sp
pea.l (L0009d7)
DOS _PRINT
addq.l #4,sp
L0001d0:
clr.w d2
L0001d2:
move.w d2,d0
addq.w #1,d2
cmp.w d4,d2
bhi.w L0004f8
lea.l (L000b59),a0
bsr.w L00075c
tst.l d0
bne.s L000228
pea.l (L000f76)
move.w d2,-(sp)
DOS _GETDPB
addq.l #6,sp
tst.l d0
seq.b (L001024)
bpl.w L000284
pea.l (L001026,pc)
clr.w -(sp)
move.w d2,-(sp)
move.w #$000d,-(sp)
DOS _IOCTRL
tst.l d0
bmi.s L000222
move.w (L001026,pc),d1
moveq.l #$00,d3
move.b d2,d0
subq.w #1,d0
bra.w L0002c8
L000222:
lea.l (L000b34),a0
L000228:
tst.l d5
beq.s L00025c
cmpa.l d5,a0
beq.s L000272
move.w d2,d0
sub.w d6,d0
cmp.w #$0002,d0
bcs.s L00025c
cmp.w #$0003,d0
bcs.s L00024a
pea.l (L000a16)
DOS _PRINT
addq.l #4,sp
L00024a:
move.w d2,d0
add.w #$003f,d0
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
move.l d5,-(sp)
DOS _PRINT
addq.l #4,sp
L00025c:
move.l a0,d5
move.w d2,d6
move.w d2,d0
add.w #$0040,d0
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
move.l a0,-(sp)
DOS _PRINT
addq.l #4,sp
L000272:
cmpi.l #$00000001,(L000d42)
bne.w L0001d2
bra.w L000528
L000284:
tst.l d5
beq.s L0002b6
move.w d2,d0
sub.w d6,d0
cmp.w #$0002,d0
bcs.s L0002b4
cmp.w #$0003,d0
bcs.s L0002a2
pea.l (L000a16)
DOS _PRINT
addq.l #4,sp
L0002a2:
move.w d2,d0
add.w #$003f,d0
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
move.l d5,-(sp)
DOS _PRINT
addq.l #4,sp
L0002b4:
clr.l d5
L0002b6:
move.b (L000f76),d0
move.b (L000f8c),d1
move.b (L000f77),d3
L0002c8:
lea.l (L000a1a),a0
cmp.b #$fe,d1
beq.s L000346
lea.l (L000a2e),a0
cmp.b #$f9,d1
beq.s L000346
lea.l (L000a42),a0
cmp.b #$f8,d1
beq.s L000346
lea.l (L000a54),a0
cmp.b #$f7,d1
beq.s L000346
lea.l (L000a6c),a0
cmp.b #$f6,d1
beq.s L000346
lea.l (L000ab0,pc),a0
cmp.b #$fd,d1
beq.s L000346
lea.l (L000ac4,pc),a0
cmp.b #$fb,d1
beq.s L000346
lea.l (L000adc,pc),a0
cmp.b #$fc,d1
beq.s L000346
lea.l (L000af4,pc),a0
cmp.b #$fa,d1
beq.s L000346
lea.l (L000a84,pc),a0
cmpi.b #$f5,d1
beq.s L000346
lea.l (L000a98,pc),a0
cmpi.b #$f4,d1
beq.s L000346
lea.l (L000b0c),a0
L000346:
add.b #$41,d0 ;'A'
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
move.l a0,-(sp)
DOS _PRINT
addq.l #4,sp
pea.l (L000b20)
DOS _PRINT
addq.l #4,sp
clr.l d0
move.b d3,d0
lea.l (L000fda),a0
bsr.w L000716
clr.b (L000fe4)
pea.l (L000fe2)
DOS _PRINT
addq.l #4,sp
tst.b (L001023)
beq.s L0003de
move.w #$ffff,-(sp)
move.w #$0010,-(sp)
DOS _CONCTRL
addq.l #4,sp
cmp.b #$01,d0
bhi.s L0003de
move.w d2,d0
and.w #$00ff,d0
move.w d0,-(sp)
DOS _DRVCTRL
addq.l #2,sp
and.l #$00000004,d0
bne.s L0003de
lea.l (L000fda),a0
lea.l (L0007b2),a1
bsr.w L0006c2
move.b d2,d0
add.b #$40,d0 ;'@'
move.b d0,(a0)
move.w #$0008,-(sp)
move.l a0,-(sp)
pea.l (L000fe6)
DOS _FILES
lea.l ($000a,sp),sp
tst.l d0
bmi.s L0003de
bsr.w L0005d0
L0003de:
pea.l (L000d3f)
DOS _PRINT
addq.l #4,sp
cmpi.l #$00000001,(L000d42)
bne.w L0001d2
tst.b (L001024)
beq.w L000528
lea.l (L000b6e),a0
move.w (L000f78),d0
and.l #$0000ffff,d0
bsr.w L00057e
lea.l (L000b97),a0
move.b (L000f7a),d0
and.l #$000000ff,d0
addq.l #1,d0
bsr.w L00057e
lea.l (L000bc0),a0
move.w (L000f84),d0
and.l #$0000ffff,d0
subq.l #1,d0
bsr.w L00057e
lea.l (L000be9),a0
move.w (L000f7c),d0
and.l #$0000ffff,d0
bsr.w L00057e
lea.l (L000c12),a0
move.b (L000f7f),d0
and.l #$000000ff,d0
bsr.w L00057e
lea.l (L000c3b),a0
move.w (L000f86),d0
and.l #$0000ffff,d0
bsr.w L00057e
lea.l (L000c64),a0
move.w (L000f80),d0
and.l #$0000ffff,d0
bsr.w L00057e
lea.l (L000c8d),a0
move.w (L000f82),d0
and.l #$0000ffff,d0
bsr.w L00057e
move.w d2,d0
and.w #$00ff,d0
move.w d0,-(sp)
DOS _DRVCTRL
addq.l #2,sp
move.l d0,d1
lea.l (L000cb6),a0
and.l #$00000004,d0
bsr.w L0005ae
lea.l (L000ce0),a0
move.l d1,d0
and.l #$00000040,d0
bsr.w L0005ae
lea.l (L000d0a),a0
move.l d1,d0
and.l #$0000000c,d0
bsr.w L0005ae
bra.s L000528
L0004f8:
tst.l d5
beq.s L000528
move.w d2,d0
sub.w d6,d0
cmp.w #$0002,d0
bcs.s L000528
cmp.w #$0003,d0
bcs.s L000516
pea.l (L000a16)
DOS _PRINT
addq.l #4,sp
L000516:
move.w d2,d0
add.w #$003f,d0
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
move.l d5,-(sp)
DOS _PRINT
addq.l #4,sp
L000528:
DOS _EXIT
L00052a:
pea.l (L000962)
DOS _PRINT
addq.l #4,sp
move.w #$0002,-(sp)
DOS _EXIT2
L00053a:
lea.l (L0008a8),a0
DOS _VERNUM
cmp.w #$0162,d0
bcs.s L00054e
lea.l (L00084f),a0
L00054e:
pea.l (L0007b9)
DOS _PRINT
addq.l #4,sp
move.l a0,-(sp)
DOS _PRINT
addq.l #4,sp
pea.l (L0008ab)
DOS _PRINT
addq.l #4,sp
move.w #$0001,-(sp)
DOS _EXIT2
L00056e:
pea.l (L000982)
DOS _PRINT
addq.l #4,sp
move.w #$0002,-(sp)
DOS _EXIT2
L00057e:
move.l d0,-(sp)
move.l a0,-(sp)
DOS _PRINT
addq.l #4,sp
move.l (sp)+,d0
lea.l (L000fda),a0
bsr.w L000716
clr.b (L000fe4)
pea.l (L000fdf)
DOS _PRINT
addq.l #4,sp
pea.l (L000d3f)
DOS _PRINT
addq.l #4,sp
rts
L0005ae:
move.l d0,-(sp)
move.l a0,-(sp)
DOS _PRINT
addq.l #4,sp
move.l (sp)+,d0
tst.b d0
beq.s L0005c4
pea.l (L000d3b)
bra.s L0005ca
L0005c4:
pea.l (L000d34)
L0005ca:
DOS _PRINT
addq.l #4,sp
rts
L0005d0:
pea.l (L000947)
DOS _PRINT
addq.l #4,sp
move.w #$0015,d1
lea.l (L001004),a0
clr.w d0
L0005e6:
tst.w d1
beq.s L00060a
move.b (a0)+,d0
beq.s L000606
cmp.b #$2e,d0 ;'.'
beq.s L0005e6
move.w d0,-(sp)
DOS _PUTCHAR
addq.l #2,sp
subq.w #1,d1
bra.s L0005e6
L0005fe:
move.w #$0020,-(sp) ;' '
DOS _PUTCHAR
addq.l #2,sp
L000606:
dbra.w d1,L0005fe
L00060a:
pea.l (L00095c)
DOS _PRINT
addq.l #4,sp
rts
L000616:
movem.l d1/a0-a2,-(sp)
clr.l d1
L00061c:
bsr.w L0006a8
adda.l d0,a0
tst.b (a0)
beq.s L000698
move.b (a0)+,d0
cmp.b #$2d,d0 ;'-'
beq.s L000634
cmp.b #$2f,d0 ;'/'
bne.s L00064a
L000634:
move.b (a0)+,d0
beq.s L000698
cmp.b #$09,d0
beq.s L000646
cmp.b #$20,d0 ;' '
beq.s L000646
move.b d0,(a2)+
L000646:
clr.b (a2)+
bra.s L00061c
L00064a:
addq.l #1,d1
L00064c:
move.b d0,(a1)+
cmp.b #$22,d0 ;'"'
bne.s L000662
L000654:
move.b (a0)+,d0
beq.s L000698
move.b d0,(a1)+
cmp.b #$22,d0 ;'"'
bne.s L000654
bra.s L000674
L000662:
cmp.b #$27,d0 ;'''
bne.s L000674
L000668:
move.b (a0)+,d0
beq.s L000698
move.b d0,(a1)+
cmp.b #$27,d0 ;'''
bne.s L000668
L000674:
move.b (a0),d0
beq.s L000698
cmp.b #$2f,d0 ;'/'
beq.s L000694
cmp.b #$2d,d0 ;'-'
beq.s L000694
addq.l #1,a0
cmp.b #$09,d0
beq.s L000694
cmp.b #$20,d0 ;' '
beq.s L000694
bra.s L00064c
L000694:
clr.b (a1)+
bra.s L00061c
L000698:
clr.b (a1)+
clr.b (a1)
clr.b (a2)+
clr.b (a2)
move.l d1,d0
movem.l (sp)+,d1/a0-a2
rts
L0006a8:
move.l a0,-(sp)
L0006aa:
move.b (a0)+,d0
cmpi.b #$20,d0 ;' '
beq.s L0006aa
cmpi.b #$09,d0
beq.s L0006aa
move.l a0,d0
movea.l (sp)+,a0
sub.l a0,d0
subq.l #1,d0
rts
L0006c2:
movem.l a0-a1,-(sp)
L0006c6:
move.b (a1)+,(a0)+
bne.s L0006c6
movem.l (sp)+,a0-a1
rts
L0006d0:
movem.l d0-d1/a0,-(sp)
clr.b d1
L0006d6:
move.b (a0),d0
beq.s L000710
tst.b d1
beq.s L0006e2
clr.b d1
bra.s L0006f8
L0006e2:
cmp.b #$80,d0
bcs.s L0006fc
cmp.b #$a0,d0
bcs.s L0006f4
cmp.b #$e0,d0
bcs.s L0006fc
L0006f4:
move.b #$01,d1
L0006f8:
addq.l #1,a0
bra.s L0006d6
L0006fc:
cmpi.b #$41,d0 ;'A'
bcs.s L00070c
cmpi.b #$5a,d0 ;'Z'
bhi.s L00070c
add.b #$20,d0 ;' '
L00070c:
move.b d0,(a0)+
bra.s L0006d6
L000710:
movem.l (sp)+,d0-d1/a0
rts
L000716:
movem.l d0-d2/a0-a1,-(sp)
movem.l a0,-(sp)
lea.l (L000786),a1
L000724:
clr.b d2
move.l (a1)+,d1
beq.s L00073a
L00072a:
addq.b #1,d2
sub.l d1,d0
bcc.s L00072a
add.l d1,d0
add.b #$2f,d2 ;'/'
move.b d2,(a0)+
bra.s L000724
L00073a:
clr.b (a0)
movem.l (sp)+,a0
L000740:
move.b (a0)+,d0
beq.s L000756
cmp.b #$30,d0 ;'0'
bne.s L000756
tst.b (a0)
beq.s L000756
move.b #$20,(-$0001,a0) ;' '
bra.s L000740
L000756:
movem.l (sp)+,d0-d2/a0-a1
rts
L00075c:
movem.l d1,-(sp)
and.l #$000000ff,d0
move.l d0,d1
DOS _CURDRV
move.w d0,-(sp)
move.w d1,-(sp)
DOS _CHGDRV
addq.l #2,sp
cmp.w d1,d0
bhi.s L00077a
moveq.l #$ff,d0
bra.s L00077e
L00077a:
DOS _CHGDRV
clr.l d0
L00077e:
addq.l #2,sp
movem.l (sp)+,d1
rts
.data
L000786:
.dc.b $3b,$9a,$ca,$00,$05,$f5,$e1,$00
.dc.b $00,$98,$96,$80,$00,$0f,$42,$40
.dc.b $00,$01,$86,$a0,$00,$00,$27,$10
.dc.b $00,$00,$03,$e8,$00,$00,$00,$64
.dc.b $00,$00,$00,$0a,$00,$00,$00,$01
.dc.b $00,$00,$00,$00
L0007b2:
.dc.b 'A:\*.*',$00
L0007b9:
.dc.b 'X68k Drive v2.20 Copyright 1989,90,91,92,93 SHARP/Hudson',$0d,$0a
.dc.b '使drive',$0d,$0a
.dc.b $09,'/v',$09,'',$0d,$0a,$00
L00084f:
.dc.b $09,'/d',$09,'',$0d,$0a
.dc.b $0d,$0a
.dc.b $09,'/dのスイッチを付けた場合ドライブ名は指定しない'
L0008a8:
.dc.b $0d,$0a,$00
L0008ab:
.dc.b $09,'',$0d,$0a
.dc.b $09,'',$0d,$0a
.dc.b $09,'',$0d,$0a,$00
L000947:
.dc.b ' ',$00
L00095c:
.dc.b ' ',$00
L000962:
.dc.b 'drive: ',$0d,$0a,$00
L000982:
.dc.b '使',$0d,$0a,$00
L00099f:
.dc.b ':'
L0009a2:
.dc.b ' ',$00
L0009ac:
.dc.b ':',$0d,$0a,$00
L0009c0:
.dc.b ' ',$00
L0009ca:
.dc.b ': ',$00
L0009d7:
.dc.b ':',$0d,$0a,$00
L0009eb:
.dc.b '',$0d,$0a,$00
L000a16:
.dc.b '|',$0d,$0a,$00
L000a1a:
.dc.b ': ',$09,$00
L000a2e:
.dc.b ':  ',$09,$00
L000a42:
.dc.b ': ',$09,$00
L000a54:
.dc.b ': (SCSI)',$09,$00
L000a6c:
.dc.b ': (SCSI)',$09,$00
L000a84:
.dc.b ': (SCSI)',$09,$00
L000a98:
.dc.b ': (SCSI)',$09,$00
L000ab0:
.dc.b ': ',$09,$00
L000ac4:
.dc.b ': 640',$09,$00
L000adc:
.dc.b ': 720',$09,$00
L000af4:
.dc.b ': .44MB',$00
L000b0c:
.dc.b ':  ',$09,$00
L000b20:
.dc.b ' ',$00
L000b34:
.dc.b ': ',$0d,$0a,$00
L000b59:
.dc.b ': ',$0d,$0a,$00
L000b6e:
.dc.b '',$00
L000b97:
.dc.b '',$00
L000bc0:
.dc.b '',$00
L000be9:
.dc.b '',$00
L000c12:
.dc.b '',$00
L000c3b:
.dc.b '',$00
L000c64:
.dc.b '',$00
L000c8d:
.dc.b '',$00
L000cb6:
.dc.b ' ',$00
L000ce0:
.dc.b ' ',$00
L000d0a:
.dc.b ' ',$00
L000d34:
.dc.b ' ',$0d,$0a,$00
L000d3b:
.dc.b ''
L000d3f:
.dc.b $0d,$0a,$00
.bss
L000d42:
.ds.l 1
L000d46:
.ds.b 280
L000e5e:
.ds.b 280
L000f76:
.ds.b 1
L000f77:
.ds.b 1
L000f78:
.ds.w 1
L000f7a:
.ds.b 2
L000f7c:
.ds.b 3
L000f7f:
.ds.b 1
L000f80:
.ds.w 1
L000f82:
.ds.w 1
L000f84:
.ds.w 1
L000f86:
.ds.b 6
L000f8c:
.ds.b 78
L000fda:
.ds.b 5
L000fdf:
.ds.b 3
L000fe2:
.ds.b 2
L000fe4:
.ds.b 2
L000fe6:
.ds.b 30
L001004:
.ds.b 30
L001022:
.ds.b 1
L001023:
.ds.b 1
L001024:
.ds.b 2
L001026:
.ds.b 1028
L00142a:
.ds.b 2
End:
.end Start

BIN
en/hlk.x View File


BIN
en/human302/bin/bind.x View File


BIN
en/human302/bin/drive.x View File


BIN
en/human302/bin/process.x View File


BIN
en/mxdrv/mdxp.x View File


BIN
en/mxdrv/mxp.x View File


+ 42
- 0
human302/ask/env1.ask View File

@ -0,0 +1,42 @@
BEGIN =CTRL+XF1
END =CTRL+XF1
XFER =XF3
XFER2 =SP
ENTER =XF5
TYPE =F10
DEL =DEL
RIGHT =RIGHT
LEFT =LEFT
HOME =HOME
CLR =CLR
ESC =ESC
HIRAGANA =CTRL+XF2
KATAKANA =CTRL+XF3
HANKAKU =CTRL+XF4
ZENKAKU =CTRL+XF5
TOPENTER =CTRL+J
CODE =F7
LEARN =F9
DIC =F8
NEXTKOUHO1 =RIGHT
NEXTKOUHO2 =XF3
NEXTKOUHO3 =SP
BACKKOUHO1 =LEFT
BACKKOUHO2 =SHIFT+XF3
BACKKOUHO3 =NULL
NEXTBLOCK =DOWN
BACKBLOCK =UP
SHORTER =SHIFT+XF1
LONGER =SHIFT+XF2
NEXTBUN =XF2
BACKBUN =XF1
ECHO =F6
DEFECHO =0
DEFROME =1
DEFZEN =1
DEFHIRA =1
DEFALL =2
DEFMEM =1
DEFCAPS =1
DEFOPT1 =1


+ 41
- 0
human302/ask/env2.ask View File

@ -0,0 +1,41 @@
BEGIN =CTRL+XF3
END =CTRL+XF3
XFER =XF3
XFER2 =NULL
ENTER =XF5
TYPE =CTRL+F5
DEL =DEL
RIGHT =RIGHT
LEFT =LEFT
HOME =NULL
CLR =NULL
ESC =ESC
HIRAGANA =F6
KATAKANA =F7
HANKAKU =F9
ZENKAKU =F8
TOPENTER =CTRL+J
CODE =SHIFT+F5
LEARN =CTRL+F4
DIC =CTRL+F2
NEXTKOUHO1 =XF3
NEXTKOUHO2 =CTRL+C
NEXTKOUHO3 =NULL
BACKKOUHO1 =SHIFT+XF3
BACKKOUHO2 =CTRL+Z
BACKKOUHO3 =NULL
NEXTBLOCK =DOWN
BACKBLOCK =UP
SHORTER =CTRL+LEFT
LONGER =CTRL+RIGHT
NEXTBUN =RIGHT
BACKBUN =LEFT
ECHO =SHIFT+XF4
DEFECHO =0
DEFROME =1
DEFZEN =1
DEFHIRA =1
DEFALL =1
DEFMEM =1
DEFCAPS =1
DEFOPT1 =1

+ 41
- 0
human302/ask/env3.ask View File

@ -0,0 +1,41 @@
BEGIN =CTRL+XF3
END =CTRL+XF3
XFER =XF3
XFER2 =SP
ENTER =XF5
TYPE =CTRL+F10
DEL =DEL
RIGHT =RIGHT
LEFT =LEFT
HOME =HOME
CLR =ESC
ESC =ESC
HIRAGANA =F6
KATAKANA =F7
HANKAKU =F8
ZENKAKU =F9
TOPENTER =CTRL+DOWN
CODE =CTRL+F7
LEARN =SHIFT+F9
DIC =SHIFT+F8
NEXTKOUHO1 =NULL
NEXTKOUHO2 =XF3
NEXTKOUHO3 =SP
BACKKOUHO1 =NULL
BACKKOUHO2 =SHIFT+XF3
BACKKOUHO3 =NULL
NEXTBLOCK =DOWN
BACKBLOCK =UP
SHORTER =LEFT
LONGER =RIGHT
NEXTBUN =CTRL+RIGHT
BACKBUN =CTRL+LEFT
ECHO =NULL
DEFECHO =0
DEFROME =1
DEFZEN =1
DEFHIRA =1
DEFALL =1
DEFMEM =1
DEFCAPS =1
DEFOPT1 =1

+ 41
- 0
human302/ask/env4.ask View File

@ -0,0 +1,41 @@
BEGIN =CTRL+XF3
END =CTRL+XF3
XFER =XF3
XFER2 =SP
ENTER =XF5
TYPE =F10
DEL =DEL
RIGHT =RIGHT
LEFT =LEFT
HOME =HOME
CLR =CLR
ESC =ESC
HIRAGANA =CTRL+XF1
KATAKANA =CTRL+XF2
HANKAKU =CTRL+XF4
ZENKAKU =CTRL+XF5
TOPENTER =SHIFT+XF2
CODE =SHIFT+F4
LEARN =SHIFT+F2
DIC =SHIFT+F1
NEXTKOUHO1 =SP
NEXTKOUHO2 =XF3
NEXTKOUHO3 =NULL
BACKKOUHO1 =SHIFT+XF3
BACKKOUHO2 =NULL
BACKKOUHO3 =NULL
NEXTBLOCK =CTRL+DOWN
BACKBLOCK =CTRL+UP
SHORTER =CTRL+LEFT
LONGER =CTRL+RIGHT
NEXTBUN =DOWN
BACKBUN =UP
ECHO =CTRL+F6
DEFECHO =1
DEFROME =1
DEFZEN =1
DEFHIRA =1
DEFALL =0
DEFMEM =1
DEFCAPS =1
DEFOPT1 =1

+ 39
- 0
human302/ask/env5.ask View File

@ -0,0 +1,39 @@
BEGIN =CTRL+XF3
END =CTRL+XF3
XFER =XF3
XFER2 =NULL
ENTER =XF5
TYPE =CTRL+F10
DEL =DEL
RIGHT =RIGHT
LEFT =LEFT
ESC =ESC
HIRAGANA =F6
KATAKANA =SHIFT+F6
HANKAKU =F7
ZENKAKU =SHIFT+F7
TOPENTER =SP
CODE =CTRL+F5
LEARN =CTRL+F6
DIC =CTRL+F7
NEXTKOUHO1 =XF3
NEXTKOUHO2 =NULL
NEXTKOUHO3 =NULL
BACKKOUHO1 =SHIFT+XF3
BACKKOUHO2 =NULL
BACKKOUHO3 =NULL
NEXTBLOCK =DOWN
BACKBLOCK =UP
SHORTER =CTRL+LEFT
LONGER =CTRL+RIGHT
NEXTBUN =RIGHT
BACKBUN =LEFT
ECHO =CTRL+SHIFT+XF3
DEFECHO =0
DEFROME =1
DEFZEN =1
DEFHIRA =1
DEFALL =1
DEFMEM =1
DEFCAPS =1
DEFOPT1 =1

+ 10
- 0
human302/autoexec.bat View File

@ -0,0 +1,10 @@
ECHO OFF
PATH A:\;A:\SYS;A:\BIN;A:\BASIC2;A:\ETC;
SET FASTIO=DONE
IF %FASTIO% == DONE GOTO SKIP
FASTIO 384 -S32 -D -F -E
FASTSEEK 128
FASTOPEN 100
SET FASTIO=DONE
:SKIP


BIN
human302/basic2/audio.fnc View File


+ 13
- 0
human302/basic2/basic.cnf View File

@ -0,0 +1,13 @@
FREE = 128
WIDTH = 64
BEEP = ON
CAPS = OFF
FUNC = AUDIO
FUNC = GRAPH
FUNC = MOUSE
FUNC = MUSIC
FUNC = MUSIC3
FUNC = SPRITE
FUNC = STICK
FUNC = IMAGE


BIN
human302/basic2/basic.x View File


BIN
human302/basic2/graph.fnc View File


BIN
human302/basic2/image.fnc View File


BIN
human302/basic2/mouse.fnc View File


BIN
human302/basic2/music.fnc View File


BIN
human302/basic2/music3.fnc View File


BIN
human302/basic2/sprite.fnc View File


BIN
human302/basic2/stick.fnc View File


+ 1
- 0
human302/beep.sys View File

@ -0,0 +1 @@
pw�D苔C苔C苔C苔C苔C苔C苔C苔C苔C苔C苔C苔C€ヒ 4眺4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃4�4⊃4⊃4⊃3★

attrib.en.strings → human302/bin/attrib.en.strings View File


attrib.lab → human302/bin/attrib.lab View File


attrib.s → human302/bin/attrib.s View File

@ -1,5 +1,5 @@
;=============================================
; Filename attrib.x
; Filename human302/bin/attrib.x
;
;
; Base address 000000
@ -9,7 +9,7 @@
; Bss size 00108e byte(s)
; 44 Labels
;
; Commandline dis -b2 -h -m68000 --sp -q1 -B -M -o120 -gattrib.lab --overwrite attrib.x attrib.s
; Commandline dis -h -k -m68000 -q1 -B -M -w16 -o120 -ghuman302/bin/attrib.lab --overwrite human302/bin/attrib.x human302/bin/attrib.s
; DIS version 3.16
;=============================================
@ -22,114 +22,114 @@
.text
L000000:
lea.l (L0013a8),sp
lea.l (L0013a8),a7
clr.b (L000260)
move.b #$ff,(L000261)
addq.l #1,a2
L000016:
bsr.w L000240
beq.w L000232
bsr L000240
beq L000232
cmp.b #$2d,d0 ;'-'
beq.s L00007c
beq L00007c
cmp.b #$2b,d0 ;'+'
bne.w L0000e8
bne L0000e8
L00002c:
move.b (a2)+,d0
L00002e:
or.b #$20,d0
cmp.b #$73,d0 ;'s'
beq.s L00005a
beq L00005a
cmp.b #$72,d0 ;'r'
beq.s L000050
beq L000050
cmp.b #$68,d0 ;'h'
bne.w L000232
bne L000232
bset.b #$01,(L000260)
bra.s L000062
bra L000062
L000050:
bset.b #$00,(L000260)
bra.s L000062
bra L000062
L00005a:
bset.b #$02,(L000260)
L000062:
move.b (a2)+,d0
beq.w L000232
beq L000232
cmp.b #$2d,d0 ;'-'
beq.s L00007c
beq L00007c
cmp.b #$2b,d0 ;'+'
beq.s L00002c
beq L00002c
cmp.b #$20,d0 ;' '
beq.s L000016
bra.s L00002e
beq L000016
bra L00002e
L00007c:
move.b (a2)+,d0
L00007e:
or.b #$20,d0
cmp.b #$73,d0 ;'s'
beq.s L0000ba
beq L0000ba
cmp.b #$72,d0 ;'r'
beq.s L0000a8
beq L0000a8
cmp.b #$68,d0 ;'h'
bne.w L000232
bne L000232
bclr.b #$01,(L000260)
bclr.b #$01,(L000261)
bra.s L0000ca
bra L0000ca
L0000a8:
bclr.b #$00,(L000260)
bclr.b #$00,(L000261)
bra.s L0000ca
bra L0000ca
L0000ba:
bclr.b #$02,(L000260)
bclr.b #$02,(L000261)
L0000ca:
move.b (a2)+,d0
beq.w L000232
beq L000232
cmp.b #$2d,d0 ;'-'
beq.s L00007c
beq L00007c
cmp.b #$2b,d0 ;'+'
beq.w L00002c
beq L00002c
cmp.b #$20,d0 ;' '
beq.w L000016
bra.s L00007e
beq L000016
bra L00007e
L0000e8:
subq.l #1,a2
pea.l (L00031a)
move.l a2,-(sp)
move.l a2,-(a7)
DOS _NAMESTS
addq.l #8,sp
addq.l #8,a7
tst.l d0
bmi.w L000216
bmi L000216
lea.l (L00031a),a0
cmpi.b #$ff,(a0)
beq.w L000216
beq L000216
move.b ($0001,a0),d0
add.b #$41,d0 ;'A'
move.b d0,(a0)+
move.b #$3a,(a0)+ ;':'
L000118:
tst.b (a0)+
bne.s L000118
bne L000118
subq.l #1,a0
move.l a0,(L00025c)
move.w #$ffff,-(sp)
move.l a2,-(sp)
move.w #$ffff,-(a7)
move.l a2,-(a7)
pea.l (L000372)
DOS _FILES
lea.l ($000a,sp),sp
lea.l ($000a,a7),a7
tst.l d0
bmi.w L000224
bmi L000224
L00013c:
clr.w d7
move.b (L000387),d7
tst.b (L000260)
bne.s L000156
bne L000156
cmpi.b #$ff,(L000261)
beq.s L000188
beq L000188
L000156:
and.b (L000261),d7
or.b (L000260),d7
@ -137,101 +137,101 @@ L000156:
movea.l (L00025c),a1
L00016e:
move.b (a0)+,(a1)+
bne.s L00016e
move.w d7,-(sp)
bne L00016e
move.w d7,-(a7)
pea.l (L00031a)
DOS _CHMOD
addq.l #6,sp
addq.l #6,a7
tst.l d0
bpl.s L000188
bpl L000188
move.b (L000387),d7
L000188:
clr.w d1
move.b #$41,d1 ;'A'
btst.l #$05,d7
bne.s L000198
bne L000198
move.b #$2d,d1 ;'-'
L000198:
bsr.w L00024c
bsr L00024c
move.b #$44,d1 ;'D'
btst.l #$04,d7
bne.s L0001aa
bne L0001aa
move.b #$2d,d1 ;'-'
L0001aa:
bsr.w L00024c
bsr L00024c
move.b #$56,d1 ;'V'
btst.l #$03,d7
bne.s L0001bc
bne L0001bc
move.b #$2d,d1 ;'-'
L0001bc:
bsr.w L00024c
bsr L00024c
move.b #$53,d1 ;'S'
btst.l #$02,d7
bne.s L0001ce
bne L0001ce
move.b #$2d,d1 ;'-'
L0001ce: