ramidavis Posted November 11, 2017 Share Posted November 11, 2017 (edited) How to enjoy this program: [bARF program attached. Remove the .bin ending, its a tifile from classic99] 1. Grab a beer 2. Open classic99 and paste the following program 3. If you want a endless loop, change line 7 to 7 RESTORE, otherwise the program will (eventually) end. 4. Run it 5. Enjoy your beer Character data was generated by (ab)using random.org. 1 REM CHANGE LINE 7 TO "7 RESTORE" FOR ENDLESS LOOP 2 CALL CLEAR 3 FOR X=1 TO 400 4 READ Y$ 5 CALL CHAR(32,Y$) 6 NEXT X 7 END 8 GOTO 3 9 DATA 900B5637FC7CE907 10 DATA 9958769CAF64C3C5 11 DATA 4A29C1A661954EB2 12 DATA 948F472EEF99CF3C 13 DATA C8157787FEFEE3CA 14 DATA 38178D223A9FD74D 15 DATA D058857CD7264BF1 16 DATA CE2908B125DD4C3B 17 DATA 04F078CD42DE4950 18 DATA F084E799A9D66F6F 19 DATA E919ADFF0171D37E 20 DATA 6205FADD87459CFB 21 DATA AE1F3BA7322666D9 22 DATA 13E59FE7E268CAA3 23 DATA 938A83DE5B30A5D7 24 DATA E6F2C4AD1ADEBB4D 25 DATA 5D85743C65AF22B4 26 DATA 3C6DEB01F21857AD 27 DATA BFE6E49F7338C27F 28 DATA 69CF73055FD12949 29 DATA E53E626AE3A55BF9 30 DATA B64E34A39D20689B 31 DATA DC5A9A165C23C82F 32 DATA AED90496474BAF3A 33 DATA FD69929FEE64C4C4 34 DATA 4D484D25EDD6E4A3 35 DATA 245EE476A5735762 36 DATA F52568CAF1CA1472 37 DATA 56EB5D9ED3ECCA1A 38 DATA 6D9BBF9D5816DA49 39 DATA C53A9CB4EE868B0D 40 DATA 8C100B325CBCCBF5 41 DATA AF4380C20E1AD502 42 DATA D7C37A890723D63C 43 DATA 88C5EA86C89E118E 44 DATA 7304B8138BE80F49 45 DATA 6C862A096BE38F74 46 DATA 60E15AE3D987E675 47 DATA 7FEEED307A01CBD6 48 DATA 523E984880121F2F 49 DATA F488628F8C433289 50 DATA 786CB8C074BA5B05 51 DATA 1A18A6F6EE7ECA35 52 DATA F849AD32B958D291 53 DATA CC0DF03B2A93531B 54 DATA F26117D597595963 55 DATA 45B861499130BC6D 56 DATA 4FE975257DABB97F 57 DATA 0E0132B6C20808EA 58 DATA 8CE0AE7ED2E6AFE3 59 DATA 1E8C627B1FE99802 60 DATA 26055216CB9FF73D 61 DATA 4FBEC504FF1852FC 62 DATA 029EAB42FB5616E3 63 DATA 579F484BD9266C14 64 DATA 8BEFB4E38E639B8A 65 DATA C3BE5178DAD67384 66 DATA 9AA6FAB437E4D5DC 67 DATA D8D153622CA73D82 68 DATA AE436EA707555D96 69 DATA 211CD6F143F34A5F 70 DATA 56560D5A2F840A05 71 DATA 0F32707E2E3D2BE3 72 DATA 080B442B77513DC0 73 DATA 54CB9DE6FEE32C10 74 DATA C98A91BB464FB1D5 75 DATA 1A90A64770DC3A6B 76 DATA E1B45DD5CDB51104 77 DATA 88C9439E014F86BF 78 DATA 5BB25CD9749738E4 79 DATA 8616E3B603359AB4 80 DATA FA027C450711A603 81 DATA 2B3780EBDBE09EED 82 DATA 773977DD810CD58E 83 DATA 7D2FFA5927BB4352 84 DATA EB1CE7E8B2C2408C 85 DATA 220D1014E675C187 86 DATA 00E4C0650939F612 87 DATA 852FB8809470C2BD 88 DATA 8821711B739E45DB 89 DATA 9C36E91BAA232A87 90 DATA 3BDFF5B38D8B8DCF 91 DATA 462A77049FD21D9A 92 DATA DB2D5EDF3AAD8B0F 93 DATA 408BFA8A74DC6D28 94 DATA 874630BB291DCEE2 95 DATA 559BD9D283388F4C 96 DATA BF4BB2EC6E6F12FE 97 DATA 86C6C001A2543B6C 98 DATA 5E87C356482ED96A 99 DATA DFF6646660411D0C 100 DATA 83B624222E03D3F5 101 DATA FD58F567C2191CA2 102 DATA D3C81E521165A2A9 103 DATA B1D3C2284C731F08 104 DATA DFCB4D9E20FBA800 105 DATA 25CD8D9FBCAACEE4 106 DATA 1AC0AC59DD2ED90E 107 DATA B7E96151B98D0AD6 108 DATA 10A08FA02E9A295C 109 DATA BC8345175F5E5632 110 DATA 11886B15047F2196 111 DATA 1883965787522CD2 112 DATA C8B509197EDA4598 113 DATA E9E5F2B4613220B2 114 DATA 1EE71476A88447B5 115 DATA 5A0AFA41D4210E86 116 DATA AEBB7A6B877DD672 117 DATA 7A32937FEDD7F59D 118 DATA 0DE7B937C5AE271D 119 DATA 7C38D1C14644C358 120 DATA 09447EDAA9C1E35B 121 DATA D3D2A4195CAB8D52 122 DATA 01539599DA0A639A 123 DATA 92789D6FAAD83F7E 124 DATA 52E7E7E69E5A559B 125 DATA 919FA172804E8E42 126 DATA 6818B1896DA34C8F 127 DATA 26F23EA609F601A6 128 DATA E5393A86B8B3976C 129 DATA 519D3A05694CF88E 130 DATA 370069B31703DE2B 131 DATA A273BF3F8C1617E3 132 DATA 7E02D889A94F8637 133 DATA 48220CE5CCBA81EC 134 DATA D5C7E9C126E07B38 135 DATA 94045E8C57D36614 136 DATA D5D12E1CC4A479BD 137 DATA C4904296F7052F09 138 DATA FA9AB3B1A5CAA6A8 139 DATA 7BE5EBF0E69ADCB6 140 DATA B57FF7AB949CEAC1 141 DATA 89F4FAEE9A96923A 142 DATA 5B055E8CC580A441 143 DATA 0CF0A3372E202013 144 DATA EA9C382266023AF0 145 DATA 37664B2A3BFAFA51 146 DATA 2F59074FE41FD8BA 147 DATA 710989535E494BC7 148 DATA C0F8ABC66DC37BE1 149 DATA B0C33115BF33BC44 150 DATA 9A33EF0EBF5DE484 151 DATA 13F63095D1471426 152 DATA 653DEC17F4140396 153 DATA F1E96BE2B7EA9476 154 DATA 8C5A87358DEE70D9 155 DATA 1D51AF39103131B8 156 DATA F069AE37423BD17A 157 DATA 3E3FBB1C4621F61C 158 DATA DC48874F412E2D14 159 DATA C159F0E7607CA7D1 160 DATA CD48B0300959F9F8 161 DATA 5A1A117C400D2DBC 162 DATA 546CD7B2C2621AAD 163 DATA A1F7122CDF514A9B 164 DATA CE77835E2211AFAB 165 DATA EC6C65728E04F4FE 166 DATA 17361E21F8443A04 167 DATA B0FFC906970E074E 168 DATA C5EA086BD8AF7C6E 169 DATA 781A69340C73F449 170 DATA B5D5F123678AF26F 171 DATA EFD0012D54E6ABE9 172 DATA 20534A1F57D7E163 173 DATA 2E1568A436A26A6B 174 DATA EEDD2B7379814A00 175 DATA 943A0C1A22284B46 176 DATA 0E62DB0CC438A923 177 DATA 305213DC678AD14B 178 DATA 6931DCBCA3FDFA48 179 DATA 5B69209C5249FBA7 180 DATA 4F1243429E015E70 181 DATA 546BCDD0CAE9526F 182 DATA BBB889ED8C8EC127 183 DATA 4DC607AF4E14CB76 184 DATA 843289305B37C53B 185 DATA 92779E5E7DBCC707 186 DATA C1E1288E1DFB0495 187 DATA D5BF47150A0E2254 188 DATA FFCC91824D08B65F 189 DATA 8211353904257EA3 190 DATA 96DC2CCCFA733FCD 191 DATA D4056E0399045280 192 DATA CF9FA4FB5B4600DF 193 DATA 634B697D0BE3B95C 194 DATA 032D167893954E7D 195 DATA 151793E345A29E88 196 DATA FC98EDDCB7E2A596 197 DATA D219ADD4552DCFEE 198 DATA 28B8C981C6F310F9 199 DATA 25EA3028487B7E22 200 DATA 0BD571DD9437F63A 201 DATA 3D7634DD68E95B9F 202 DATA F2C4D067CE1FAA2D 203 DATA A306A73B2E1FF902 204 DATA E826FACA4FC5C5F9 205 DATA 3CE6EB5A47EB7271 206 DATA 0BE014B4E435B8F1 207 DATA FCD9940CDBDCE94C 208 DATA 1DA2CDBFB77CAD6E 209 DATA 11BBAFADBE846060 210 DATA EC5C987F5E680EF5 211 DATA 8CD0EBC5A0047569 212 DATA 0419590C719F7552 213 DATA 0CF5F132081C45F3 214 DATA 1436C33A7C2F0F2F 215 DATA 02C78A7F3CD11302 216 DATA A7F810C5C3801A4C 217 DATA F1E64AD039FAC0CA 218 DATA 313DA203F5142BAD 219 DATA 75ADC723D78AA5EB 220 DATA A87A88E2F45EB973 221 DATA 75E529EE6DFBCF23 222 DATA 600E399F8D93D24C 223 DATA 295E450BF6A3507A 224 DATA F3F7991353AF68D4 225 DATA 060843DA71EF3F38 226 DATA 0A88AED034475A4B 227 DATA 564C2FFD8F41B877 228 DATA 6340FCC88CDECA98 229 DATA 4B80AC452288BBB3 230 DATA 3D3349BC8790BB4D 231 DATA 14676D28AA6A63A6 232 DATA E02E09E3FBAC33A0 233 DATA 20B00EC294FD1FF1 234 DATA AF8511A4C162B692 235 DATA 8F85098FE6A356CD 236 DATA 5220573AA3C766B2 237 DATA CDE47465A2A831F4 238 DATA E77725EE47726D52 239 DATA 80B0DBB76A7E3F81 240 DATA 6D127532D099897D 241 DATA 9BF89E42CAB11E4B 242 DATA 4332926AB23E2398 243 DATA 9CAD820782F076AE 244 DATA ED9CFFCD587BD523 245 DATA 8C12AC75A2CE0404 246 DATA 0FD3C523BA54BB9E 247 DATA 386A52D71265FD23 248 DATA 0EF70E22F3FFC86A 249 DATA 858958C64DC0C6AA 250 DATA 5E0F3DCD9E88E3DF 251 DATA E37EC6133E47FDE1 252 DATA A96773D18271B6DA 253 DATA 32E255EA8843A673 254 DATA 3403561DB1E6467B 255 DATA 4C4A2C7E78E7B0BD 256 DATA 36A49AB0E3C7E0FF 257 DATA 8517E0E2AD30AD45 258 DATA 48E388BF44442847 259 DATA B5BF3E31E54746C7 260 DATA 7EA7D9A40B6673F6 261 DATA EC7C5222BF4E2115 262 DATA 86EC8CCE630B7152 263 DATA 168D4CD9E26D7E85 264 DATA 98EA1C213525104D 265 DATA 9FA505EE228E7BEA 266 DATA 2C2DC4EC6BAE57C8 267 DATA 22CFAA8A10F960D8 268 DATA 809EDF9C075A169B 269 DATA 19921385AF825393 270 DATA 76EA43F4505B20EC 271 DATA BFC5E7AE05625CE7 272 DATA B22106B410048739 273 DATA D6C55774482B2CE9 274 DATA BE08A13FB3E556BB 275 DATA 5FC47DC4D4C44F19 276 DATA 693585BC1099514E 277 DATA 544846FBFD57879F 278 DATA 5531C160BA58307B 279 DATA EA58ED187DFC1326 280 DATA 8653258E07D91E86 281 DATA 86BD163728913A47 282 DATA 146F3F9E2EFFBCC2 283 DATA 22FA923BE8C4BE94 284 DATA 2645C5534E6D76DE 285 DATA FDD4AEFCA9834AED 286 DATA DD9E3D23C0256047 287 DATA 53531EE5FFE0FEA7 288 DATA E602007B84ECA74B 289 DATA 16CA1B0595791FE3 290 DATA BB78D2B4621ABB2A 291 DATA F3937FF2C5BCF042 292 DATA 40145A0B364C3F01 293 DATA F0B6652D723C5D0F 294 DATA D90281A106E5F5A1 295 DATA 8B178CFA95CE02FD 296 DATA C6D9EF485EDB2206 297 DATA 9B8EC4397C0DFAB2 298 DATA 770CBE4AA9F543D0 299 DATA 440DB16CC36FD576 300 DATA 83093A033D5857E1 301 DATA 3F72CEDBB6CFCDC5 302 DATA 9167B13CC88D574D 303 DATA E3A98B6ECD4408DA 304 DATA 685CB15F6BA810D8 305 DATA 2354B1FC5C4B4E1A 306 DATA 705EFC796BEE66F7 307 DATA CDDC34B33C557686 308 DATA 80259828A9905F76 309 DATA AAA787EF44F9EDA9 310 DATA 89FA4C8719B9B0C9 311 DATA 3C1A0B3E52167C1D 312 DATA DFB9205860DEFB6D 313 DATA B3B6EBBA43776D0A 314 DATA 7C42B9051AED931A 315 DATA 263C3E8E125E7FE9 316 DATA A12E1F7CE66B5E7A 317 DATA 76F4858725B37092 318 DATA 854BB982B51BB77A 319 DATA 660D990831733910 320 DATA D38A9492F3DF1F83 321 DATA 565E08BB5AF08BD1 322 DATA 51E4C13DDA6ECE7B 323 DATA 9E7E10E596D4F5A3 324 DATA 98B12398C089FB8C 325 DATA 86A57E5F75F7DDEC 326 DATA D6AA2E34558A9DA8 327 DATA 82354F49465D1412 328 DATA E24A706FC48384B1 329 DATA 73964515AF667C43 330 DATA 975841A67D7AF7F5 331 DATA 2BE44170E184A275 332 DATA BDB4F7FB9E11E5C0 333 DATA 644F72129143878A 334 DATA 448E5BA100DD03CD 335 DATA 250ABB3BE40D9690 336 DATA FCF3B28888D4215B 337 DATA 7B557A428E694653 338 DATA 6C05A6A3DA2504F7 339 DATA 4F3B3CE54C4E184D 340 DATA CDAF5AE1A395FBD1 341 DATA 179A11BF8FF015B9 342 DATA 459504A367731D9F 343 DATA 46A7759DBCBEBD1E 344 DATA 5B8B006DDAB710D7 345 DATA A93533B37E47B420 346 DATA C4424BE3408D8DE8 347 DATA A4E2FDE860CD8AE6 348 DATA D83ABFD9106ADAB2 349 DATA 2D11DA36787979B4 350 DATA 0D04A92F7926718D 351 DATA 309CED0D13298EBB 352 DATA A6C4A6E0EB09E53D 353 DATA D272AA556A392E56 354 DATA 35464B51192E9801 355 DATA 4AB26B1D7C59F31E 356 DATA 9A2BD7F46F3CF894 357 DATA E568114EE44DA2E6 358 DATA 594A1CF1914F2415 359 DATA 83798FC46745302C 360 DATA 5FBA5C8E00DF599A 361 DATA 4E6A3CD06D089186 362 DATA 6CCEA951A0E0114A 363 DATA B69FFA45598B9F48 364 DATA 631DFAA07B8C7C9A 365 DATA 6BC446F96252ED20 366 DATA D39DA89C69BE9515 367 DATA 34046135BBA31485 368 DATA F7773FFB3CE48633 369 DATA BC8ED3782E76E33A 370 DATA 3BEA055711925F33 371 DATA 3ECA680A7F7C0370 372 DATA CECFB9BA09C6A6B9 373 DATA D76BA4009074650B 374 DATA EDE3BB6B6578F526 375 DATA 4C21FF45D3E6EF3C 376 DATA 276A22B3D4EC8D70 377 DATA C991728B3276B330 378 DATA 83075DD929CCB280 379 DATA 33C5DA925D492D34 380 DATA AB3665126E32D24E 381 DATA FD6652C52AE2DE7C 382 DATA E749EDE489FE64C5 383 DATA 4DB43B024935B899 384 DATA 9D1579CFF1C3E577 385 DATA D01248DD1B69F81F 386 DATA 4494B3C378B303DC 387 DATA 44A4DE681C9ECCCA 388 DATA AC9FA1D6DAAD4E7D 389 DATA 37145740554FD0D0 390 DATA DEF20179212E1CF6 391 DATA 1762E526CA5DD8E9 392 DATA A9B06003F318177E 393 DATA B096310324150FE1 394 DATA CD9F2B06107A2BAF 395 DATA AA4A10374248EBAD 396 DATA AF3B9E5E36924A53 397 DATA 7ECCDC6E37BF3063 398 DATA EC80F085F817AF87 399 DATA B22A509B35AF48C6 400 DATA 34CED382D9373C30 401 DATA 7A94201CFCA52381 402 DATA 5C1447D0F51D3FA5 403 DATA E5603E7736A03D4B 404 DATA DE4E8202E413A191 405 DATA 297220711C2022E2 406 DATA D3A612760B1DF2FF 407 DATA 43096D17C6D1B199 408 DATA E8AE9D1EC2E2FDBB Edited November 12, 2017 by ramidavis 2 Quote Link to comment Share on other sites More sharing options...
digdugnate Posted November 12, 2017 Share Posted November 12, 2017 ha, thats pretty neat. Quote Link to comment Share on other sites More sharing options...
Omega-TI Posted November 12, 2017 Share Posted November 12, 2017 I'll have to give this a shot. Quote Link to comment Share on other sites More sharing options...
ramidavis Posted November 12, 2017 Author Share Posted November 12, 2017 (edited) If anyone is interested, here is a sort of "behind the scenes" of the creation of this. First off, using the link in the first post, i told it to generate 16384 random bytes, and copied that all to a text file. I keep doing this about 6 or 7 times, and random.org informs me i have used my quota for random data generation for the day, so i decide to call it good enough. Now, i have huge list of random bytes, separated by spaces 16 bytes to a line. I am running linux and using gedit, so the next step was to get rid of the white-space. I used gedit's search-and-replace to first replace all 'space' characters with nothing (leave the "replace with" field empty). Next, i did the same process for the newlines, by replacing the character "\n" with nothing (leaving the "replace with" field empty again). The result was huge string of data with no newlines, no spaces. Now i just needed to chop it up into 16 character hunks... And for that, i had to do some bash-foo (bash is the linux command line environment for those wondering). The attached text file contains probably the longest single linux command ever.(in case you want the command without all my data: echo "HUGE AMOUNT OF DATA HERE" | fold -w16 | paste -sd'\n' - > out.txt) After running that command, out.txt contained exactly what i needed: 16-digit hex codes, 1 per line. Another search and replace, this time replacing "\n" with "\nDATA ". Now i had premade data statements, minus line numbers. I fired up classic 99 in my windows xp virtual machine, issued a NUM 1,1 command and let it take as much as it could from the clipboard. Turns out it ran out of memory around the 458th entry or so, so started over, only copying the first 400. A RES command, a simple loop added, followed by another RES, and we are all done. Edited November 12, 2017 by ramidavis 2 Quote Link to comment Share on other sites More sharing options...
Omega-TI Posted November 12, 2017 Share Posted November 12, 2017 Interesting... but not what I thought it was gonna be. I figured it was going to be something to do with 100 bottles of beer on the wall since you named the thread Barf-O-Matic. Quote Link to comment Share on other sites More sharing options...
Like us on Facebook
Follow us on Twitter
AtariAge on Instagram
Watch us on YouTube
Chat on Discord
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.