Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape10a_acorn_eu_1990_april.wav » ULA2
ULA2
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn tapes » Electron_User » Electron_User_tape10a_acorn_eu_1990_april.wav |
Filename: | ULA2 |
Read OK: | ✔ |
File size: | 0435 bytes |
Load address: | 2000 |
Exec address: | 1900 |
Duplicates
There are 3 duplicate copies of this file in the archive:
- AEW website » database » database_5_25_discs_Electron-User-7-07_D-E707.ssd » ULA2
- AEW website » database » database_tapes_Electron-User-7-07_EU7-7_E.uef » ULA2
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape10b_acorn_eu_1990_april.wav » ULA2
- Personal collection » Acorn tapes » Electron_User » Electron_User_tape10a_acorn_eu_1990_april.wav » ULA2
File contents
10REM Split modes II 20REM By R.Henderson 30REM (c) Electron User 40?&74=0 50FOR x%=0 TO 2 STEP 2 60P%=&900 70[ OPT x% 80PHP : PHA 90TXA : PHA 100TYA : PHA 110LDA #&FF 120STA &29B 130STA &29C 140STA &29D 150STA &29E 160STA &29F 170LDA &74 180EOR #&FF 190BNE col3 200ASL A 210BEQ col4 220.ret 230PLA : TAY 240PLA : TAX 250PLA : PLP 260RTS 270.col4 280STA &74 290LDA &72 300STA&FE08 310LDA &73 320STA&FE09 330LDA #168 340STA &282 350STA &FE07 360JMP ret 370.col3 380STA &74 390LDA &70 400STA&FE08 410LDA &71 420STA&FE09 430LDA #160 440STA &282 450STA &FE07 460JMP ret 470.go 480LDA #19 490JSR &FFF4 500LDA #&FF 510STA &29B 520STA &29C 530STA &29D 540STA &29E 550STA &29F 560LDA #0 : STA &74 570LDA #0 : STA &220 580LDA #9 : STA &221 590LDA #14 600LDX #5 610LDY #0 620JSR &FFF4 630RTS 640] 650NEXT 660?&72=112 : ?&73=49 670?&70=60 : ?&71=23 680CALL go 690MODE 4 700VDU 23,1,0;0;0;0; 710?&355=4 720?&361=7 730?&360=0 740?&34F=8 750VDU 28,0,31,39,13 760REPEAT 770MOVE 0,612 780MOVE 1000,700 790FOR F%=0 TO 480 800?&360=3 810GCOL 0,RND(4)-1 820PLOT 85,RND(1278),RND(400)+612 830?&360=0 840PRINT "This is Mode 4..."; 850NEXT 860UNTIL 0
� Split modes II � By R.Henderson � (c) Electron User ( ?&74=0 2� x%=0 � 2 � 2 <P%=&900 F[ OPT x% P PHP : PHA Z TXA : PHA d TYA : PHA nLDA #&FF xSTA &29B �STA &29C �STA &29D �STA &29E �STA &29F �LDA &74 � � #&FF �BNE col3 � ASL A �BEQ col4 �.ret � PLA : TAY � PLA : TAX � PLA : PLP RTS .col4 STA &74 "LDA &72 ,STA&FE08 6LDA &73 @STA&FE09 JLDA #168 TSTA &282 ^ STA &FE07 hJMP ret r .col3 |STA &74 �LDA &70 �STA&FE08 �LDA &71 �STA&FE09 �LDA #160 �STA &282 � STA &FE07 �JMP ret �.go �LDA #19 � JSR &FFF4 �LDA #&FF �STA &29B STA &29C STA &29D STA &29E &STA &29F 0LDA #0 : STA &74 :LDA #0 : STA &220 DLDA #9 : STA &221 NLDA #14 X LDX #5 b LDY #0 l JSR &FFF4 vRTS �] �� �?&72=112 : ?&73=49 �?&70=60 : ?&71=23 �� go �� 4 �� 23,1,0;0;0;0; �?&355=4 �?&361=7 �?&360=0 �?&34F=8 �� 28,0,31,39,13 �� � 0,612 � 1000,700 � F%=0 � 480 ?&360=3 *� 0,�(4)-1 4� 85,�(1278),�(400)+612 >?&360=0 H� "This is Mode 4..."; R� \� 0 �
00000000 0d 00 0a 14 f4 20 53 70 6c 69 74 20 6d 6f 64 65 |..... Split mode| 00000010 73 20 49 49 0d 00 14 14 f4 20 42 79 20 52 2e 48 |s II..... By R.H| 00000020 65 6e 64 65 72 73 6f 6e 0d 00 1e 17 f4 20 28 63 |enderson..... (c| 00000030 29 20 45 6c 65 63 74 72 6f 6e 20 55 73 65 72 0d |) Electron User.| 00000040 00 28 0a 3f 26 37 34 3d 30 0d 00 32 12 e3 20 78 |.(.?&74=0..2.. x| 00000050 25 3d 30 20 b8 20 32 20 88 20 32 0d 00 3c 0b 50 |%=0 . 2 . 2..<.P| 00000060 25 3d 26 39 30 30 0d 00 46 0c 5b 20 4f 50 54 20 |%=&900..F.[ OPT | 00000070 78 25 0d 00 50 0d 50 48 50 20 3a 20 50 48 41 0d |x%..P.PHP : PHA.| 00000080 00 5a 0d 54 58 41 20 3a 20 50 48 41 0d 00 64 0d |.Z.TXA : PHA..d.| 00000090 54 59 41 20 3a 20 50 48 41 0d 00 6e 0c 4c 44 41 |TYA : PHA..n.LDA| 000000a0 20 23 26 46 46 0d 00 78 0c 53 54 41 20 26 32 39 | #&FF..x.STA &29| 000000b0 42 0d 00 82 0c 53 54 41 20 26 32 39 43 0d 00 8c |B....STA &29C...| 000000c0 0c 53 54 41 20 26 32 39 44 0d 00 96 0c 53 54 41 |.STA &29D....STA| 000000d0 20 26 32 39 45 0d 00 a0 0c 53 54 41 20 26 32 39 | &29E....STA &29| 000000e0 46 0d 00 aa 0b 4c 44 41 20 26 37 34 0d 00 b4 0a |F....LDA &74....| 000000f0 82 20 23 26 46 46 0d 00 be 0c 42 4e 45 20 63 6f |. #&FF....BNE co| 00000100 6c 33 0d 00 c8 09 41 53 4c 20 41 0d 00 d2 0c 42 |l3....ASL A....B| 00000110 45 51 20 63 6f 6c 34 0d 00 dc 08 2e 72 65 74 0d |EQ col4.....ret.| 00000120 00 e6 0d 50 4c 41 20 3a 20 54 41 59 0d 00 f0 0d |...PLA : TAY....| 00000130 50 4c 41 20 3a 20 54 41 58 0d 00 fa 0d 50 4c 41 |PLA : TAX....PLA| 00000140 20 3a 20 50 4c 50 0d 01 04 07 52 54 53 0d 01 0e | : PLP....RTS...| 00000150 09 2e 63 6f 6c 34 0d 01 18 0b 53 54 41 20 26 37 |..col4....STA &7| 00000160 34 0d 01 22 0b 4c 44 41 20 26 37 32 0d 01 2c 0c |4..".LDA &72..,.| 00000170 53 54 41 26 46 45 30 38 0d 01 36 0b 4c 44 41 20 |STA&FE08..6.LDA | 00000180 26 37 33 0d 01 40 0c 53 54 41 26 46 45 30 39 0d |&73..@.STA&FE09.| 00000190 01 4a 0c 4c 44 41 20 23 31 36 38 0d 01 54 0c 53 |.J.LDA #168..T.S| 000001a0 54 41 20 26 32 38 32 0d 01 5e 0d 53 54 41 20 26 |TA &282..^.STA &| 000001b0 46 45 30 37 0d 01 68 0b 4a 4d 50 20 72 65 74 0d |FE07..h.JMP ret.| 000001c0 01 72 09 2e 63 6f 6c 33 0d 01 7c 0b 53 54 41 20 |.r..col3..|.STA | 000001d0 26 37 34 0d 01 86 0b 4c 44 41 20 26 37 30 0d 01 |&74....LDA &70..| 000001e0 90 0c 53 54 41 26 46 45 30 38 0d 01 9a 0b 4c 44 |..STA&FE08....LD| 000001f0 41 20 26 37 31 0d 01 a4 0c 53 54 41 26 46 45 30 |A &71....STA&FE0| 00000200 39 0d 01 ae 0c 4c 44 41 20 23 31 36 30 0d 01 b8 |9....LDA #160...| 00000210 0c 53 54 41 20 26 32 38 32 0d 01 c2 0d 53 54 41 |.STA &282....STA| 00000220 20 26 46 45 30 37 0d 01 cc 0b 4a 4d 50 20 72 65 | &FE07....JMP re| 00000230 74 0d 01 d6 07 2e 67 6f 0d 01 e0 0b 4c 44 41 20 |t.....go....LDA | 00000240 23 31 39 0d 01 ea 0d 4a 53 52 20 26 46 46 46 34 |#19....JSR &FFF4| 00000250 0d 01 f4 0c 4c 44 41 20 23 26 46 46 0d 01 fe 0c |....LDA #&FF....| 00000260 53 54 41 20 26 32 39 42 0d 02 08 0c 53 54 41 20 |STA &29B....STA | 00000270 26 32 39 43 0d 02 12 0c 53 54 41 20 26 32 39 44 |&29C....STA &29D| 00000280 0d 02 1c 0c 53 54 41 20 26 32 39 45 0d 02 26 0c |....STA &29E..&.| 00000290 53 54 41 20 26 32 39 46 0d 02 30 14 4c 44 41 20 |STA &29F..0.LDA | 000002a0 23 30 20 3a 20 53 54 41 20 26 37 34 0d 02 3a 15 |#0 : STA &74..:.| 000002b0 4c 44 41 20 23 30 20 3a 20 53 54 41 20 26 32 32 |LDA #0 : STA &22| 000002c0 30 0d 02 44 15 4c 44 41 20 23 39 20 3a 20 53 54 |0..D.LDA #9 : ST| 000002d0 41 20 26 32 32 31 0d 02 4e 0b 4c 44 41 20 23 31 |A &221..N.LDA #1| 000002e0 34 0d 02 58 0a 4c 44 58 20 23 35 0d 02 62 0a 4c |4..X.LDX #5..b.L| 000002f0 44 59 20 23 30 0d 02 6c 0d 4a 53 52 20 26 46 46 |DY #0..l.JSR &FF| 00000300 46 34 0d 02 76 07 52 54 53 0d 02 80 05 5d 0d 02 |F4..v.RTS....]..| 00000310 8a 05 ed 0d 02 94 16 3f 26 37 32 3d 31 31 32 20 |.......?&72=112 | 00000320 3a 20 3f 26 37 33 3d 34 39 0d 02 9e 16 3f 26 37 |: ?&73=49....?&7| 00000330 30 3d 36 30 20 20 3a 20 3f 26 37 31 3d 32 33 0d |0=60 : ?&71=23.| 00000340 02 a8 08 d6 20 67 6f 0d 02 b2 07 eb 20 34 0d 02 |.... go..... 4..| 00000350 bc 13 ef 20 32 33 2c 31 2c 30 3b 30 3b 30 3b 30 |... 23,1,0;0;0;0| 00000360 3b 0d 02 c6 0b 3f 26 33 35 35 3d 34 0d 02 d0 0b |;....?&355=4....| 00000370 3f 26 33 36 31 3d 37 0d 02 da 0b 3f 26 33 36 30 |?&361=7....?&360| 00000380 3d 30 0d 02 e4 0b 3f 26 33 34 46 3d 38 0d 02 ee |=0....?&34F=8...| 00000390 13 ef 20 32 38 2c 30 2c 33 31 2c 33 39 2c 31 33 |.. 28,0,31,39,13| 000003a0 0d 02 f8 05 f5 0d 03 02 0b ec 20 30 2c 36 31 32 |.......... 0,612| 000003b0 0d 03 0c 0e ec 20 31 30 30 30 2c 37 30 30 0d 03 |..... 1000,700..| 000003c0 16 10 e3 20 46 25 3d 30 20 b8 20 34 38 30 0d 03 |... F%=0 . 480..| 000003d0 20 0b 3f 26 33 36 30 3d 33 0d 03 2a 0e e6 20 30 | .?&360=3..*.. 0| 000003e0 2c b3 28 34 29 2d 31 0d 03 34 1b f0 20 38 35 2c |,.(4)-1..4.. 85,| 000003f0 b3 28 31 32 37 38 29 2c b3 28 34 30 30 29 2b 36 |.(1278),.(400)+6| 00000400 31 32 0d 03 3e 0b 3f 26 33 36 30 3d 30 0d 03 48 |12..>.?&360=0..H| 00000410 1a f1 20 22 54 68 69 73 20 69 73 20 4d 6f 64 65 |.. "This is Mode| 00000420 20 34 2e 2e 2e 22 3b 0d 03 52 05 ed 0d 03 5c 07 | 4...";..R....\.| 00000430 fd 20 30 0d ff |. 0..| 00000435