home *** CD-ROM | disk | FTP | other *** search
Unknown | 1994-01-17 | 3.7 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
1%
| dexvert
| Alchemy Mindworks Resource (other/alchemyMindworksResource)
| ext
| Unsupported |
1%
| dexvert
| DAZ Pack game data archive (other/dazPackGameDataArchive)
| ext
| Unsupported |
1%
| dexvert
| Depth Dwellers Resource/game data (other/depthDwellersGameData)
| ext
| Unsupported |
1%
| dexvert
| Intelligent Games resource data (other/intelligentGamesResourceData)
| ext
| Unsupported |
1%
| dexvert
| The Software Toolworks resources archive (other/theSoftwareToolworksResourcesArchive)
| ext
| Unsupported |
1%
| dexvert
| T-Resource game data container (other/tResourceGameDataContainer)
| ext
| Unsupported |
1%
| dexvert
| AESOP engine Resource data (other/aesopEngineResourceData)
| ext
| Unsupported |
1%
| dexvert
| CINEMA 4D Layout (other/cinema4DLayout)
| ext
| Unsupported |
1%
| dexvert
| COL Format 256 Color palette (other/colFormatColorPalette)
| ext
| Unsupported |
1%
| dexvert
| Digimon Rumble Arena 2 game data archive (other/digimonRumbleArena2GameDataArchive)
| ext
| Unsupported |
1%
| dexvert
| Godot Resource data (other/godotResourceData)
| ext
| Unsupported |
1%
| dexvert
| M.A.X. game data archive (other/maxGameDataArchive)
| ext
| Unsupported |
1%
| dexvert
| Project IGI Resource data (other/projectIGIResourceData)
| ext
| Unsupported |
1%
| dexvert
| SCream Engine resource data (other/screamEngineResourceData)
| ext
| Unsupported |
100%
| file
| data
| default
| |
100%
| TrID
| MP3 audio
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| ff 00 dc ff 01 00 30 10 | 05 00 00 00 64 00 00 00 |......0.|....d...|
|00000010| 00 ff 01 dc ff 01 00 30 | 10 ef 0d 00 00 0f 5f 44 |.......0|......_D|
|00000020| 72 73 41 69 64 65 49 6e | 69 41 70 70 5f f5 04 2f |rsAideIn|iApp_../|
|00000030| 2a 20 53 6f 75 72 63 65 | 20 66 69 6c 65 3a 20 46 |* Source| file: F|
|00000040| 3a 5c 44 72 44 69 61 6c | 6f 67 5c 44 72 52 65 78 |:\DrDial|og\DrRex|
|00000050| 78 5c 44 72 73 41 69 64 | 65 2e 52 58 4c 20 2a 2f |x\DrsAid|e.RXL */|
|00000060| 0d 0a 2f 2a 20 46 69 6c | 65 20 6c 61 73 74 20 6d |../* Fil|e last m|
|00000070| 6f 64 69 66 69 65 64 20 | 6f 6e 3a 20 20 20 20 20 |odified |on: |
|00000080| 20 20 20 20 30 31 2f 30 | 36 2f 39 34 20 61 74 20 | 01/0|6/94 at |
|00000090| 30 35 3a 34 35 70 6d 20 | 2a 2f 0d 0a 2f 2a 20 50 |05:45pm |*/../* P|
|000000a0| 72 6f 63 65 64 75 72 65 | 20 61 64 64 65 64 20 74 |rocedure| added t|
|000000b0| 6f 20 6c 69 62 72 61 72 | 79 20 6f 6e 3a 20 30 31 |o librar|y on: 01|
|000000c0| 2f 30 36 2f 39 34 20 61 | 74 20 30 35 3a 34 36 70 |/06/94 a|t 05:46p|
|000000d0| 6d 20 2a 2f 0d 0a 2f 2a | 20 50 72 6f 63 65 64 75 |m */../*| Procedu|
|000000e0| 72 65 20 69 6d 70 6f 72 | 74 65 64 20 6f 6e 3a 20 |re impor|ted on: |
|000000f0| 20 20 20 20 20 20 20 20 | 30 31 2f 30 36 2f 39 34 | |01/06/94|
|00000100| 20 61 74 20 30 36 3a 34 | 37 70 6d 20 2a 2f 0d 0a | at 06:4|7pm */..|
|00000110| 0d 0a 50 52 4f 43 45 44 | 55 52 45 0d 0a 2f 2a 20 |..PROCED|URE../* |
|00000120| 55 73 61 67 65 20 69 73 | 3a 20 69 6e 69 41 70 70 |Usage is|: iniApp|
|00000130| 20 3d 20 5f 44 72 73 41 | 69 64 65 49 6e 69 41 70 | = _DrsA|ideIniAp|
|00000140| 70 5f 28 29 20 2a 2f 0d | 0a 2f 2a 20 52 65 74 75 |p_() */.|./* Retu|
|00000150| 72 6e 73 20 2e 49 4e 49 | 20 66 69 6c 65 20 61 70 |rns .INI| file ap|
|00000160| 70 6c 69 63 61 74 69 6f | 6e 20 6b 65 79 20 6f 66 |plicatio|n key of|
|00000170| 20 74 68 65 20 66 6f 72 | 6d 3a 20 66 69 6c 65 3a | the for|m: file:|
|00000180| 64 69 61 6c 6f 67 20 2a | 2f 0d 0a 20 20 20 50 41 |dialog *|/.. PA|
|00000190| 52 53 45 20 53 4f 55 52 | 43 45 20 2e 20 2e 20 69 |RSE SOUR|CE . . i|
|000001a0| 6e 69 41 70 70 0d 0a 20 | 20 20 63 6f 6c 20 3d 20 |niApp.. | col = |
|000001b0| 6c 61 73 74 70 6f 73 28 | 20 27 5c 27 2c 20 69 6e |lastpos(| '\', in|
|000001c0| 69 41 70 70 20 29 0d 0a | 20 20 20 49 46 20 63 6f |iApp )..| IF co|
|000001d0| 6c 20 3d 20 30 20 54 48 | 45 4e 20 63 6f 6c 20 3d |l = 0 TH|EN col =|
|000001e0| 20 6c 61 73 74 70 6f 73 | 28 20 27 3a 27 2c 20 69 | lastpos|( ':', i|
|000001f0| 6e 69 41 70 70 20 29 0d | 0a 20 20 20 69 6e 69 41 |niApp ).|. iniA|
|00000200| 70 70 20 3d 20 74 72 61 | 6e 73 6c 61 74 65 28 20 |pp = tra|nslate( |
|00000210| 73 75 62 73 74 72 28 20 | 69 6e 69 41 70 70 2c 20 |substr( |iniApp, |
|00000220| 63 6f 6c 20 2b 20 31 20 | 29 20 29 0d 0a 20 20 20 |col + 1 |) ).. |
|00000230| 63 6f 6c 20 20 20 20 3d | 20 6c 61 73 74 70 6f 73 |col =| lastpos|
|00000240| 28 20 27 2e 27 2c 20 69 | 6e 69 41 70 70 20 29 0d |( '.', i|niApp ).|
|00000250| 0a 20 20 20 49 46 20 63 | 6f 6c 20 3c 3e 20 30 20 |. IF c|ol <> 0 |
|00000260| 54 48 45 4e 20 69 6e 69 | 41 70 70 20 3d 20 6c 65 |THEN ini|App = le|
|00000270| 66 74 28 20 69 6e 69 41 | 70 70 2c 20 63 6f 6c 20 |ft( iniA|pp, col |
|00000280| 2d 20 31 20 29 0d 0a 20 | 20 20 52 45 54 55 52 4e |- 1 ).. | RETURN|
|00000290| 20 69 6e 69 41 70 70 27 | 3a 27 44 69 61 6c 6f 67 | iniApp'|:'Dialog|
|000002a0| 28 29 0d 0a 0d 5f 44 72 | 73 41 69 64 65 49 6e 69 |()..._Dr|sAideIni|
|000002b0| 74 5f e5 0a 2f 2a 20 53 | 6f 75 72 63 65 20 66 69 |t_../* S|ource fi|
|000002c0| 6c 65 3a 20 46 3a 5c 44 | 72 44 69 61 6c 6f 67 5c |le: F:\D|rDialog\|
|000002d0| 44 72 52 65 78 78 5c 44 | 72 73 41 69 64 65 2e 52 |DrRexx\D|rsAide.R|
|000002e0| 58 4c 20 2a 2f 0d 0a 2f | 2a 20 46 69 6c 65 20 6c |XL */../|* File l|
|000002f0| 61 73 74 20 6d 6f 64 69 | 66 69 65 64 20 6f 6e 3a |ast modi|fied on:|
|00000300| 20 20 20 20 20 20 20 20 | 20 30 31 2f 30 36 2f 39 | | 01/06/9|
|00000310| 34 20 61 74 20 30 35 3a | 34 35 70 6d 20 2a 2f 0d |4 at 05:|45pm */.|
|00000320| 0a 2f 2a 20 50 72 6f 63 | 65 64 75 72 65 20 61 64 |./* Proc|edure ad|
|00000330| 64 65 64 20 74 6f 20 6c | 69 62 72 61 72 79 20 6f |ded to l|ibrary o|
|00000340| 6e 3a 20 30 31 2f 30 36 | 2f 39 34 20 61 74 20 30 |n: 01/06|/94 at 0|
|00000350| 35 3a 34 36 70 6d 20 2a | 2f 0d 0a 2f 2a 20 50 72 |5:46pm *|/../* Pr|
|00000360| 6f 63 65 64 75 72 65 20 | 69 6d 70 6f 72 74 65 64 |ocedure |imported|
|00000370| 20 6f 6e 3a 20 20 20 20 | 20 20 20 20 20 30 31 2f | on: | 01/|
|00000380| 30 36 2f 39 34 20 61 74 | 20 30 36 3a 34 37 70 6d |06/94 at| 06:47pm|
|00000390| 20 2a 2f 0d 0a 0d 0a 50 | 52 4f 43 45 44 55 52 45 | */....P|ROCEDURE|
|000003a0| 0d 0a 2f 2a 20 55 73 61 | 67 65 3a 20 72 63 20 3d |../* Usa|ge: rc =|
|000003b0| 20 5f 44 72 73 41 69 64 | 65 49 6e 69 74 28 20 68 | _DrsAid|eInit( h|
|000003c0| 77 6e 64 2c 20 69 6e 69 | 46 69 6c 65 20 5b 2c 20 |wnd, ini|File [, |
|000003d0| 64 69 61 6c 6f 67 5d 20 | 5b 2c 20 62 69 74 6d 61 |dialog] |[, bitma|
|000003e0| 70 5d 20 29 20 2a 2f 0d | 0a 49 46 20 52 78 46 75 |p] ) */.|.IF RxFu|
|000003f0| 6e 63 51 75 65 72 79 28 | 20 27 53 79 73 4c 6f 61 |ncQuery(| 'SysLoa|
|00000400| 64 46 75 6e 63 73 27 20 | 29 20 54 48 45 4e 20 44 |dFuncs' |) THEN D|
|00000410| 4f 0d 0a 20 20 20 43 41 | 4c 4c 20 52 78 46 75 6e |O.. CA|LL RxFun|
|00000420| 63 41 64 64 20 27 53 79 | 73 4c 6f 61 64 46 75 6e |cAdd 'Sy|sLoadFun|
|00000430| 63 73 27 2c 20 27 52 65 | 78 78 55 74 69 6c 27 2c |cs', 'Re|xxUtil',|
|00000440| 20 27 53 79 73 4c 6f 61 | 64 46 75 6e 63 73 27 0d | 'SysLoa|dFuncs'.|
|00000450| 0a 20 20 20 43 41 4c 4c | 20 53 79 73 4c 6f 61 64 |. CALL| SysLoad|
|00000460| 46 75 6e 63 73 0d 0a 20 | 20 20 45 4e 44 0d 0a 50 |Funcs.. | END..P|
|00000470| 41 52 53 45 20 41 52 47 | 20 68 77 6e 64 2c 20 69 |ARSE ARG| hwnd, i|
|00000480| 6e 69 46 69 6c 65 2c 20 | 64 69 61 6c 6f 67 2c 20 |niFile, |dialog, |
|00000490| 62 69 74 6d 61 70 0d 0a | 49 46 20 68 77 6e 64 20 |bitmap..|IF hwnd |
|000004a0| 3d 20 27 2d 49 27 20 54 | 48 45 4e 20 44 4f 0d 0a |= '-I' T|HEN DO..|
|000004b0| 20 20 20 49 46 20 62 69 | 74 6d 61 70 20 3c 3e 20 | IF bi|tmap <> |
|000004c0| 27 27 20 54 48 45 4e 20 | 44 4f 0d 0a 20 20 20 20 |'' THEN |DO.. |
|000004d0| 20 20 61 70 70 73 20 3d | 20 53 79 73 49 6e 69 28 | apps =| SysIni(|
|000004e0| 20 69 6e 69 46 69 6c 65 | 2c 20 27 44 72 73 41 69 | iniFile|, 'DrsAi|
|000004f0| 64 65 27 2c 20 27 41 70 | 70 73 27 20 29 0d 0a 20 |de', 'Ap|ps' ).. |
|00000500| 20 20 20 20 20 49 46 20 | 61 70 70 73 20 3d 20 27 | IF |apps = '|
|00000510| 45 52 52 4f 52 3a 27 20 | 54 48 45 4e 20 61 70 70 |ERROR:' |THEN app|
|00000520| 73 20 3d 20 27 27 0d 0a | 20 20 20 20 20 20 50 41 |s = ''..| PA|
|00000530| 52 53 45 20 53 4f 55 52 | 43 45 20 2e 20 2e 20 72 |RSE SOUR|CE . . r|
|00000540| 65 73 46 69 6c 65 0d 0a | 20 20 20 20 20 20 63 6f |esFile..| co|
|00000550| 6c 20 3d 20 70 6f 73 28 | 20 27 20 27 72 65 73 46 |l = pos(| ' 'resF|
|00000560| 69 6c 65 27 28 27 2c 20 | 61 70 70 73 20 29 0d 0a |ile'(', |apps )..|
|00000570| 20 20 20 20 20 20 49 46 | 20 63 6f 6c 20 3c 3e 20 | IF| col <> |
|00000580| 30 20 54 48 45 4e 20 44 | 4f 0d 0a 20 20 20 20 20 |0 THEN D|O.. |
|00000590| 20 20 20 20 63 6f 6c 32 | 20 3d 20 70 6f 73 28 20 | col2| = pos( |
|000005a0| 27 29 27 2c 20 61 70 70 | 73 2c 20 63 6f 6c 20 2b |')', app|s, col +|
|000005b0| 20 6c 65 6e 67 74 68 28 | 20 72 65 73 46 69 6c 65 | length(| resFile|
|000005c0| 20 29 20 2b 20 32 20 29 | 0d 0a 20 20 20 20 20 20 | ) + 2 )|.. |
|000005d0| 20 20 20 61 70 70 73 20 | 3d 20 6c 65 66 74 28 20 | apps |= left( |
|000005e0| 61 70 70 73 2c 20 63 6f | 6c 20 2d 20 31 20 29 20 |apps, co|l - 1 ) |
|000005f0| 7c 7c 20 73 75 62 73 74 | 72 28 20 61 70 70 73 2c ||| subst|r( apps,|
|00000600| 20 63 6f 6c 32 20 2b 20 | 31 20 29 0d 0a 20 20 20 | col2 + |1 ).. |
|00000610| 20 20 20 20 20 20 45 4e | 44 0d 0a 20 20 20 20 20 | EN|D.. |
|00000620| 20 43 41 4c 4c 20 53 79 | 73 49 6e 69 20 69 6e 69 | CALL Sy|sIni ini|
|00000630| 46 69 6c 65 2c 20 27 44 | 72 73 41 69 64 65 27 2c |File, 'D|rsAide',|
|00000640| 20 27 41 70 70 73 27 2c | 20 61 70 70 73 2c 0d 0a | 'Apps',| apps,..|
|00000650| 20 20 20 20 20 20 20 20 | 20 20 20 74 72 61 6e 73 | | trans|
|00000660| 6c 61 74 65 28 20 72 65 | 73 46 69 6c 65 2c 20 27 |late( re|sFile, '|
|00000670| 30 31 27 58 2c 20 27 20 | 27 20 29 27 28 27 74 72 |01'X, ' |' )'('tr|
|00000680| 61 6e 73 6c 61 74 65 28 | 20 62 69 74 6d 61 70 2c |anslate(| bitmap,|
|00000690| 20 27 30 31 27 58 2c 20 | 27 20 27 20 29 27 29 27 | '01'X, |' ' )')'|
|000006a0| 0d 0a 20 20 20 20 20 20 | 43 41 4c 4c 20 52 78 4d |.. |CALL RxM|
|000006b0| 65 73 73 61 67 65 42 6f | 78 20 72 65 73 46 69 6c |essageBo|x resFil|
|000006c0| 65 20 27 61 64 64 65 64 | 20 74 6f 20 44 72 73 41 |e 'added| to DrsA|
|000006d0| 69 64 65 27 2c 20 27 44 | 72 73 41 69 64 65 27 2c |ide', 'D|rsAide',|
|000006e0| 20 27 4f 4b 27 2c 20 27 | 4e 4f 4e 45 27 0d 0a 20 | 'OK', '|NONE'.. |
|000006f0| 20 20 20 20 20 45 4e 44 | 0d 0a 20 20 20 45 4c 53 | END|.. ELS|
|00000700| 45 20 43 41 4c 4c 20 52 | 78 4d 65 73 73 61 67 65 |E CALL R|xMessage|
|00000710| 42 6f 78 20 72 65 73 46 | 69 6c 65 20 27 68 61 73 |Box resF|ile 'has|
|00000720| 20 6e 6f 20 62 69 74 6d | 61 70 27 2c 20 27 44 72 | no bitm|ap', 'Dr|
|00000730| 73 41 69 64 65 27 2c 20 | 27 43 41 4e 43 45 4c 27 |sAide', |'CANCEL'|
|00000740| 2c 20 27 4e 4f 4e 45 27 | 0d 0a 20 20 20 45 58 49 |, 'NONE'|.. EXI|
|00000750| 54 0d 0a 20 20 20 45 4e | 44 0d 0a 49 46 20 6c 65 |T.. EN|D..IF le|
|00000760| 66 74 28 20 68 77 6e 64 | 2c 20 32 20 29 20 3c 3e |ft( hwnd|, 2 ) <>|
|00000770| 20 27 2d 48 27 20 54 48 | 45 4e 20 52 45 54 55 52 | '-H' TH|EN RETUR|
|00000780| 4e 20 30 0d 0a 43 41 4c | 4c 20 44 72 44 69 61 6c |N 0..CAL|L DrDial|
|00000790| 6f 67 20 27 49 6e 69 74 | 27 2c 20 68 77 6e 64 0d |og 'Init|', hwnd.|
|000007a0| 0a 49 46 20 64 69 61 6c | 6f 67 20 3d 20 27 27 20 |.IF dial|og = '' |
|000007b0| 54 48 45 4e 20 44 4f 0d | 0a 20 20 20 43 41 4c 4c |THEN DO.|. CALL|
|000007c0| 20 44 69 61 6c 6f 67 73 | 0d 0a 20 20 20 64 69 61 | Dialogs|.. dia|
|000007d0| 6c 6f 67 20 3d 20 64 69 | 61 6c 6f 67 73 2e 31 0d |log = di|alogs.1.|
|000007e0| 0a 20 20 20 44 52 4f 50 | 20 64 69 61 6c 6f 67 73 |. DROP| dialogs|
|000007f0| 0d 0a 20 20 20 45 4e 44 | 0d 0a 43 41 4c 4c 20 4f |.. END|..CALL O|
|00000800| 70 65 6e 46 6f 72 20 64 | 69 61 6c 6f 67 0d 0a 52 |penFor d|ialog..R|
|00000810| 45 54 55 52 4e 20 31 0d | 0a 13 5f 44 72 73 41 69 |ETURN 1.|.._DrsAi|
|00000820| 64 65 44 69 61 6c 6f 67 | 49 6e 69 74 5f fd 04 2f |deDialog|Init_../|
|00000830| 2a 20 53 6f 75 72 63 65 | 20 66 69 6c 65 3a 20 46 |* Source| file: F|
|00000840| 3a 5c 44 72 44 69 61 6c | 6f 67 5c 44 72 52 65 78 |:\DrDial|og\DrRex|
|00000850| 78 5c 44 72 73 41 69 64 | 65 2e 52 58 4c 20 2a 2f |x\DrsAid|e.RXL */|
|00000860| 0d 0a 2f 2a 20 46 69 6c | 65 20 6c 61 73 74 20 6d |../* Fil|e last m|
|00000870| 6f 64 69 66 69 65 64 20 | 6f 6e 3a 20 20 20 20 20 |odified |on: |
|00000880| 20 20 20 20 30 31 2f 30 | 36 2f 39 34 20 61 74 20 | 01/0|6/94 at |
|00000890| 30 35 3a 34 35 70 6d 20 | 2a 2f 0d 0a 2f 2a 20 50 |05:45pm |*/../* P|
|000008a0| 72 6f 63 65 64 75 72 65 | 20 61 64 64 65 64 20 74 |rocedure| added t|
|000008b0| 6f 20 6c 69 62 72 61 72 | 79 20 6f 6e 3a 20 30 31 |o librar|y on: 01|
|000008c0| 2f 30 36 2f 39 34 20 61 | 74 20 30 35 3a 34 36 70 |/06/94 a|t 05:46p|
|000008d0| 6d 20 2a 2f 0d 0a 2f 2a | 20 50 72 6f 63 65 64 75 |m */../*| Procedu|
|000008e0| 72 65 20 69 6d 70 6f 72 | 74 65 64 20 6f 6e 3a 20 |re impor|ted on: |
|000008f0| 20 20 20 20 20 20 20 20 | 30 31 2f 30 36 2f 39 34 | |01/06/94|
|00000900| 20 61 74 20 30 36 3a 34 | 37 70 6d 20 2a 2f 0d 0a | at 06:4|7pm */..|
|00000910| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 45 58 50 4f |..PROCED|URE EXPO|
|00000920| 53 45 20 78 2e 20 79 2e | 20 64 78 2e 20 64 79 2e |SE x. y.| dx. dy.|
|00000930| 0d 0a 2f 2a 20 55 73 61 | 67 65 20 69 73 3a 20 43 |../* Usa|ge is: C|
|00000940| 41 4c 4c 20 5f 44 72 73 | 41 69 64 65 44 69 61 6c |ALL _Drs|AideDial|
|00000950| 6f 67 49 6e 69 74 20 68 | 77 6e 64 2c 20 69 6e 69 |ogInit h|wnd, ini|
|00000960| 46 69 6c 65 20 2a 2f 0d | 0a 50 41 52 53 45 20 41 |File */.|.PARSE A|
|00000970| 52 47 20 68 77 6e 64 2c | 20 69 6e 69 46 69 6c 65 |RG hwnd,| iniFile|
|00000980| 0d 0a 49 46 20 6c 65 66 | 74 28 20 68 77 6e 64 2c |..IF lef|t( hwnd,|
|00000990| 20 32 20 29 20 3d 20 27 | 2d 48 27 20 54 48 45 4e | 2 ) = '|-H' THEN|
|000009a0| 20 44 4f 0d 0a 20 20 20 | 64 69 61 6c 6f 67 20 3d | DO.. |dialog =|
|000009b0| 20 44 69 61 6c 6f 67 28 | 29 0d 0a 20 20 20 43 41 | Dialog(|).. CA|
|000009c0| 4c 4c 20 44 72 44 69 61 | 6c 6f 67 20 27 4f 77 6e |LL DrDia|log 'Own|
|000009d0| 65 72 27 2c 20 64 69 61 | 6c 6f 67 0d 0a 20 20 20 |er', dia|log.. |
|000009e0| 50 41 52 53 45 20 56 41 | 4c 55 45 20 53 79 73 49 |PARSE VA|LUE SysI|
|000009f0| 6e 69 28 20 69 6e 69 46 | 69 6c 65 2c 20 5f 44 72 |ni( iniF|ile, _Dr|
|00000a00| 73 41 69 64 65 49 6e 69 | 41 70 70 5f 28 29 2c 20 |sAideIni|App_(), |
|00000a10| 27 50 6f 73 27 20 29 20 | 57 49 54 48 20 78 2e 64 |'Pos' ) |WITH x.d|
|00000a20| 69 61 6c 6f 67 20 79 2e | 64 69 61 6c 6f 67 20 64 |ialog y.|dialog d|
|00000a30| 78 2e 64 69 61 6c 6f 67 | 20 64 79 2e 64 69 61 6c |x.dialog| dy.dial|
|00000a40| 6f 67 0d 0a 20 20 20 49 | 46 20 78 2e 64 69 61 6c |og.. I|F x.dial|
|00000a50| 6f 67 20 3c 3e 20 27 45 | 52 52 4f 52 3a 27 20 54 |og <> 'E|RROR:' T|
|00000a60| 48 45 4e 20 43 41 4c 4c | 20 50 6f 73 69 74 69 6f |HEN CALL| Positio|
|00000a70| 6e 20 78 2e 64 69 61 6c | 6f 67 20 79 2e 64 69 61 |n x.dial|og y.dia|
|00000a80| 6c 6f 67 20 64 78 2e 64 | 69 61 6c 6f 67 20 64 79 |log dx.d|ialog dy|
|00000a90| 2e 64 69 61 6c 6f 67 0d | 0a 20 20 20 45 4e 44 0d |.dialog.|. END.|
|00000aa0| 0a 43 41 4c 4c 20 53 68 | 6f 77 0d 0a 13 5f 44 72 |.CALL Sh|ow..._Dr|
|00000ab0| 73 41 69 64 65 44 69 61 | 6c 6f 67 45 78 69 74 5f |sAideDia|logExit_|
|00000ac0| 84 05 2f 2a 20 53 6f 75 | 72 63 65 20 66 69 6c 65 |../* Sou|rce file|
|00000ad0| 3a 20 46 3a 5c 44 72 44 | 69 61 6c 6f 67 5c 44 72 |: F:\DrD|ialog\Dr|
|00000ae0| 52 65 78 78 5c 44 72 73 | 41 69 64 65 2e 52 58 4c |Rexx\Drs|Aide.RXL|
|00000af0| 20 2a 2f 0d 0a 2f 2a 20 | 46 69 6c 65 20 6c 61 73 | */../* |File las|
|00000b00| 74 20 6d 6f 64 69 66 69 | 65 64 20 6f 6e 3a 20 20 |t modifi|ed on: |
|00000b10| 20 20 20 20 20 20 20 30 | 31 2f 30 36 2f 39 34 20 | 0|1/06/94 |
|00000b20| 61 74 20 30 35 3a 34 35 | 70 6d 20 2a 2f 0d 0a 2f |at 05:45|pm */../|
|00000b30| 2a 20 50 72 6f 63 65 64 | 75 72 65 20 61 64 64 65 |* Proced|ure adde|
|00000b40| 64 20 74 6f 20 6c 69 62 | 72 61 72 79 20 6f 6e 3a |d to lib|rary on:|
|00000b50| 20 30 31 2f 30 36 2f 39 | 34 20 61 74 20 30 35 3a | 01/06/9|4 at 05:|
|00000b60| 34 36 70 6d 20 2a 2f 0d | 0a 2f 2a 20 50 72 6f 63 |46pm */.|./* Proc|
|00000b70| 65 64 75 72 65 20 69 6d | 70 6f 72 74 65 64 20 6f |edure im|ported o|
|00000b80| 6e 3a 20 20 20 20 20 20 | 20 20 20 30 31 2f 30 36 |n: | 01/06|
|00000b90| 2f 39 34 20 61 74 20 30 | 36 3a 34 37 70 6d 20 2a |/94 at 0|6:47pm *|
|00000ba0| 2f 0d 0a 0d 0a 50 52 4f | 43 45 44 55 52 45 20 45 |/....PRO|CEDURE E|
|00000bb0| 58 50 4f 53 45 20 78 2e | 20 79 2e 20 64 78 2e 20 |XPOSE x.| y. dx. |
|00000bc0| 64 79 2e 0d 0a 2f 2a 20 | 55 73 61 67 65 20 69 6e |dy.../* |Usage in|
|00000bd0| 3a 20 43 41 4c 4c 20 5f | 44 72 73 41 69 64 65 44 |: CALL _|DrsAideD|
|00000be0| 69 61 6c 6f 67 45 78 69 | 74 5f 20 68 77 6e 64 2c |ialogExi|t_ hwnd,|
|00000bf0| 20 69 6e 69 46 69 6c 65 | 20 2a 2f 0d 0a 50 41 52 | iniFile| */..PAR|
|00000c00| 53 45 20 41 52 47 20 68 | 77 6e 64 2c 20 69 6e 69 |SE ARG h|wnd, ini|
|00000c10| 46 69 6c 65 0d 0a 49 46 | 20 6c 65 66 74 28 20 68 |File..IF| left( h|
|00000c20| 77 6e 64 2c 20 32 20 29 | 20 3d 20 27 2d 48 27 20 |wnd, 2 )| = '-H' |
|00000c30| 54 48 45 4e 20 44 4f 0d | 0a 20 20 20 50 41 52 53 |THEN DO.|. PARS|
|00000c40| 45 20 56 41 4c 55 45 20 | 50 6f 73 69 74 69 6f 6e |E VALUE |Position|
|00000c50| 28 29 20 57 49 54 48 20 | 6e 65 77 58 20 6e 65 77 |() WITH |newX new|
|00000c60| 59 20 6e 65 77 44 58 20 | 6e 65 77 44 59 0d 0a 20 |Y newDX |newDY.. |
|00000c70| 20 20 64 69 61 6c 6f 67 | 20 3d 20 44 69 61 6c 6f | dialog| = Dialo|
|00000c80| 67 28 29 0d 0a 20 20 20 | 49 46 20 28 6e 65 77 78 |g().. |IF (newx|
|00000c90| 20 20 3c 3e 20 78 2e 64 | 69 61 6c 6f 67 29 20 20 | <> x.d|ialog) |
|00000ca0| 7c 20 28 6e 65 77 59 20 | 20 3c 3e 20 79 2e 64 69 || (newY | <> y.di|
|00000cb0| 61 6c 6f 67 29 20 7c 2c | 0d 0a 20 20 20 20 20 20 |alog) |,|.. |
|00000cc0| 28 6e 65 77 44 58 20 3c | 3e 20 64 78 2e 64 69 61 |(newDX <|> dx.dia|
|00000cd0| 6c 6f 67 29 20 7c 20 28 | 6e 65 77 44 59 20 3c 3e |log) | (|newDY <>|
|00000ce0| 20 64 79 2e 64 69 61 6c | 6f 67 29 20 54 48 45 4e | dy.dial|og) THEN|
|00000cf0| 0d 0a 20 20 20 20 20 20 | 43 41 4c 4c 20 53 79 73 |.. |CALL Sys|
|00000d00| 49 6e 69 20 69 6e 69 46 | 69 6c 65 2c 20 5f 44 72 |Ini iniF|ile, _Dr|
|00000d10| 73 41 69 64 65 49 6e 69 | 41 70 70 5f 28 29 2c 20 |sAideIni|App_(), |
|00000d20| 27 50 6f 73 27 2c 20 6e | 65 77 58 20 6e 65 77 59 |'Pos', n|ewX newY|
|00000d30| 20 6e 65 77 44 58 20 6e | 65 77 44 59 0d 0a 20 20 | newDX n|ewDY.. |
|00000d40| 20 45 4e 44 0d 0a 04 49 | 6e 69 74 be 01 2f 2a 20 | END...I|nit../* |
|00000d50| 28 63 29 20 43 6f 70 79 | 72 69 67 68 74 20 49 6e |(c) Copy|right In|
|00000d60| 74 65 72 6e 61 74 69 6f | 6e 61 6c 20 42 75 73 69 |ternatio|nal Busi|
|00000d70| 6e 65 73 73 20 4d 61 63 | 68 69 6e 65 73 20 43 6f |ness Mac|hines Co|
|00000d80| 72 70 6f 72 61 74 69 6f | 6e 20 31 39 39 33 20 2a |rporatio|n 1993 *|
|00000d90| 2f 0d 0a 2f 2a 20 41 6c | 6c 20 72 69 67 68 74 73 |/../* Al|l rights|
|00000da0| 20 72 65 73 65 72 76 65 | 64 20 2a 2f 0d 0a 0d 0a | reserve|d */....|
|00000db0| 50 41 52 53 45 20 41 52 | 47 20 68 77 6e 64 20 69 |PARSE AR|G hwnd i|
|00000dc0| 6e 69 46 69 6c 65 20 72 | 65 73 74 0d 0a 49 46 20 |niFile r|est..IF |
|00000dd0| 5f 44 72 73 41 69 64 65 | 49 6e 69 74 5f 28 20 68 |_DrsAide|Init_( h|
|00000de0| 77 6e 64 2c 20 69 6e 69 | 46 69 6c 65 2c 2c 20 27 |wnd, ini|File,, '|
|00000df0| 42 49 54 4d 41 50 3a 23 | 31 32 27 20 29 20 3d 20 |BITMAP:#|12' ) = |
|00000e00| 30 20 54 48 45 4e 20 45 | 58 49 54 ff ff 04 00 ff |0 THEN E|XIT.....|
|00000e10| 64 00 30 10 46 00 00 00 | 46 00 00 00 b5 01 0e 00 |d.0.F...|F.......|
|00000e20| 01 00 ff ff 00 00 00 00 | 00 00 00 00 00 00 15 00 |........|........|
|00000e30| 2c 00 80 00 00 16 a5 00 | 60 00 a7 00 5a 00 64 00 |,.......|`...Z.d.|
|00000e40| ff ff 42 00 44 72 73 41 | 69 64 65 20 54 6f 6f 6c |..B.DrsA|ide Tool|
|00000e50| 20 54 65 6d 70 6c 61 74 | 65 00 03 10 00 00 ff 04 | Templat|e.......|
|00000e60| dc ff 64 00 30 10 5c 00 | 00 00 80 64 00 04 45 78 |..d.0.\.|...d..Ex|
|00000e70| 69 74 26 43 41 4c 4c 20 | 5f 44 72 73 41 69 64 65 |it&CALL |_DrsAide|
|00000e80| 44 69 61 6c 6f 67 45 78 | 69 74 5f 20 68 77 6e 64 |DialogEx|it_ hwnd|
|00000e90| 2c 20 69 6e 69 46 69 6c | 65 04 49 6e 69 74 26 43 |, iniFil|e.Init&C|
|00000ea0| 41 4c 4c 20 5f 44 72 73 | 41 69 64 65 44 69 61 6c |ALL _Drs|AideDial|
|00000eb0| 6f 67 49 6e 69 74 5f 20 | 68 77 6e 64 2c 20 69 6e |ogInit_ |hwnd, in|
|00000ec0| 69 46 69 6c 65 ff | |iFile. | |
+--------+-------------------------+-------------------------+--------+--------+