Home » Archimedes archive » Acorn Computing » 1994 05 subscription disc.adf » 9405s » Miscellany/Eff/!Harmonica/o/main

Miscellany/Eff/!Harmonica/o/main

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 » Archimedes archive » Acorn Computing » 1994 05 subscription disc.adf » 9405s
Filename: Miscellany/Eff/!Harmonica/o/main
Read OK:
File size: 0674 bytes
Load address: 0000
Exec address: 0000
File contents
����OBJ_HEAD4@OBJ_AREA\�OBJ_IDFN�0OBJ_SYMT�OBJ_STRT�p�����Q�
Q��
Q�����������P����open_win�
����-��L�
]��$�M�
�������
����[�create_win�
����-��L�
]��@���P���[	����P����[�init�
����-��L�
]���������������0�������0��@��� �����h���Harmonicamainmain�
����-��L�
]����XA����������P��
���[��
p
d
H( 
���
�
�xl
H
,Norcroft RISC OS ARM C vsn 4.00 [May  3 1991]'.8BGP\ds�\�����������",6@[�`nC$$codeC$$dataC$$zidataC$$debug__mainx$codesegx$datasegquitwin_mainredraw_mainhandlerwimp_open_windwimp_close_windopen_winx$stack_overflowwimp_get_wind_statecreate_wintemplate_syshandlewimp_create_windwimpt_complaininitwimpt_initres_initresspr_inittemplate_initdbox_initflex_initheap_initwin_register_event_handlermainevent_process���Ŗ"�
00000000  c5 c6 cb c3 05 00 00 00  05 00 00 00 4f 42 4a 5f  |............OBJ_|
00000010  48 45 41 44 34 06 00 00  40 00 00 00 4f 42 4a 5f  |HEAD4...@...OBJ_|
00000020  41 52 45 41 5c 00 00 00  88 02 00 00 4f 42 4a 5f  |AREA\.......OBJ_|
00000030  49 44 46 4e e4 02 00 00  30 00 00 00 4f 42 4a 5f  |IDFN....0...OBJ_|
00000040  53 59 4d 54 14 03 00 00  b0 01 00 00 4f 42 4a 5f  |SYMT........OBJ_|
00000050  53 54 52 54 c4 04 00 00  70 01 00 00 00 00 00 ea  |STRT....p.......|
00000060  0e f0 b0 e1 00 10 90 e5  01 00 51 e3 06 00 00 0a  |..........Q.....|
00000070  02 00 51 e3 04 00 80 02  00 00 00 0a 03 00 51 e3  |..Q...........Q.|
00000080  0e f0 b0 11 04 00 90 e5  00 00 00 ea 04 00 90 e5  |................|
00000090  0c 10 9f e5 04 10 91 e5  01 00 50 e1 0e f0 b0 11  |..........P.....|
000000a0  ee ff ff ea 00 00 00 00  6f 70 65 6e 5f 77 69 6e  |........open_win|
000000b0  00 00 00 00 0c 00 00 ff  0d c0 a0 e1 01 d8 2d e9  |..............-.|
000000c0  04 b0 4c e2 0a 00 5d e1  00 00 00 bb 24 d0 4d e2  |..L...].....$.M.|
000000d0  0d 10 a0 e1 00 00 00 eb  00 00 e0 e3 1c 00 8d e5  |................|
000000e0  0d 00 a0 e1 00 00 00 eb  00 a8 5b e9 63 72 65 61  |..........[.crea|
000000f0  74 65 5f 77 69 6e 00 00  0c 00 00 ff 0d c0 a0 e1  |te_win..........|
00000100  13 d8 2d e9 04 b0 4c e2  0a 00 5d e1 00 00 00 bb  |..-...L...].....|
00000110  01 40 a0 e1 00 00 00 eb  00 00 50 e3 00 00 a0 03  |.@........P.....|
00000120  10 a8 5b 09 04 10 a0 e1  00 00 00 eb 00 00 00 eb  |..[.............|
00000130  00 00 50 e3 00 00 a0 13  01 00 a0 03 10 a8 5b e9  |..P...........[.|
00000140  69 6e 69 74 00 00 00 00  08 00 00 ff 0d c0 a0 e1  |init............|
00000150  10 d8 2d e9 04 b0 4c e2  0a 00 5d e1 00 00 00 bb  |..-...L...].....|
00000160  13 0f 8f e2 00 00 00 eb  11 0f 8f e2 00 00 00 eb  |................|
00000170  00 00 00 eb 00 00 00 eb  00 00 00 eb 00 00 00 eb  |................|
00000180  01 00 a0 e3 00 00 00 eb  30 10 9f e5 0c 0f 8f e2  |........0.......|
00000190  d9 ff ff eb 30 10 9f e5  fc 40 1f e5 04 00 94 e5  |....0....@......|
000001a0  00 20 a0 e3 00 00 00 eb  04 00 94 e5 10 68 1b e9  |. ...........h..|
000001b0  c0 ff ff ea 48 61 72 6d  6f 6e 69 63 61 00 00 00  |....Harmonica...|
000001c0  00 00 00 00 6d 61 69 6e  00 00 00 00 00 00 00 00  |....main........|
000001d0  6d 61 69 6e 00 00 00 00  08 00 00 ff 0d c0 a0 e1  |main............|
000001e0  13 d8 2d e9 04 b0 4c e2  0a 00 5d e1 00 00 00 bb  |..-...L...].....|
000001f0  00 00 a0 e3 58 41 1f e5  00 00 84 e5 d2 ff ff eb  |....XA..........|
00000200  00 00 00 ea 00 00 00 eb  00 00 94 e5 00 00 50 e3  |..............P.|
00000210  fb ff ff 0a 00 00 a0 e3  10 a8 5b e9 a8 01 00 00  |..........[.....|
00000220  1a 00 06 00 90 01 00 00  0a 00 06 00 70 01 00 00  |............p...|
00000230  06 00 0a 00 64 01 00 00  04 00 0a 00 48 01 00 00  |....d.......H...|
00000240  18 00 06 00 28 01 00 00  17 00 06 00 20 01 00 00  |....(....... ...|
00000250  16 00 06 00 1c 01 00 00  15 00 06 00 18 01 00 00  |................|
00000260  14 00 06 00 14 01 00 00  13 00 06 00 10 01 00 00  |................|
00000270  12 00 06 00 08 01 00 00  11 00 06 00 00 01 00 00  |................|
00000280  0a 00 06 00 d0 00 00 00  0f 00 06 00 cc 00 00 00  |................|
00000290  0e 00 06 00 b8 00 00 00  0d 00 06 00 b0 00 00 00  |................|
000002a0  0a 00 06 00 88 00 00 00  07 00 06 00 78 00 00 00  |............x...|
000002b0  0b 00 06 00 6c 00 00 00  0a 00 06 00 48 00 00 00  |....l.......H...|
000002c0  02 00 0a 00 2c 00 00 00  08 00 06 00 1c 00 00 00  |....,...........|
000002d0  07 00 06 00 00 00 00 00  00 00 06 00 00 00 00 00  |................|
000002e0  00 00 00 00 4e 6f 72 63  72 6f 66 74 20 52 49 53  |....Norcroft RIS|
000002f0  43 20 4f 53 20 41 52 4d  20 43 20 76 73 6e 20 34  |C OS ARM C vsn 4|
00000300  2e 30 30 20 5b 4d 61 79  20 20 33 20 31 39 39 31  |.00 [May  3 1991|
00000310  5d 00 00 00 27 00 00 00  02 00 00 00 00 00 00 00  |]...'...........|
00000320  00 00 00 00 2e 00 00 00  01 00 00 00 00 00 00 00  |................|
00000330  04 00 00 00 38 00 00 00  01 00 00 00 00 00 00 00  |....8...........|
00000340  0c 00 00 00 42 00 00 00  03 00 00 00 00 00 00 00  |....B...........|
00000350  0c 00 00 00 47 00 00 00  03 00 00 00 04 00 00 00  |....G...........|
00000360  0c 00 00 00 50 00 00 00  03 00 00 00 04 00 00 00  |....P...........|
00000370  04 00 00 00 5c 00 00 00  03 00 00 00 08 00 00 00  |....\...........|
00000380  04 00 00 00 64 00 00 00  02 00 00 00 00 00 00 00  |....d...........|
00000390  00 00 00 00 73 00 00 00  02 00 00 00 00 00 00 00  |....s...........|
000003a0  00 00 00 00 83 00 00 00  03 00 00 00 5c 00 00 00  |............\...|
000003b0  04 00 00 00 8c 00 00 00  02 00 00 00 00 00 00 00  |................|
000003c0  00 00 00 00 9d 00 00 00  02 00 00 00 00 00 00 00  |................|
000003d0  00 00 00 00 b1 00 00 00  03 00 00 00 a0 00 00 00  |................|
000003e0  04 00 00 00 bc 00 00 00  02 00 00 00 00 00 00 00  |................|
000003f0  00 00 00 00 cf 00 00 00  02 00 00 00 00 00 00 00  |................|
00000400  00 00 00 00 e0 00 00 00  02 00 00 00 00 00 00 00  |................|
00000410  00 00 00 00 ef 00 00 00  03 00 00 00 f0 00 00 00  |................|
00000420  04 00 00 00 f4 00 00 00  02 00 00 00 00 00 00 00  |................|
00000430  00 00 00 00 ff 00 00 00  02 00 00 00 00 00 00 00  |................|
00000440  00 00 00 00 08 01 00 00  02 00 00 00 00 00 00 00  |................|
00000450  00 00 00 00 14 01 00 00  02 00 00 00 00 00 00 00  |................|
00000460  00 00 00 00 22 01 00 00  02 00 00 00 00 00 00 00  |...."...........|
00000470  00 00 00 00 2c 01 00 00  02 00 00 00 00 00 00 00  |....,...........|
00000480  00 00 00 00 36 01 00 00  02 00 00 00 00 00 00 00  |....6...........|
00000490  00 00 00 00 40 01 00 00  02 00 00 00 00 00 00 00  |....@...........|
000004a0  00 00 00 00 5b 01 00 00  03 00 00 00 80 01 00 00  |....[...........|
000004b0  04 00 00 00 60 01 00 00  02 00 00 00 00 00 00 00  |....`...........|
000004c0  00 00 00 00 6e 01 00 00  43 24 24 63 6f 64 65 00  |....n...C$$code.|
000004d0  43 24 24 64 61 74 61 00  43 24 24 7a 69 64 61 74  |C$$data.C$$zidat|
000004e0  61 00 43 24 24 64 65 62  75 67 00 5f 5f 6d 61 69  |a.C$$debug.__mai|
000004f0  6e 00 78 24 63 6f 64 65  73 65 67 00 78 24 64 61  |n.x$codeseg.x$da|
00000500  74 61 73 65 67 00 71 75  69 74 00 77 69 6e 5f 6d  |taseg.quit.win_m|
00000510  61 69 6e 00 72 65 64 72  61 77 5f 6d 61 69 6e 00  |ain.redraw_main.|
00000520  68 61 6e 64 6c 65 72 00  77 69 6d 70 5f 6f 70 65  |handler.wimp_ope|
00000530  6e 5f 77 69 6e 64 00 77  69 6d 70 5f 63 6c 6f 73  |n_wind.wimp_clos|
00000540  65 5f 77 69 6e 64 00 6f  70 65 6e 5f 77 69 6e 00  |e_wind.open_win.|
00000550  78 24 73 74 61 63 6b 5f  6f 76 65 72 66 6c 6f 77  |x$stack_overflow|
00000560  00 77 69 6d 70 5f 67 65  74 5f 77 69 6e 64 5f 73  |.wimp_get_wind_s|
00000570  74 61 74 65 00 63 72 65  61 74 65 5f 77 69 6e 00  |tate.create_win.|
00000580  74 65 6d 70 6c 61 74 65  5f 73 79 73 68 61 6e 64  |template_syshand|
00000590  6c 65 00 77 69 6d 70 5f  63 72 65 61 74 65 5f 77  |le.wimp_create_w|
000005a0  69 6e 64 00 77 69 6d 70  74 5f 63 6f 6d 70 6c 61  |ind.wimpt_compla|
000005b0  69 6e 00 69 6e 69 74 00  77 69 6d 70 74 5f 69 6e  |in.init.wimpt_in|
000005c0  69 74 00 72 65 73 5f 69  6e 69 74 00 72 65 73 73  |it.res_init.ress|
000005d0  70 72 5f 69 6e 69 74 00  74 65 6d 70 6c 61 74 65  |pr_init.template|
000005e0  5f 69 6e 69 74 00 64 62  6f 78 5f 69 6e 69 74 00  |_init.dbox_init.|
000005f0  66 6c 65 78 5f 69 6e 69  74 00 68 65 61 70 5f 69  |flex_init.heap_i|
00000600  6e 69 74 00 77 69 6e 5f  72 65 67 69 73 74 65 72  |nit.win_register|
00000610  5f 65 76 65 6e 74 5f 68  61 6e 64 6c 65 72 00 6d  |_event_handler.m|
00000620  61 69 6e 00 65 76 65 6e  74 5f 70 72 6f 63 65 73  |ain.event_proces|
00000630  73 00 00 00 80 d0 e2 c5  96 00 00 00 02 00 00 00  |s...............|
00000640  1b 00 00 00 00 00 00 00  00 00 00 00 04 00 00 00  |................|
00000650  02 22 00 00 c0 01 00 00  18 00 00 00 00 00 00 00  |."..............|
00000660  0c 00 00 00 02 00 00 00  08 00 00 00 00 00 00 00  |................|
00000670  00 00 00 00                                       |....|
00000674