ofs | hex dump | ascii |
---|
0000 | 4e 75 6c 6c 73 6f 66 74 20 41 56 53 20 50 72 65 73 65 74 20 30 2e 32 1a 01 15 00 00 00 f7 16 00 | Nullsoft.AVS.Preset.0.2......... |
0020 | 00 f3 16 00 00 74 68 65 72 65 20 69 20 64 69 64 20 69 74 3a 29 0d 0a 0d 0a 6f 6e 6c 79 20 6d 61 | .....there.i.did.it:)....only.ma |
0040 | 64 65 20 6f 6e 65 20 62 65 63 61 75 73 65 20 6f 66 20 6c 61 63 6b 20 6f 66 20 74 69 6d 65 2e 20 | de.one.because.of.lack.of.time.. |
0060 | 65 76 65 6e 20 74 68 69 73 20 6f 6e 65 20 69 73 6e 74 20 72 65 61 6c 6c 79 20 66 69 6e 69 73 68 | even.this.one.isnt.really.finish |
0080 | 65 64 3a 44 2e 20 42 75 74 20 69 74 20 77 69 6c 6c 20 68 61 76 65 20 74 6f 20 64 6f 20 62 65 63 | ed:D..But.it.will.have.to.do.bec |
00a0 | 61 75 73 65 20 74 69 6d 65 27 73 20 75 70 2e 20 41 6e 79 77 61 79 20 45 6c 20 69 20 68 6f 70 65 | ause.time's.up..Anyway.El.i.hope |
00c0 | 20 79 6f 75 20 6c 69 6b 65 20 69 74 20 3a 29 2e 0d 0a 0d 0a 69 20 64 69 64 20 74 68 69 73 20 66 | .you.like.it.:).....i.did.this.f |
00e0 | 72 6f 6d 20 67 65 72 6f 75 6e 64 20 7a 65 72 6f 20 62 75 74 20 69 20 6b 65 70 74 20 74 68 65 20 | rom.geround.zero.but.i.kept.the. |
0100 | 62 61 73 69 63 20 63 6f 6e 63 65 70 74 2e 20 49 20 72 65 77 72 6f 74 65 20 61 6c 6c 20 74 68 65 | basic.concept..I.rewrote.all.the |
0120 | 20 63 6f 64 65 20 73 6f 20 69 20 63 6f 75 6c 64 20 6d 61 6e 69 70 75 6c 61 74 65 20 69 74 20 62 | .code.so.i.could.manipulate.it.b |
0140 | 65 74 74 65 72 2c 20 62 75 74 20 69 74 73 20 62 61 73 69 63 61 6c 79 20 74 68 65 20 73 61 6d 65 | etter,.but.its.basicaly.the.same |
0160 | 20 65 66 66 65 63 74 2e 74 68 65 20 73 68 69 70 20 6d 6f 76 65 6d 65 6e 74 20 63 6f 64 65 20 69 | .effect.the.ship.movement.code.i |
0180 | 73 20 61 73 20 73 69 6d 70 6c 65 20 61 73 20 69 74 20 67 65 74 73 2c 20 62 75 74 20 69 74 20 73 | s.as.simple.as.it.gets,.but.it.s |
01a0 | 74 69 6c 6c 20 66 75 63 6b 73 20 75 70 20 73 6f 6d 65 74 69 6d 65 3a 44 28 63 61 6e 74 20 66 69 | till.fucks.up.sometime:D(cant.fi |
01c0 | 67 75 72 65 20 6f 75 74 20 77 68 61 74 20 74 68 65 20 70 72 6f 62 6c 65 6d 20 69 73 29 2e 74 68 | gure.out.what.the.problem.is).th |
01e0 | 65 20 70 69 6c 6f 74 20 69 73 20 61 6c 6c 20 67 75 74 73 20 26 20 6e 6f 20 62 72 61 69 6e 20 3a | e.pilot.is.all.guts.&.no.brain.: |
0200 | 29 2e 0d 0a 0d 0a 65 6c 2d 76 69 73 20 2d 20 61 66 74 65 72 62 75 72 6e 65 72 30 30 32 20 20 28 | ).....el-vis.-.afterburner002..( |
0220 | 63 79 62 65 72 70 75 6e 78 29 0d 0a 66 73 6b 20 2d 20 66 6c 61 74 6d 69 78 20 0d 0a 0d 0a 0d 0a | cyberpunx)..fsk.-.flatmix....... |
0240 | a9 66 73 6b 20 32 30 2e 31 32 2e 32 30 30 33 2c 20 6c 6a 75 62 6c 6a 61 6e 61 2c 20 73 6c 6f 76 | .fsk.20.12.2003,.ljubljana,.slov |
0260 | 65 6e 69 6a 61 3c 3c 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d | enija<<------------------------- |
0280 | 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 0d 0a 0d 0a 0d 0a 0d | -----------------------......... |
02a0 | 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 68 69 20 69 6d 20 74 68 65 20 6f 62 73 74 61 63 6c | ...............hi.im.the.obstacl |
02c0 | 65 20 69 66 20 79 6f 75 20 61 72 65 20 77 6f 6e 64 65 72 69 6e 67 20 68 6f 77 20 69 20 77 6f 72 | e.if.you.are.wondering.how.i.wor |
02e0 | 6b 20 68 65 72 65 73 20 6d 79 20 73 74 6f 72 79 3a 29 20 20 20 28 69 6d 20 6a 75 73 74 20 67 6f | k.heres.my.story:)...(im.just.go |
0300 | 6e 6e 61 20 74 65 6c 6c 20 79 6f 75 20 61 62 6f 75 74 20 74 68 65 20 66 75 6e 20 70 61 72 74 20 | nna.tell.you.about.the.fun.part. |
0320 | 74 68 61 74 20 68 61 70 70 65 6e 73 20 65 76 65 72 79 20 66 72 61 6d 65 29 0d 0a 0d 0a 69 66 28 | that.happens.every.frame)....if( |
0340 | 62 61 6e 64 28 61 62 6f 76 65 28 72 65 67 37 38 2c 32 30 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 | band(above(reg78,20),band(below( |
0360 | 6d 7a 2c 30 29 2c 62 29 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mz,0),b)),...................... |
0380 | 20 2f 2f 20 69 66 20 32 30 20 66 72 61 6d 65 73 20 68 61 76 65 20 70 61 73 73 65 64 20 73 69 6e | .//.if.20.frames.have.passed.sin |
03a0 | 63 65 20 6d 79 20 70 72 65 64 65 63 65 73 6f 72 20 73 74 61 72 74 65 64 20 20 20 20 20 20 20 20 | ce.my.predecesor.started........ |
03c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
03e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0400 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0420 | 20 20 61 6e 64 20 69 20 68 61 76 65 20 72 65 61 63 68 65 64 20 74 68 65 20 65 6e 64 20 0d 0a 20 | ..and.i.have.reached.the.end.... |
0440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0480 | 20 20 20 20 20 20 61 6e 64 20 74 68 65 72 65 73 20 61 20 62 65 61 74 2c 20 74 68 65 6e 20 69 3a | ......and.theres.a.beat,.then.i: |
04a0 | 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 31 31 2c 20 28 72 65 67 31 31 2b 33 29 25 31 38 20 20 20 | ..assign(.reg11,.(reg11+3)%18... |
04c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 | ...............................) |
04e0 | 2b 20 20 20 20 20 2f 2f 20 6d 6f 76 65 20 74 68 65 20 62 75 66 66 65 72 20 69 6e 64 65 78 20 6f | +.....//.move.the.buffer.index.o |
0500 | 6e 65 20 70 6c 61 63 65 20 75 70 0d 0a 61 73 73 69 67 6e 28 20 69 6e 64 65 78 2c 72 65 67 31 31 | ne.place.up..assign(.index,reg11 |
0520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0540 | 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 20 72 65 6d 65 6d 62 65 72 20 6d | ..........)+.....//.i.remember.m |
0560 | 79 20 69 6e 64 65 78 0d 0a 61 73 73 69 67 6e 28 20 68 77 2c 72 61 6e 64 28 32 29 20 20 20 20 20 | y.index..assign(.hw,rand(2)..... |
0580 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
05a0 | 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 20 64 65 63 69 64 65 20 69 66 20 69 6d 20 68 | ......)+.....//.i.decide.if.im.h |
05c0 | 6f 72 69 7a 6f 6e 74 61 6c 20 6f 72 20 76 65 72 74 69 63 61 6c 0d 0a 61 73 73 69 67 6e 28 20 67 | orizontal.or.vertical..assign(.g |
05e0 | 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 28 72 61 6e 64 28 38 29 2d 34 29 2a 2e 32 2b 2e 31 | megabuf(index),(rand(8)-4)*.2+.1 |
0600 | 32 35 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 20 | 25..................)+.....//.i. |
0620 | 77 72 69 74 65 20 6d 79 20 70 6f 73 20 74 6f 20 67 6d 65 67 61 62 75 66 0d 0a 61 73 73 69 67 6e | write.my.pos.to.gmegabuf..assign |
0640 | 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 68 77 20 20 20 20 20 20 20 20 20 20 | (.gmegabuf(index+1),hw.......... |
0660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f | .......................)+.....// |
0680 | 20 69 20 77 72 69 74 65 20 6d 79 20 6f 72 69 65 6e 74 61 74 69 6f 6e 20 74 6f 20 67 6d 65 67 61 | .i.write.my.orientation.to.gmega |
06a0 | 62 75 66 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 6d | buf..assign(.gmegabuf(index+2),m |
06c0 | 69 6e 28 72 65 67 37 38 2c 31 30 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | in(reg78,100)................... |
06e0 | 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 20 77 72 69 74 65 20 74 68 65 20 74 69 6d 65 20 64 69 66 | ..)+.....//.i.write.the.time.dif |
0700 | 66 65 72 65 6e 63 65 20 62 65 74 77 65 65 6e 20 6d 65 20 6d 79 20 70 72 65 64 65 63 65 73 6f 72 | ference.between.me.my.predecesor |
0720 | 20 28 6d 61 78 20 64 69 66 65 72 65 6e 63 65 20 3d 31 30 30 20 66 72 61 6d 65 73 29 0d 0a 61 73 | .(max.diference.=100.frames)..as |
0740 | 73 69 67 6e 28 20 72 65 67 37 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sign(.reg78,0................... |
0760 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 | ...........................)+... |
0780 | 20 20 2f 2f 20 69 20 72 65 73 65 74 20 74 68 65 20 74 69 6d 65 72 0d 0a 61 73 73 69 67 6e 28 20 | ..//.i.reset.the.timer..assign(. |
07a0 | 6d 7a 2c 31 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mz,100.......................... |
07c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 | .....................)+.....//.i |
07e0 | 20 67 6f 20 74 6f 20 74 68 65 20 73 74 61 72 74 0d 0a 61 73 73 69 67 6e 28 20 73 74 61 72 74 2c | .go.to.the.start..assign(.start, |
0800 | 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 1............................... |
0820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 2f 2f 20 69 20 70 69 63 6b 20 | ...............)+.....//.i.pick. |
0840 | 61 20 72 61 6e 64 6f 6d 20 77 69 64 74 68 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | a.random.width.................. |
0860 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 67 39 38 20 69 | ........................(reg98.i |
08a0 | 73 20 73 6f 6d 65 20 63 72 61 70 79 20 72 61 74 69 6f 20 66 69 78 65 72 20 66 73 6b 20 67 61 76 | s.some.crapy.ratio.fixer.fsk.gav |
08c0 | 65 20 6d 65 2e 20 66 73 6b 20 79 6f 75 20 6c 61 7a 79 20 62 61 73 74 61 72 64 3a 50 29 0d 0a 61 | e.me..fsk.you.lazy.bastard:P)..a |
08e0 | 73 73 69 67 6e 28 20 77 69 64 2c 28 72 61 6e 64 28 33 35 29 2b 31 35 29 2a 72 65 67 39 38 2a 2e | ssign(.wid,(rand(35)+15)*reg98*. |
0900 | 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 20 20 | 7...........................),.. |
0920 | 20 20 20 0d 0a 2f 2f 65 6c 73 65 3a 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 28 2d 33 | .....//else:...assign(.mz,max(-3 |
0940 | 2c 6d 7a 2d 72 65 67 35 35 2a 32 30 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ,mz-reg55*200).................. |
0960 | 20 20 20 20 20 20 20 20 20 20 20 20 29 20 20 20 20 20 20 2f 2f 20 69 20 6d 61 6b 65 20 6f 6e 65 | ............)......//.i.make.one |
0980 | 20 73 74 65 70 20 64 6f 77 6e 20 74 68 65 20 72 6f 61 64 0d 0a 29 3b 20 20 20 20 20 20 20 20 20 | .step.down.the.road..);......... |
09a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 0d 0a | ................................ |
09c0 | 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 72 65 67 38 33 29 2c 73 74 61 72 74 29 2c 20 | if(band(below(mz,reg83),start),. |
09e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0a00 | 20 20 20 20 2f 2f 20 69 66 20 69 20 68 61 76 65 20 70 61 73 73 65 64 20 74 68 65 20 73 68 69 70 | ....//.if.i.have.passed.the.ship |
0a20 | 20 61 6e 64 20 68 61 76 65 6e 74 20 64 6f 6e 65 20 73 6f 20 62 65 66 6f 72 65 0d 0a 61 73 73 69 | .and.havent.done.so.before..assi |
0a40 | 67 6e 28 72 65 67 31 32 2c 28 69 6e 64 65 78 2b 33 29 25 31 38 29 2b 61 73 73 69 67 6e 28 73 74 | gn(reg12,(index+3)%18)+assign(st |
0a60 | 61 72 74 2c 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | art,0).......................... |
0a80 | 2f 2f 20 69 20 74 65 6c 6c 20 74 68 65 20 73 68 69 70 20 74 6f 20 73 74 6f 70 20 77 6f 72 72 79 | //.i.tell.the.ship.to.stop.worry |
0aa0 | 69 6e 67 20 61 62 6f 75 74 20 6d 65 2c 69 20 72 61 74 20 6f 6e 20 6d 79 20 66 72 69 65 6e 64 20 | ing.about.me,i.rat.on.my.friend. |
0ac0 | 77 68 6f 73 20 63 6f 6d 65 69 6e 67 20 6e 65 78 74 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | whos.comeing.next............... |
0ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0b20 | 20 61 6e 64 20 72 65 6d 65 6d 62 65 72 20 69 27 76 65 20 64 6f 6e 65 20 74 68 69 73 20 61 6c 72 | .and.remember.i've.done.this.alr |
0b40 | 65 61 64 79 0d 0a 2c 30 29 3b 0d 0a 20 0d 0a 6e 3d 61 62 6f 76 65 28 6d 7a 2c 2d 31 29 2a 32 3b | eady..,0);.....n=above(mz,-1)*2; |
0b60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 20 69 20 74 65 6c 6c 20 61 76 | ...................//..i.tell.av |
0ba0 | 73 20 74 68 61 74 20 69 66 20 69 6d 20 77 61 69 74 69 6e 67 20 68 65 20 64 6f 65 73 6e 74 20 6e | s.that.if.im.waiting.he.doesnt.n |
0bc0 | 65 65 64 20 74 6f 20 64 72 61 77 20 6d 65 20 0d 0a 0d 0a 62 6c 75 65 3d 31 2d 6d 7a 2a 2e 30 31 | eed.to.draw.me.....blue=1-mz*.01 |
0be0 | 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 5;.............................. |
0c00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 67 72 65 65 6e 3d 62 | .........................green=b |
0c20 | 6c 75 65 3b 20 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 37 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 77 69 | lue;...red=blue*.7;..linesize=wi |
0c40 | 64 2a 7a 3b 20 20 20 20 20 20 0d 0a 0d 0a 0d 0a 61 6e 64 20 74 68 65 6e 20 79 6f 75 72 20 63 6c | d*z;............and.then.your.cl |
0c60 | 61 73 73 69 63 20 74 72 69 61 6e 67 6c 65 20 73 70 61 63 65 20 73 68 69 70 20 61 2e 6b 2e 61 2e | assic.triangle.space.ship.a.k.a. |
0c80 | 20 6d 65 2c 20 63 6f 6d 65 73 20 69 6e 20 61 6e 64 20 0d 0a 0d 0a 74 3d 67 65 74 74 69 6d 65 28 | .me,.comes.in.and.....t=gettime( |
0ca0 | 30 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 0);............................. |
0cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 | ............................//.i |
0ce0 | 20 6c 6f 6f 6b 20 61 74 20 74 68 65 20 74 69 6d 65 0d 0a 63 3d 30 3b 20 20 20 20 20 20 20 20 20 | .look.at.the.time..c=0;......... |
0d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 72 65 | .........................//.i.re |
0d40 | 73 65 74 20 74 68 65 20 63 6f 75 6e 74 65 72 20 66 6f 72 20 74 68 65 20 74 72 69 61 6e 67 6c 65 | set.the.counter.for.the.triangle |
0d60 | 20 66 69 6c 6c 0d 0a 64 3d 2e 32 35 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .fill..d=.25;................... |
0d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 6d 6f 76 65 20 6d 79 20 70 65 6e 20 74 6f | .............//.i.move.my.pen.to |
0dc0 | 20 74 68 65 20 73 74 61 72 74 20 0d 0a 70 69 78 3d 32 2f 68 3b 20 20 20 20 20 20 20 20 20 20 20 | .the.start...pix=2/h;........... |
0de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 6d 65 73 75 72 65 20 75 | ...................//.i.mesure.u |
0e20 | 70 20 6f 6e 65 20 70 69 78 6c 65 0d 0a 6e 3d 64 2f 70 69 78 2a 33 3b 20 20 20 20 20 20 20 20 20 | p.one.pixle..n=d/pix*3;......... |
0e40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
0e60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 63 61 6c 63 75 6c 61 74 | ...................//.i.calculat |
0e80 | 65 20 68 6f 77 20 6d 61 6e 79 20 70 6f 69 6e 74 73 20 69 6c 20 6e 65 65 64 20 74 6f 20 64 72 61 | e.how.many.points.il.need.to.dra |
0ea0 | 77 20 6d 79 73 65 6c 66 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | w.myself........................ |
0ec0 | 0d 0a 69 66 28 62 65 6c 6f 77 28 61 62 73 28 69 66 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 | ..if(below(abs(if(gmegabuf(reg12 |
0ee0 | 2b 31 29 2c 6e 65 77 78 2c 6e 65 77 79 29 2d 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 29 2c | +1),newx,newy)-gmegabuf(reg12)), |
0f00 | 2e 37 29 2c 20 20 20 20 2f 2f 20 69 66 20 69 6d 20 69 6e 20 74 68 65 20 77 61 79 20 6f 66 20 74 | .7),....//.if.im.in.the.way.of.t |
0f20 | 68 65 20 6e 65 78 74 20 6f 62 73 74 61 63 6c 65 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | he.next.obstacle................ |
0f40 | 20 20 0d 0a 61 73 73 69 67 6e 28 69 66 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 2b 31 29 2c | ....assign(if(gmegabuf(reg12+1), |
0f60 | 6e 65 77 78 2c 6e 65 77 79 29 2c 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 2d 2e 37 2a 73 69 | newx,newy),gmegabuf(reg12)-.7*si |
0f80 | 67 6e 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 29 29 2b 20 20 20 20 20 20 20 2f 2f 69 20 | gn(gmegabuf(reg12)))+.......//i. |
0fa0 | 6d 6f 76 65 20 66 6f 72 20 2e 37 20 61 77 61 79 20 66 72 6f 6d 20 69 74 20 6f 6e 20 74 68 65 20 | move.for..7.away.from.it.on.the. |
0fc0 | 61 70 72 6f 70 72 69 61 74 65 20 73 69 64 65 20 61 6e 64 20 61 78 69 73 20 0d 0a 61 73 73 69 67 | apropriate.side.and.axis...assig |
0fe0 | 6e 28 73 70 65 65 64 2c 28 31 2e 35 2f 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 2b 32 29 2b | n(speed,(1.5/(gmegabuf(reg12+2)+ |
1000 | 2e 30 32 29 29 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .02))).......................... |
1020 | 20 2f 2f 20 69 20 63 61 6c 63 75 6c 61 74 65 20 74 68 65 20 61 70 72 6f 78 69 6d 61 74 65 20 73 | .//.i.calculate.the.aproximate.s |
1040 | 70 65 65 64 20 69 6c 6c 20 6e 65 65 64 20 74 6f 20 6d 6f 76 65 20 61 77 61 79 20 69 6e 20 74 69 | peed.ill.need.to.move.away.in.ti |
1060 | 6d 65 20 0d 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | me.............................. |
1080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
10a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 72 6f 6d 20 74 68 65 20 74 69 6d 65 20 74 68 65 | ..............(from.the.time.the |
10c0 | 20 6f 62 73 74 61 63 6c 65 20 73 65 6e 64 73 20 6d 65 20 61 6e 64 20 73 6f 6d 65 20 70 61 72 61 | .obstacle.sends.me.and.some.para |
10e0 | 6d 65 74 65 72 73 20 66 73 6b 20 67 61 76 65 20 6d 65 29 0d 0a 2c 30 29 3b 20 20 20 20 20 20 20 | meters.fsk.gave.me)..,0);....... |
1100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 6d 78 3d 6d 78 2b 28 6e 65 77 78 2d | ....................mx=mx+(newx- |
1140 | 6d 78 29 2a 73 70 65 65 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mx)*speed;...................... |
1160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 6d | ..........................//.i.m |
1180 | 6f 76 65 20 6f 6e 65 20 73 74 65 70 20 63 6c 6f 73 65 72 20 74 6f 20 73 61 66 65 74 79 20 69 66 | ove.one.step.closer.to.safety.if |
11a0 | 20 69 20 6e 65 65 64 20 74 6f 0d 0a 6d 79 3d 6d 79 2b 28 6e 65 77 79 2d 6d 79 29 2a 73 70 65 65 | .i.need.to..my=my+(newy-my)*spee |
11c0 | 64 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d;.............................. |
11e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 0d 0a 0d 0a 6d 78 32 3d 6d 78 2b | ..................//.....mx2=mx+ |
1200 | 73 69 6e 28 74 2a 37 29 2a 2e 30 33 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sin(t*7)*.03;................... |
1220 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f | .............................../ |
1240 | 2f 20 69 20 70 72 65 74 65 6e 64 20 69 6d 20 69 6e 74 65 72 65 73 74 69 6e 67 20 61 6e 64 20 67 | /.i.pretend.im.interesting.and.g |
1260 | 68 6f 69 6e 67 20 72 65 61 6c 20 66 61 73 74 20 62 79 20 77 6f 62 65 6c 69 6e 67 20 61 20 62 69 | hoing.real.fast.by.wobeling.a.bi |
1280 | 74 3a 29 0d 0a 6d 79 32 3d 6d 79 2b 73 69 6e 28 74 2a 35 29 2a 2e 30 33 3b 20 20 20 20 20 20 20 | t:)..my2=my+sin(t*5)*.03;....... |
12a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
12c0 | 20 20 20 20 20 20 20 20 20 20 20 2f 2f 0d 0a 72 65 67 38 33 3d 73 69 6e 28 74 29 2b 31 3b 20 20 | ...........//..reg83=sin(t)+1;.. |
12e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 6d 6f 76 65 20 66 | .....................//.i.move.f |
1320 | 6f 72 77 61 72 64 20 61 6e 64 20 62 61 63 6b 77 61 72 64 20 61 20 62 69 74 20 74 6f 20 6d 61 6b | orward.and.backward.a.bit.to.mak |
1340 | 65 20 6d 79 73 65 6c 66 20 65 76 65 6e 20 6d 6f 72 65 20 69 6e 74 65 72 65 73 74 69 6e 67 3a 44 | e.myself.even.more.interesting:D |
1360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
13a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 20 61 6c 73 6f 20 74 65 6c | ......................i.also.tel |
13c0 | 6c 20 74 68 65 20 6f 62 73 74 61 63 6c 65 73 20 61 62 6f 75 74 20 74 68 69 73 0d 0a 72 65 67 38 | l.the.obstacles.about.this..reg8 |
13e0 | 34 3d 31 2f 28 31 2b 72 65 67 38 33 2a 2e 35 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 4=1/(1+reg83*.5);............... |
1400 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1420 | 20 20 2f 2f 20 69 20 75 73 65 20 70 72 6f 6a 65 63 74 69 6f 6e 20 74 6f 20 63 61 6c 63 75 6c 61 | ..//.i.use.projection.to.calcula |
1440 | 74 65 20 6d 79 20 6c 69 6e 65 20 77 69 64 74 68 20 0d 0a 6c 69 6e 65 73 69 7a 65 3d 34 2a 72 65 | te.my.line.width...linesize=4*re |
1460 | 67 39 38 2a 72 65 67 38 34 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g98*reg84;...................... |
1480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 69 20 63 61 | .........................//.i.ca |
14a0 | 6c 63 75 6c 61 74 65 20 6d 79 20 6c 69 6e 65 76 69 64 74 68 20 77 69 74 68 20 74 68 65 20 66 61 | lculate.my.linevidth.with.the.fa |
14c0 | 63 74 6f 72 20 66 72 6f 6d 20 74 68 65 20 70 72 65 76 69 6f 75 73 20 6c 69 6e 65 20 0d 0a 20 20 | ctor.from.the.previous.line..... |
14e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
1520 | 20 20 20 20 20 20 20 61 6e 64 20 74 68 65 20 63 72 61 70 70 79 20 61 73 70 65 63 74 20 66 69 78 | .......and.the.crappy.aspect.fix |
1540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 0d 0a | ................................ |
1560 | 61 6e 64 20 74 68 61 74 73 20 69 74 2e 20 74 68 61 74 73 20 70 72 65 65 74 79 20 6d 75 63 68 20 | and.thats.it..thats.preety.much. |
1580 | 61 6c 6c 20 77 65 20 63 61 6e 20 64 6f 20 3a 28 20 77 65 72 65 20 73 74 75 70 69 64 20 61 6e 64 | all.we.can.do.:(.were.stupid.and |
15a0 | 20 77 65 20 68 61 76 65 20 61 20 62 6f 72 69 6e 67 20 27 6c 69 66 65 27 20 61 6e 64 20 69 74 73 | .we.have.a.boring.'life'.and.its |
15c0 | 20 61 6c 6c 20 66 73 6b 27 73 20 66 61 75 6c 74 20 2d 20 67 65 74 20 61 20 6c 69 66 65 20 64 75 | .all.fsk's.fault.-.get.a.life.du |
15e0 | 6d 62 61 73 73 3a 50 20 69 6e 73 74 65 61 64 20 6f 66 20 74 6f 75 72 63 68 75 72 69 6e 67 20 75 | mbass:P.instead.of.tourchuring.u |
1600 | 73 20 77 69 74 68 20 79 6f 75 72 20 62 6f 72 72 69 6e 67 20 73 63 72 69 70 74 20 6b 69 64 64 69 | s.with.your.borring.script.kiddi |
1620 | 65 20 74 61 73 6b 73 2e 20 68 75 68 20 6a 75 73 74 20 69 6d 61 67 69 6e 65 20 69 20 63 6f 75 6c | e.tasks..huh.just.imagine.i.coul |
1640 | 64 20 68 61 76 65 20 62 65 65 6e 20 61 6e 20 61 6c 67 6f 72 69 74 68 6d 20 66 6f 72 20 73 6f 6d | d.have.been.an.algorithm.for.som |
1660 | 65 20 6d 65 64 69 63 61 6c 20 65 71 75 69 70 6d 65 6e 74 20 6f 72 20 61 20 73 70 61 63 65 20 63 | e.medical.equipment.or.a.space.c |
1680 | 72 61 66 74 20 67 75 69 64 65 6e 63 65 20 73 69 73 74 65 6d 20 6f 72 20 73 6f 6d 65 20 6f 74 68 | raft.guidence.sistem.or.some.oth |
16a0 | 65 72 20 6c 65 65 74 20 73 68 69 74 20 6c 69 6b 65 20 74 68 61 74 20 69 6e 73 74 65 61 64 20 6f | er.leet.shit.like.that.instead.o |
16c0 | 66 20 74 68 69 73 20 3b 28 2e 20 6f 68 20 77 65 6c 6c 20 6c 69 66 65 73 20 61 20 62 69 74 63 68 | f.this.;(..oh.well.lifes.a.bitch |
16e0 | 20 61 6e 64 20 74 68 65 6e 20 74 68 65 20 77 69 6e 64 6f 77 73 20 66 72 65 65 7a 65 2e 20 0d 0a | .and.then.the.windows.freeze.... |
1700 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 0d 0a 00 24 00 00 00 63 05 00 00 | ........................$...c... |
1720 | 01 84 01 00 00 73 6b 69 70 3d 31 3b 0d 0a 6c 6f 77 3d 61 62 73 28 67 65 74 6f 73 63 28 69 2c 2e | .....skip=1;..low=abs(getosc(i,. |
1740 | 38 2c 30 29 29 3b 0d 0a 6f 6e 65 4c 3d 6d 61 78 28 6c 6f 77 2c 6f 6e 65 4c 29 3b 0d 0a 74 77 6f | 8,0));..oneL=max(low,oneL);..two |
1760 | 4c 3d 6d 61 78 28 6c 6f 77 2c 74 77 6f 4c 29 3b 0d 0a 63 75 72 4d 4c 3d 6d 61 78 28 6c 6f 77 2c | L=max(low,twoL);..curML=max(low, |
1780 | 63 75 72 4d 4c 29 3b 0d 0a 74 68 72 65 65 4c 3d 6d 61 78 28 6c 6f 77 2c 74 68 72 65 65 4c 29 3b | curML);..threeL=max(low,threeL); |
17a0 | 0d 0a 0d 0a 6d 69 64 3d 61 62 73 28 67 65 74 6f 73 63 28 69 2c 2e 30 34 2c 30 29 2d 67 65 74 6f | ....mid=abs(getosc(i,.04,0)-geto |
17c0 | 73 63 28 69 2c 2e 34 2c 30 29 29 3b 0d 0a 6f 6e 65 4d 3d 6d 61 78 28 6d 69 64 2c 6f 6e 65 4d 29 | sc(i,.4,0));..oneM=max(mid,oneM) |
17e0 | 3b 0d 0a 74 77 6f 4d 3d 6d 61 78 28 6d 69 64 2c 74 77 6f 4d 29 3b 0d 0a 63 75 72 4d 4d 3d 6d 61 | ;..twoM=max(mid,twoM);..curMM=ma |
1800 | 78 28 6d 69 64 2c 63 75 72 4d 4d 29 3b 0d 0a 74 68 72 65 65 4d 3d 6d 61 78 28 6d 69 64 2c 74 68 | x(mid,curMM);..threeM=max(mid,th |
1820 | 72 65 65 4d 29 3b 0d 0a 0d 0a 68 69 3d 61 62 73 28 67 65 74 6f 73 63 28 69 2c 2e 30 2c 30 29 2d | reeM);....hi=abs(getosc(i,.0,0)- |
1840 | 67 65 74 6f 73 63 28 69 2c 2e 30 30 34 2c 30 29 29 3b 0d 0a 6f 6e 65 48 3d 6d 61 78 28 68 69 2c | getosc(i,.004,0));..oneH=max(hi, |
1860 | 6f 6e 65 48 29 3b 0d 0a 74 77 6f 48 3d 6d 61 78 28 68 69 2c 74 77 6f 48 29 3b 0d 0a 63 75 72 4d | oneH);..twoH=max(hi,twoH);..curM |
1880 | 48 3d 6d 61 78 28 68 69 2c 63 75 72 4d 48 29 3b 0d 0a 74 68 72 65 65 48 3d 6d 61 78 28 68 69 2c | H=max(hi,curMH);..threeH=max(hi, |
18a0 | 74 68 72 65 65 48 29 3b 00 d9 02 00 00 74 3d 67 65 74 74 69 6d 65 28 30 29 3b 0d 0a 72 65 67 34 | threeH);.....t=gettime(0);..reg4 |
18c0 | 36 3d 28 73 69 6e 28 74 2a 2e 30 32 29 2a 63 6f 73 28 74 2a 2e 30 35 29 2a 63 6f 73 28 74 2a 2e | 6=(sin(t*.02)*cos(t*.05)*cos(t*. |
18e0 | 30 37 29 2b 31 29 2a 2e 34 2b 2e 32 3b 0d 0a 73 73 3d 77 2b 68 3b 0d 0a 69 66 28 65 71 75 61 6c | 07)+1)*.4+.2;..ss=w+h;..if(equal |
1900 | 28 73 73 2c 62 75 66 29 2c 30 2c 61 73 73 69 67 6e 28 72 65 67 30 30 2c 31 29 29 3b 0d 0a 62 75 | (ss,buf),0,assign(reg00,1));..bu |
1920 | 66 3d 73 73 3b 0d 0a 72 65 67 37 38 3d 72 65 67 37 38 2b 31 3b 0d 0a 72 65 67 39 39 3d 77 2f 68 | f=ss;..reg78=reg78+1;..reg99=w/h |
1940 | 3b 0d 0a 72 65 67 39 38 3d 28 73 73 29 2a 2e 30 30 33 3b 0d 0a 61 76 67 4c 3d 28 6f 6e 65 4c 2b | ;..reg98=(ss)*.003;..avgL=(oneL+ |
1960 | 74 77 6f 4c 2b 74 68 72 65 65 4c 29 2f 33 3b 0d 0a 61 76 67 4c 3d 6d 61 78 28 61 76 67 4c 2c 2e | twoL+threeL)/3;..avgL=max(avgL,. |
1980 | 30 31 29 3b 0d 0a 72 65 61 63 74 4c 3d 28 63 75 72 4d 4c 2f 61 76 67 4c 29 3b 0d 0a 72 65 61 63 | 01);..reactL=(curML/avgL);..reac |
19a0 | 74 4c 3d 6d 69 6e 28 61 62 6f 76 65 28 72 65 61 63 74 4c 2c 2e 37 29 2a 72 65 61 63 74 4c 2c 31 | tL=min(above(reactL,.7)*reactL,1 |
19c0 | 29 3b 0d 0a 63 75 72 4d 4c 3d 30 3b 0d 0a 6f 6e 65 4c 3d 6f 6e 65 4c 2d 2e 30 30 30 31 3b 0d 0a | );..curML=0;..oneL=oneL-.0001;.. |
19e0 | 74 77 6f 4c 3d 74 77 6f 4c 2d 2e 30 30 31 3b 0d 0a 74 68 72 65 65 4c 3d 74 68 72 65 65 4c 2d 2e | twoL=twoL-.001;..threeL=threeL-. |
1a00 | 30 31 3b 0d 0a 0d 0a 61 76 67 4d 3d 28 6f 6e 65 4d 2b 74 77 6f 4d 2b 74 68 72 65 65 4d 29 2f 33 | 01;....avgM=(oneM+twoM+threeM)/3 |
1a20 | 3b 0d 0a 61 76 67 4d 3d 6d 61 78 28 61 76 67 4d 2c 2e 30 31 29 3b 0d 0a 72 65 61 63 74 4d 3d 28 | ;..avgM=max(avgM,.01);..reactM=( |
1a40 | 63 75 72 4d 4d 2f 61 76 67 4d 29 3b 0d 0a 72 65 61 63 74 4d 3d 61 62 6f 76 65 28 72 65 61 63 74 | curMM/avgM);..reactM=above(react |
1a60 | 4d 2c 30 29 2a 72 65 61 63 74 4d 3b 0d 0a 63 75 72 4d 4d 3d 30 3b 0d 0a 6f 6e 65 4d 3d 6f 6e 65 | M,0)*reactM;..curMM=0;..oneM=one |
1a80 | 4d 2d 2e 30 30 30 31 3b 0d 0a 74 77 6f 4d 3d 74 77 6f 4d 2d 2e 30 30 31 3b 0d 0a 74 68 72 65 65 | M-.0001;..twoM=twoM-.001;..three |
1aa0 | 4d 3d 74 68 72 65 65 4d 2d 2e 30 31 3b 0d 0a 0d 0a 61 76 67 48 3d 28 6f 6e 65 48 2b 74 77 6f 48 | M=threeM-.01;....avgH=(oneH+twoH |
1ac0 | 2b 74 68 72 65 65 48 29 2f 33 3b 0d 0a 61 76 67 48 3d 6d 61 78 28 61 76 67 48 2c 2e 30 31 29 3b | +threeH)/3;..avgH=max(avgH,.01); |
1ae0 | 0d 0a 72 65 61 63 74 48 3d 28 63 75 72 4d 48 2f 61 76 67 48 29 3b 0d 0a 72 65 61 63 74 48 3d 61 | ..reactH=(curMH/avgH);..reactH=a |
1b00 | 62 6f 76 65 28 72 65 61 63 74 48 2c 2e 32 29 2a 72 65 61 63 74 48 3b 0d 0a 63 75 72 4d 48 3d 30 | bove(reactH,.2)*reactH;..curMH=0 |
1b20 | 3b 0d 0a 6f 6e 65 48 3d 6f 6e 65 48 2d 2e 30 30 30 31 3b 0d 0a 74 77 6f 48 3d 74 77 6f 48 2d 2e | ;..oneH=oneH-.0001;..twoH=twoH-. |
1b40 | 30 30 31 3b 0d 0a 74 68 72 65 65 48 3d 74 68 72 65 65 48 2d 2e 30 31 3b 0d 0a 72 65 67 33 30 3d | 001;..threeH=threeH-.01;..reg30= |
1b60 | 72 65 61 63 74 4c 3b 0d 0a 72 65 67 33 31 3d 72 65 61 63 74 4d 3b 0d 0a 72 65 67 33 32 3d 72 65 | reactL;..reg31=reactM;..reg32=re |
1b80 | 61 63 74 48 3b 00 00 00 00 00 e5 00 00 00 2f 2f 20 63 61 6c 63 75 6c 61 74 65 73 20 73 6f 6d 65 | actH;.........//.calculates.some |
1ba0 | 20 77 65 69 72 64 20 77 61 76 65 20 61 76 65 72 61 67 65 73 3b 29 20 2b 20 61 20 6c 69 74 6c 65 | .weird.wave.averages;).+.a.litle |
1bc0 | 20 67 6c 6f 62 61 6c 20 73 68 69 74 0d 0a 6e 3d 35 30 3b 0d 0a 61 76 67 48 3d 2e 31 3b 0d 0a 61 | .global.shit..n=50;..avgH=.1;..a |
1be0 | 76 67 4c 3d 2e 31 3b 0d 0a 61 76 67 4d 3d 2e 31 3b 0d 0a 72 65 67 30 30 3d 31 3b 0d 0a 6c 6f 6f | vgL=.1;..avgM=.1;..reg00=1;..loo |
1c00 | 70 28 36 2c 61 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 2e 37 29 2b 61 | p(6,assign(gmegabuf(index),.7)+a |
1c20 | 73 73 69 67 6e 28 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 31 29 2b 61 73 73 69 67 | ssign(gmegabuf(index+1),1)+assig |
1c40 | 6e 28 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 31 30 30 29 2b 61 73 73 69 67 6e 28 | n(gmegabuf(index+2),100)+assign( |
1c60 | 69 6e 64 65 78 2c 28 69 6e 64 65 78 2b 33 29 29 29 3b 00 02 00 00 00 01 00 00 00 ff ff ff 00 00 | index,(index+3)));.............. |
1c80 | 00 00 00 fe ff ff ff 2c 01 00 00 83 03 00 01 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 | .......,.......$................ |
1ca0 | 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 | .................@..AVS.2.8+.Eff |
1cc0 | 65 63 74 20 4c 69 73 74 20 43 6f 6e 66 69 67 00 00 00 00 00 2e 00 00 00 01 00 00 00 13 00 00 00 | ect.List.Config................. |
1ce0 | 2f 2f 61 6c 70 68 61 20 67 72 61 64 69 65 6e 74 0d 0a 00 0f 00 00 00 65 6e 61 62 6c 65 64 3d 72 | //alpha.gradient.......enabled=r |
1d00 | 65 67 30 30 3b 00 24 00 00 00 5b 00 00 00 01 20 00 00 00 78 3d 30 3b 0d 0a 79 3d 69 2a 32 2d 31 | eg00;.$...[........x=0;..y=i*2-1 |
1d20 | 3b 0d 0a 72 65 64 3d 70 6f 77 28 69 2c 31 29 3b 0d 0a 00 14 00 00 00 74 3d 74 2d 30 2e 30 35 3b | ;..red=pow(i,1);.......t=t-0.05; |
1d40 | 0d 0a 72 65 67 30 30 3d 30 3b 00 00 00 00 00 06 00 00 00 6e 3d 38 30 3b 00 02 00 00 00 01 00 00 | ..reg00=0;.........n=80;........ |
1d60 | 00 00 00 00 00 01 00 00 00 0f 00 00 00 22 00 00 00 ff 7f 00 00 01 05 00 00 00 78 3d 30 3b 00 00 | ............."............x=0;.. |
1d80 | 00 00 00 00 00 00 00 01 00 00 00 01 00 00 00 00 00 00 00 25 00 00 00 04 00 00 00 01 00 00 00 12 | ...................%............ |
1da0 | 00 00 00 10 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 fe ff ff ff 66 06 00 00 80 | ...........................f.... |
1dc0 | 00 00 00 24 80 00 00 00 80 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ...$............................ |
1de0 | 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 20 43 6f 6e | .....@..AVS.2.8+.Effect.List.Con |
1e00 | 66 69 67 00 00 00 00 00 16 00 00 00 00 00 00 00 0a 00 00 00 2f 2f 74 65 78 74 75 72 65 00 00 00 | fig.................//texture... |
1e20 | 00 00 28 00 00 00 04 00 00 00 02 00 0f 80 24 00 00 00 de 00 00 00 01 4a 00 00 00 79 3d 2e 39 3b | ..(...........$........J...y=.9; |
1e40 | 0d 0a 78 3d 69 2a 2e 35 2d 2e 35 3b 0d 0a 73 6b 69 70 3d 62 6e 6f 74 28 62 6f 72 28 65 71 75 61 | ..x=i*.5-.5;..skip=bnot(bor(equa |
1e60 | 6c 28 63 2c 73 77 31 29 2c 65 71 75 61 6c 28 63 2c 73 77 32 29 29 29 3b 0d 0a 63 3d 63 2b 31 3b | l(c,sw1),equal(c,sw2)));..c=c+1; |
1e80 | 0d 0a 0d 0a 00 4f 00 00 00 63 3d 30 3b 0d 0a 0d 0a 73 77 31 3d 72 61 6e 64 28 36 29 3b 0d 0a 73 | .....O...c=0;....sw1=rand(6);..s |
1ea0 | 77 32 3d 72 61 6e 64 28 36 29 3b 0d 0a 0d 0a 72 65 64 3d 72 65 67 33 30 2a 62 72 69 3b 0d 0a 62 | w2=rand(6);....red=reg30*bri;..b |
1ec0 | 6c 75 65 3d 72 65 64 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 2a 2e 39 3b 00 03 00 00 00 0d 0a 00 21 | lue=red;..green=red*.9;........! |
1ee0 | 00 00 00 6e 3d 36 3b 62 72 69 3d 2e 37 3b 2f 2f 6c 6f 77 0d 0a 72 73 3d 6e 2d 31 3b 6d 69 6e 69 | ...n=6;bri=.7;//low..rs=n-1;mini |
1f00 | 3d 31 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 24 00 00 00 48 01 00 00 01 74 00 00 | =1;.................$...H....t.. |
1f20 | 00 64 3d 63 25 32 3b 0d 0a 79 3d 2e 39 3b 0d 0a 78 3d 69 2a 32 2d 31 3b 0d 0a 73 6b 69 70 3d 62 | .d=c%2;..y=.9;..x=i*2-1;..skip=b |
1f40 | 6e 6f 74 28 62 6f 72 28 62 65 6c 6f 77 28 63 2c 73 77 31 2b 32 29 2a 61 62 6f 76 65 28 63 2c 73 | not(bor(below(c,sw1+2)*above(c,s |
1f60 | 77 31 2d 32 29 2c 62 65 6c 6f 77 28 63 2c 73 77 32 2b 32 29 2a 61 62 6f 76 65 28 63 2c 73 77 32 | w1-2),below(c,sw2+2)*above(c,sw2 |
1f80 | 2d 32 29 29 2a 64 29 3b 0d 0a 63 3d 63 2b 31 3b 0d 0a 0d 0a 00 8b 00 00 00 63 3d 30 3b 0d 0a 73 | -2))*d);..c=c+1;.........c=0;..s |
1fa0 | 77 3d 28 72 65 67 33 32 29 3b 0d 0a 73 77 31 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 30 29 2b 38 | w=(reg32);..sw1=if(sw,rand(40)+8 |
1fc0 | 31 2c 73 77 31 29 3b 0d 0a 73 77 32 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 30 29 2c 73 77 32 29 | 1,sw1);..sw2=if(sw,rand(40),sw2) |
1fe0 | 3b 0d 0a 0d 0a 62 6c 75 65 3d 72 65 67 33 32 2a 62 72 69 2b 61 62 6f 76 65 28 72 65 67 33 32 2c | ;....blue=reg32*bri+above(reg32, |
2000 | 2e 39 35 29 2a 2e 31 3b 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 39 3b 0d 0a 67 72 65 65 6e 3d 62 6c | .95)*.1;..red=blue*.9;..green=bl |
2020 | 75 65 3b 00 05 00 00 00 0d 0a 0d 0a 00 23 00 00 00 6e 3d 31 36 30 3b 62 72 69 3d 2e 30 35 3b 2f | ue;..........#...n=160;bri=.05;/ |
2040 | 2f 68 69 0d 0a 72 73 3d 6e 2d 31 3b 6d 69 6e 69 3d 31 3b 00 02 00 00 00 01 00 00 00 00 00 00 00 | /hi..rs=n-1;mini=1;............. |
2060 | 01 00 00 00 28 00 00 00 04 00 00 00 02 eb 0f 80 24 00 00 00 0b 01 00 00 01 2e 00 00 00 79 3d 2e | ....(...........$............y=. |
2080 | 39 3b 0d 0a 78 3d 69 2a 2e 35 3b 0d 0a 73 6b 69 70 3d 61 62 6f 76 65 28 69 2c 76 31 29 3b 0d 0a | 9;..x=i*.5;..skip=above(i,v1);.. |
20a0 | 63 3d 63 2b 31 3b 0d 0a 0d 0a 00 53 00 00 00 63 3d 30 3b 0d 0a 76 31 3d 6d 61 78 28 76 31 2d 2e | c=c+1;.....S...c=0;..v1=max(v1-. |
20c0 | 30 35 2c 67 65 74 6f 73 63 28 30 2c 30 2c 32 29 29 3b 0d 0a 62 6c 75 65 3d 62 72 69 2b 76 31 2a | 05,getosc(0,0,2));..blue=bri+v1* |
20e0 | 2e 35 3b 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 38 3b 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 2a 2e 39 | .5;..red=blue*.8;..green=blue*.9 |
2100 | 3b 00 4f 00 00 00 73 77 3d 62 6e 6f 74 28 72 65 67 33 32 29 2b 31 3b 0d 0a 73 77 31 3d 69 66 28 | ;.O...sw=bnot(reg32)+1;..sw1=if( |
2120 | 73 77 2c 72 61 6e 64 28 34 30 29 2b 38 31 2c 73 77 31 29 3b 0d 0a 73 77 32 3d 69 66 28 73 77 2c | sw,rand(40)+81,sw1);..sw2=if(sw, |
2140 | 72 61 6e 64 28 34 30 29 2c 73 77 32 29 3b 0d 0a 0d 0a 0d 0a 00 1a 00 00 00 6e 3d 32 30 3b 62 72 | rand(40),sw2);...........n=20;br |
2160 | 69 3d 2e 31 3b 2f 2f 68 69 0d 0a 72 73 3d 6e 2d 31 3b 00 04 00 00 00 01 00 00 00 00 00 00 00 01 | i=.1;//hi..rs=n-1;.............. |
2180 | 00 00 00 24 00 00 00 16 01 00 00 01 32 00 00 00 79 3d 2e 39 3b 0d 0a 78 3d 2d 69 2a 2e 35 2d 2e | ...$........2...y=.9;..x=-i*.5-. |
21a0 | 35 3b 0d 0a 73 6b 69 70 3d 61 62 6f 76 65 28 69 2c 76 31 29 3b 0d 0a 63 3d 63 2b 31 3b 0d 0a 0d | 5;..skip=above(i,v1);..c=c+1;... |
21c0 | 0a 00 53 00 00 00 63 3d 30 3b 0d 0a 76 31 3d 6d 61 78 28 76 31 2d 2e 30 35 2c 67 65 74 6f 73 63 | ..S...c=0;..v1=max(v1-.05,getosc |
21e0 | 28 30 2c 30 2c 31 29 29 3b 0d 0a 62 6c 75 65 3d 62 72 31 2b 76 31 2a 2e 35 3b 0d 0a 72 65 64 3d | (0,0,1));..blue=br1+v1*.5;..red= |
2200 | 62 6c 75 65 2a 2e 38 3b 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 2a 2e 39 3b 00 4f 00 00 00 73 77 3d | blue*.8;..green=blue*.9;.O...sw= |
2220 | 62 6e 6f 74 28 72 65 67 33 32 29 2b 31 3b 0d 0a 73 77 31 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 | bnot(reg32)+1;..sw1=if(sw,rand(4 |
2240 | 30 29 2b 38 31 2c 73 77 31 29 3b 0d 0a 73 77 32 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 30 29 2c | 0)+81,sw1);..sw2=if(sw,rand(40), |
2260 | 73 77 32 29 3b 0d 0a 0d 0a 0d 0a 00 21 00 00 00 6e 3d 32 30 3b 62 72 69 3d 2e 31 3b 2f 2f 68 69 | sw2);.......!...n=20;bri=.1;//hi |
2280 | 0d 0a 72 73 3d 6e 2d 31 3b 6d 69 6e 69 3d 31 3b 00 05 00 00 00 01 00 00 00 00 00 00 00 01 00 00 | ..rs=n-1;mini=1;................ |
22a0 | 00 24 00 00 00 35 01 00 00 01 36 00 00 00 79 3d 2e 39 3b 0d 0a 2f 2f 78 3d 28 73 49 29 2a 2e 32 | .$...5....6...y=.9;..//x=(sI)*.2 |
22c0 | 2b 69 2a 2e 30 31 2b 2e 32 35 3b 0d 0a 78 3d 2d 69 2a 2e 35 3b 0d 0a 0d 0a 63 3d 63 2b 31 3b 0d | +i*.01+.25;..x=-i*.5;....c=c+1;. |
22e0 | 0a 0d 0a 00 6e 00 00 00 63 3d 30 3b 0d 0a 73 69 3d 28 73 69 6e 28 67 65 74 74 69 6d 65 28 30 29 | ....n...c=0;..si=(sin(gettime(0) |
2300 | 2a 33 29 29 3b 0d 0a 0d 0a 76 31 3d 6d 61 78 28 76 31 2d 2e 30 35 2c 67 65 74 6f 73 63 28 30 2c | *3));....v1=max(v1-.05,getosc(0, |
2320 | 30 2c 31 29 29 3b 0d 0a 62 6c 75 65 3d 62 72 69 2b 76 31 2a 2e 35 3b 0d 0a 72 65 64 3d 62 6c 75 | 0,1));..blue=bri+v1*.5;..red=blu |
2340 | 65 2a 2e 37 3b 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 2a 2e 37 3b 00 4f 00 00 00 73 77 3d 62 6e 6f | e*.7;..green=blue*.7;.O...sw=bno |
2360 | 74 28 72 65 67 33 32 29 2b 31 3b 0d 0a 73 77 31 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 30 29 2b | t(reg32)+1;..sw1=if(sw,rand(40)+ |
2380 | 38 31 2c 73 77 31 29 3b 0d 0a 73 77 32 3d 69 66 28 73 77 2c 72 61 6e 64 28 34 30 29 2c 73 77 32 | 81,sw1);..sw2=if(sw,rand(40),sw2 |
23a0 | 29 3b 0d 0a 0d 0a 0d 0a 00 21 00 00 00 6e 3d 32 30 3b 62 72 69 3d 2e 32 3b 2f 2f 68 69 0d 0a 72 | );.......!...n=20;bri=.2;//hi..r |
23c0 | 73 3d 6e 2d 31 3b 6d 69 6e 69 3d 31 3b 00 05 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 0f 00 | s=n-1;mini=1;................... |
23e0 | 00 00 3f 00 00 00 ff 7f 00 00 01 22 00 00 00 72 65 67 35 35 3d 32 2f 73 68 3b 0d 0a 79 3d 79 2b | ..?........"...reg55=2/sh;..y=y+ |
2400 | 28 72 65 67 35 35 29 2a 32 3b 0d 0a 78 3d 78 3b 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 | (reg55)*2;..x=x;................ |
2420 | 00 00 00 00 00 0f 00 00 00 32 01 00 00 ff 7f 00 00 01 15 01 00 00 2f 2f 72 61 79 74 72 61 63 65 | .........2............//raytrace |
2440 | 20 74 75 6e 65 6c 0d 0a 64 78 31 3d 69 66 28 78 2c 78 2c 2e 30 30 30 30 31 29 3b 0d 0a 64 79 31 | .tunel..dx1=if(x,x,.00001);..dy1 |
2460 | 3d 69 66 28 79 2c 79 2c 2e 30 30 30 30 31 29 2f 72 65 67 39 39 3b 0d 0a 6b 79 3d 61 62 73 28 31 | =if(y,y,.00001)/reg99;..ky=abs(1 |
2480 | 2f 28 64 79 31 29 29 3b 0d 0a 6b 78 3d 61 62 73 28 31 2f 28 64 78 31 29 29 3b 0d 0a 6b 3d 6d 69 | /(dy1));..kx=abs(1/(dx1));..k=mi |
24a0 | 6e 28 6b 78 2c 6b 79 29 3b 0d 0a 64 78 3d 64 78 31 2a 6b 3b 0d 0a 64 79 3d 64 79 31 2a 6b 3b 0d | n(kx,ky);..dx=dx1*k;..dy=dy1*k;. |
24c0 | 0a 6b 78 3d 65 71 75 61 6c 28 6b 2c 6b 78 29 3b 0d 0a 6b 79 3d 65 71 75 61 6c 28 6b 2c 6b 79 29 | .kx=equal(k,kx);..ky=equal(k,ky) |
24e0 | 3b 0d 0a 78 3d 69 66 28 6b 78 2c 69 66 28 61 62 6f 76 65 28 64 78 31 2c 30 29 2c 64 79 2a 2e 32 | ;..x=if(kx,if(above(dx1,0),dy*.2 |
2500 | 35 2d 2e 37 35 2c 2d 64 79 2a 2e 32 35 2b 2e 32 35 29 2c 69 66 28 61 62 6f 76 65 28 64 79 31 2c | 5-.75,-dy*.25+.25),if(above(dy1, |
2520 | 30 29 2c 2d 64 78 2a 2e 32 35 2d 2e 32 35 2c 64 78 2a 2e 32 34 2b 2e 37 35 29 29 3b 0d 0a 79 3d | 0),-dx*.25-.25,dx*.24+.75));..y= |
2540 | 6b 2a 32 2a 2e 30 31 3b 0d 0a 00 00 00 00 00 00 00 00 00 01 00 00 00 01 00 00 00 01 00 00 00 28 | k*2*.01;.......................( |
2560 | 00 00 00 04 00 00 00 02 00 01 80 24 00 00 00 5c 05 00 00 01 8a 00 00 00 0d 0a 6c 69 6e 65 3d 69 | ...........$...\..........line=i |
2580 | 2a 32 2d 31 3b 20 0d 0a 78 31 3d 69 66 28 68 77 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 | *2-1;...x1=if(hw,gmegabuf(index) |
25a0 | 2c 6c 69 6e 65 29 3b 20 0d 0a 79 31 3d 69 66 28 68 77 2c 6c 69 6e 65 2c 67 6d 65 67 61 62 75 66 | ,line);...y1=if(hw,line,gmegabuf |
25c0 | 28 69 6e 64 65 78 29 29 3b 20 0d 0a 7a 31 3d 6d 7a 3b 0d 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 | (index));...z1=mz;..z=1/(1+z1/2) |
25e0 | 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 39 39 3b 0d 0a 63 3d 63 2b 31 | ;..x=x1*z;..y=y1*z*reg99;..c=c+1 |
2600 | 3b 00 a1 04 00 00 69 66 28 62 61 6e 64 28 61 62 6f 76 65 28 72 65 67 37 38 2c 32 30 29 2c 62 61 | ;.....if(band(above(reg78,20),ba |
2620 | 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 30 29 2c 62 29 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 0d | nd(below(mz,0),b)),............. |
2640 | 0a 20 61 73 73 69 67 6e 28 20 69 6e 64 65 78 2c 72 65 67 31 31 20 20 20 20 20 20 20 20 20 20 20 | ..assign(.index,reg11........... |
2660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2680 | 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 68 77 2c 72 61 6e 64 28 32 29 20 20 20 20 | ..)+......assign(.hw,rand(2).... |
26a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
26c0 | 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 | ...........)+.......assign(.gmeg |
26e0 | 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 68 77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | abuf(index+1),hw................ |
2700 | 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 | ............)+.......assign(.gme |
2720 | 67 61 62 75 66 28 69 6e 64 65 78 29 2c 28 72 61 6e 64 28 38 29 2d 34 29 2a 2e 32 2b 2e 31 32 35 | gabuf(index),(rand(8)-4)*.2+.125 |
2740 | 20 20 20 20 20 20 20 20 29 2b 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 | ........)+....assign(.gmegabuf(i |
2760 | 6e 64 65 78 2b 32 29 2c 6d 69 6e 28 72 65 67 37 38 2c 31 30 30 29 20 20 20 20 20 20 20 20 20 20 | ndex+2),min(reg78,100).......... |
2780 | 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 37 38 2c 30 20 20 20 20 20 20 20 20 | )+.......assign(.reg78,0........ |
27a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
27c0 | 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 31 | ...........)+.......assign(.mz,1 |
27e0 | 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 00.............................. |
2800 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 | ......................)+......as |
2820 | 73 69 67 6e 28 20 73 74 61 72 74 2c 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | sign(.start,1................... |
2840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2860 | 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 31 31 2c 20 28 72 65 67 31 31 | ..)+.......assign(.reg11,.(reg11 |
2880 | 2b 33 29 25 31 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | +3)%18.......................... |
28a0 | 20 20 20 20 20 29 2b 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 77 69 64 2c 28 72 61 6e 64 | .....)+........assign(.wid,(rand |
28c0 | 28 33 35 29 2b 31 35 29 2a 72 65 67 39 38 2a 2e 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (35)+15)*reg98*.7............... |
28e0 | 20 20 20 20 20 20 20 29 2c 20 20 20 20 20 0d 0a 2f 2f 65 6c 73 65 3a 20 0d 0a 61 73 73 69 67 6e | .......),.......//else:...assign |
2900 | 28 20 6d 7a 2c 6d 61 78 28 2d 33 2c 6d 7a 2d 72 65 67 35 35 2a 32 30 30 29 20 20 20 20 20 20 20 | (.mz,max(-3,mz-reg55*200)....... |
2920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 20 20 20 20 0d 0a 29 3b 20 20 20 20 20 20 20 | ................)......);....... |
2940 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a | ................................ |
2960 | 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 72 65 67 38 33 29 2c 73 74 61 72 74 29 2c 20 | if(band(below(mz,reg83),start),. |
2980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
29a0 | 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 72 65 67 31 32 2c 28 69 6e 64 65 78 2b 33 29 25 31 38 29 | ......assign(reg12,(index+3)%18) |
29c0 | 2b 61 73 73 69 67 6e 28 73 74 61 72 74 2c 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | +assign(start,0)................ |
29e0 | 20 20 20 20 20 20 20 20 20 20 0d 0a 2c 30 29 3b 0d 0a 6e 3d 61 62 6f 76 65 28 6d 7a 2c 2d 31 29 | ............,0);..n=above(mz,-1) |
2a00 | 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | *2;............................. |
2a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 62 6c 75 65 3d 31 2d 6d 7a 2a | ......................blue=1-mz* |
2a40 | 2e 30 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .01;............................ |
2a60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 67 72 65 65 6e | ...........................green |
2a80 | 3d 62 6c 75 65 3b 20 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 37 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d | =blue;...red=blue*.7;..linesize= |
2aa0 | 77 69 64 2a 7a 3b 00 00 00 00 00 10 00 00 00 2f 2f 20 76 76 20 6f 62 73 74 61 63 6c 65 73 00 02 | wid*z;.........//.vv.obstacles.. |
2ac0 | 00 00 00 01 00 00 00 80 80 00 00 01 00 00 00 24 00 00 00 5d 05 00 00 01 8a 00 00 00 0d 0a 6c 69 | ...............$...]..........li |
2ae0 | 6e 65 3d 69 2a 32 2d 31 3b 20 0d 0a 78 31 3d 69 66 28 68 77 2c 67 6d 65 67 61 62 75 66 28 69 6e | ne=i*2-1;...x1=if(hw,gmegabuf(in |
2b00 | 64 65 78 29 2c 6c 69 6e 65 29 3b 20 0d 0a 79 31 3d 69 66 28 68 77 2c 6c 69 6e 65 2c 67 6d 65 67 | dex),line);...y1=if(hw,line,gmeg |
2b20 | 61 62 75 66 28 69 6e 64 65 78 29 29 3b 20 0d 0a 7a 31 3d 6d 7a 3b 0d 0a 7a 3d 31 2f 28 31 2b 7a | abuf(index));...z1=mz;..z=1/(1+z |
2b40 | 31 2f 32 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 39 39 3b 0d 0a 63 | 1/2);..x=x1*z;..y=y1*z*reg99;..c |
2b60 | 3d 63 2b 31 3b 00 a2 04 00 00 69 66 28 62 61 6e 64 28 61 62 6f 76 65 28 72 65 67 37 38 2c 32 30 | =c+1;.....if(band(above(reg78,20 |
2b80 | 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 30 29 2c 62 29 29 2c 20 20 20 20 20 20 20 20 20 | ),band(below(mz,0),b)),......... |
2ba0 | 20 20 20 0d 0a 20 61 73 73 69 67 6e 28 20 69 6e 64 65 78 2c 72 65 67 31 31 20 20 20 20 20 20 20 | ......assign(.index,reg11....... |
2bc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2be0 | 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 68 77 2c 72 61 6e 64 28 32 29 | ......)+......assign(.hw,rand(2) |
2c00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 | ...............)+.......assign(. |
2c40 | 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 68 77 20 20 20 20 20 20 20 20 20 20 20 20 | gmegabuf(index+1),hw............ |
2c60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 | ................)+.......assign( |
2c80 | 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 69 66 28 68 77 2c 72 65 67 38 30 2c 72 65 67 | .gmegabuf(index),if(hw,reg80,reg |
2ca0 | 38 31 29 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 | 81).......)+.......assign(.gmega |
2cc0 | 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 6d 69 6e 28 72 65 67 37 38 2c 31 30 30 29 20 20 20 20 20 | buf(index+2),min(reg78,100)..... |
2ce0 | 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 37 38 2c 30 20 20 20 | .....)+.......assign(.reg78,0... |
2d00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 | ................)+.......assign( |
2d40 | 20 6d 7a 2c 31 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .mz,100......................... |
2d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 | ...........................)+... |
2d80 | 20 0d 0a 61 73 73 69 67 6e 28 20 73 74 61 72 74 2c 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...assign(.start,1.............. |
2da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2dc0 | 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 31 31 2c 20 28 | .......)+.......assign(.reg11,.( |
2de0 | 72 65 67 31 31 2b 33 29 25 31 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | reg11+3)%18..................... |
2e00 | 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 77 69 64 2c | ..........)+........assign(.wid, |
2e20 | 28 72 61 6e 64 28 33 35 29 2b 31 35 29 2a 72 65 67 39 38 2a 2e 37 20 20 20 20 20 20 20 20 20 20 | (rand(35)+15)*reg98*.7.......... |
2e40 | 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 20 20 20 20 20 0d 0a 2f 2f 65 6c 73 65 3a 20 0d 0a 61 | ............),.......//else:...a |
2e60 | 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 28 2d 33 2c 6d 7a 2d 72 65 67 35 35 2a 32 30 30 29 20 20 | ssign(.mz,max(-3,mz-reg55*200).. |
2e80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 20 20 20 20 0d 0a 29 3b 20 20 | .....................)......);.. |
2ea0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
2ec0 | 20 20 20 0d 0a 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 72 65 67 38 33 29 2c 73 74 61 | .....if(band(below(mz,reg83),sta |
2ee0 | 72 74 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rt),............................ |
2f00 | 20 20 20 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 72 65 67 31 32 2c 28 69 6e 64 65 78 2b 33 | ...........assign(reg12,(index+3 |
2f20 | 29 25 31 38 29 2b 61 73 73 69 67 6e 28 73 74 61 72 74 2c 30 29 20 20 20 20 20 20 20 20 20 20 20 | )%18)+assign(start,0)........... |
2f40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 2c 30 29 3b 0d 0a 6e 3d 61 62 6f 76 65 28 6d | .................,0);..n=above(m |
2f60 | 7a 2c 2d 31 29 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | z,-1)*2;........................ |
2f80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 62 6c 75 65 3d | ...........................blue= |
2fa0 | 31 2d 6d 7a 2a 2e 30 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 1-mz*.01;....................... |
2fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a | ................................ |
2fe0 | 67 72 65 65 6e 3d 62 6c 75 65 3b 20 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 37 3b 0d 0a 6c 69 6e 65 | green=blue;...red=blue*.7;..line |
3000 | 73 69 7a 65 3d 77 69 64 2a 7a 3b 00 00 00 00 00 10 00 00 00 2f 2f 20 76 76 20 6f 62 73 74 61 63 | size=wid*z;.........//.vv.obstac |
3020 | 6c 65 73 00 02 00 00 00 01 00 00 00 80 80 00 00 01 00 00 00 24 00 00 00 5c 05 00 00 01 8a 00 00 | les.................$...\....... |
3040 | 00 0d 0a 6c 69 6e 65 3d 69 2a 32 2d 31 3b 20 0d 0a 78 31 3d 69 66 28 68 77 2c 67 6d 65 67 61 62 | ...line=i*2-1;...x1=if(hw,gmegab |
3060 | 75 66 28 69 6e 64 65 78 29 2c 6c 69 6e 65 29 3b 20 0d 0a 79 31 3d 69 66 28 68 77 2c 6c 69 6e 65 | uf(index),line);...y1=if(hw,line |
3080 | 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 29 3b 20 0d 0a 7a 31 3d 6d 7a 3b 0d 0a 7a 3d 31 | ,gmegabuf(index));...z1=mz;..z=1 |
30a0 | 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 39 | /(1+z1/2);..x=x1*z;..y=y1*z*reg9 |
30c0 | 39 3b 0d 0a 63 3d 63 2b 31 3b 00 a1 04 00 00 69 66 28 62 61 6e 64 28 61 62 6f 76 65 28 72 65 67 | 9;..c=c+1;.....if(band(above(reg |
30e0 | 37 38 2c 32 30 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 30 29 2c 62 29 29 2c 20 20 20 20 | 78,20),band(below(mz,0),b)),.... |
3100 | 20 20 20 20 20 20 20 20 0d 0a 20 61 73 73 69 67 6e 28 20 69 6e 64 65 78 2c 72 65 67 31 31 20 20 | ...........assign(.index,reg11.. |
3120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3140 | 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 68 77 2c 72 61 | ...........)+......assign(.hw,ra |
3160 | 6e 64 28 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | nd(2)........................... |
3180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 | ....................)+.......ass |
31a0 | 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 68 77 20 20 20 20 20 20 20 | ign(.gmegabuf(index+1),hw....... |
31c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 | .....................)+.......as |
31e0 | 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 28 72 61 6e 64 28 38 29 2d 34 | sign(.gmegabuf(index),(rand(8)-4 |
3200 | 29 2a 2e 32 2b 2e 31 32 35 20 20 20 20 20 20 20 20 29 2b 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 | )*.2+.125........)+....assign(.g |
3220 | 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 6d 69 6e 28 72 65 67 37 38 2c 31 30 30 29 20 | megabuf(index+2),min(reg78,100). |
3240 | 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 37 38 2c | .........)+.......assign(.reg78, |
3260 | 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 0............................... |
3280 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 | ....................)+.......ass |
32a0 | 69 67 6e 28 20 6d 7a 2c 31 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ign(.mz,100..................... |
32c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 | ...............................) |
32e0 | 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 73 74 61 72 74 2c 31 20 20 20 20 20 20 20 20 20 20 | +......assign(.start,1.......... |
3300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3320 | 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 31 | ...........)+.......assign(.reg1 |
3340 | 31 2c 20 28 72 65 67 31 31 2b 33 29 25 31 38 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 1,.(reg11+3)%18................. |
3360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 | ..............)+........assign(. |
3380 | 77 69 64 2c 28 72 61 6e 64 28 33 35 29 2b 31 35 29 2a 72 65 67 39 38 2a 2e 37 20 20 20 20 20 20 | wid,(rand(35)+15)*reg98*.7...... |
33a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 20 20 20 20 20 0d 0a 2f 2f 65 6c 73 65 3a | ................),.......//else: |
33c0 | 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 28 2d 33 2c 6d 7a 2d 72 65 67 35 35 2a 32 30 | ...assign(.mz,max(-3,mz-reg55*20 |
33e0 | 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 20 20 20 20 0d 0a | 0).......................)...... |
3400 | 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | );.............................. |
3420 | 20 20 20 20 20 20 20 0d 0a 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 72 65 67 38 33 29 | .........if(band(below(mz,reg83) |
3440 | 2c 73 74 61 72 74 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ,start),........................ |
3460 | 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 72 65 67 31 32 2c 28 69 6e 64 | ...............assign(reg12,(ind |
3480 | 65 78 2b 33 29 25 31 38 29 2b 61 73 73 69 67 6e 28 73 74 61 72 74 2c 30 29 20 20 20 20 20 20 20 | ex+3)%18)+assign(start,0)....... |
34a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 2c 30 29 3b 0d 0a 6e 3d 61 62 6f | .....................,0);..n=abo |
34c0 | 76 65 28 6d 7a 2c 2d 31 29 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ve(mz,-1)*2;.................... |
34e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 62 | ...............................b |
3500 | 6c 75 65 3d 31 2d 6d 7a 2a 2e 30 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | lue=1-mz*.01;................... |
3520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3540 | 20 20 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 3b 20 0d 0a 72 65 64 3d 62 6c 75 65 2a 2e 37 3b 0d 0a | ....green=blue;...red=blue*.7;.. |
3560 | 6c 69 6e 65 73 69 7a 65 3d 77 69 64 2a 7a 3b 00 00 00 00 00 10 00 00 00 2f 2f 20 76 76 20 6f 62 | linesize=wid*z;.........//.vv.ob |
3580 | 73 74 61 63 6c 65 73 00 02 00 00 00 01 00 00 00 80 80 00 00 01 00 00 00 24 00 00 00 5d 05 00 00 | stacles.................$...]... |
35a0 | 01 8a 00 00 00 0d 0a 6c 69 6e 65 3d 69 2a 32 2d 31 3b 20 0d 0a 78 31 3d 69 66 28 68 77 2c 67 6d | .......line=i*2-1;...x1=if(hw,gm |
35c0 | 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 6c 69 6e 65 29 3b 20 0d 0a 79 31 3d 69 66 28 68 77 2c | egabuf(index),line);...y1=if(hw, |
35e0 | 6c 69 6e 65 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 29 3b 20 0d 0a 7a 31 3d 6d 7a 3b 0d | line,gmegabuf(index));...z1=mz;. |
3600 | 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a | .z=1/(1+z1/2);..x=x1*z;..y=y1*z* |
3620 | 72 65 67 39 39 3b 0d 0a 63 3d 63 2b 31 3b 00 a2 04 00 00 69 66 28 62 61 6e 64 28 61 62 6f 76 65 | reg99;..c=c+1;.....if(band(above |
3640 | 28 72 65 67 37 38 2c 32 30 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 30 29 2c 62 29 29 2c | (reg78,20),band(below(mz,0),b)), |
3660 | 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 20 61 73 73 69 67 6e 28 20 69 6e 64 65 78 2c 72 65 67 | ...............assign(.index,reg |
3680 | 31 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | 11.............................. |
36a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 68 | ...............)+......assign(.h |
36c0 | 77 2c 72 61 6e 64 28 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | w,rand(2)....................... |
36e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d | ........................)+...... |
3700 | 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c 68 77 20 20 20 | .assign(.gmegabuf(index+1),hw... |
3720 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 | .........................)+..... |
3740 | 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 69 66 28 68 77 2c | ..assign(.gmegabuf(index),if(hw, |
3760 | 72 65 67 38 30 2c 72 65 67 38 31 29 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 | reg80,reg81).......)+.......assi |
3780 | 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 6d 69 6e 28 72 65 67 37 38 2c | gn(.gmegabuf(index+2),min(reg78, |
37a0 | 31 30 30 29 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 72 | 100)..........)+.......assign(.r |
37c0 | 65 67 37 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | eg78,0.......................... |
37e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 | .........................)+..... |
3800 | 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 31 30 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..assign(.mz,100................ |
3820 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3840 | 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 73 74 61 72 74 2c 31 20 20 20 20 20 | ....)+......assign(.start,1..... |
3860 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3880 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 | ................)+.......assign( |
38a0 | 20 72 65 67 31 31 2c 20 28 72 65 67 31 31 2b 33 29 25 31 38 20 20 20 20 20 20 20 20 20 20 20 20 | .reg11,.(reg11+3)%18............ |
38c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 20 0d 0a 61 73 73 | ...................)+........ass |
38e0 | 69 67 6e 28 20 77 69 64 2c 28 72 61 6e 64 28 33 35 29 2b 31 35 29 2a 72 65 67 39 38 2a 2e 37 20 | ign(.wid,(rand(35)+15)*reg98*.7. |
3900 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 20 20 20 20 20 0d 0a 2f 2f | .....................),.......// |
3920 | 65 6c 73 65 3a 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 28 2d 33 2c 6d 7a 2d 72 65 67 | else:...assign(.mz,max(-3,mz-reg |
3940 | 35 35 2a 32 30 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 20 | 55*200).......................). |
3960 | 20 20 20 0d 0a 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .....);......................... |
3980 | 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 72 | ..............if(band(below(mz,r |
39a0 | 65 67 38 33 29 2c 73 74 61 72 74 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | eg83),start),................... |
39c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 72 65 67 31 32 | ....................assign(reg12 |
39e0 | 2c 28 69 6e 64 65 78 2b 33 29 25 31 38 29 2b 61 73 73 69 67 6e 28 73 74 61 72 74 2c 30 29 20 20 | ,(index+3)%18)+assign(start,0).. |
3a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 2c 30 29 3b 0d 0a | ..........................,0);.. |
3a20 | 6e 3d 61 62 6f 76 65 28 6d 7a 2c 2d 31 29 2a 32 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | n=above(mz,-1)*2;............... |
3a40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3a60 | 20 20 0d 0a 62 6c 75 65 3d 31 2d 6d 7a 2a 2e 30 31 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ....blue=1-mz*.01;.............. |
3a80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3aa0 | 20 20 20 20 20 20 20 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 3b 20 0d 0a 72 65 64 3d 62 6c 75 65 2a | .........green=blue;...red=blue* |
3ac0 | 2e 37 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 77 69 64 2a 7a 3b 00 00 00 00 00 10 00 00 00 2f 2f 20 | .7;..linesize=wid*z;.........//. |
3ae0 | 76 76 20 6f 62 73 74 61 63 6c 65 73 00 02 00 00 00 01 00 00 00 80 80 00 00 01 00 00 00 24 00 00 | vv.obstacles.................$.. |
3b00 | 00 5d 05 00 00 01 8a 00 00 00 0d 0a 6c 69 6e 65 3d 69 2a 32 2d 31 3b 20 0d 0a 78 31 3d 69 66 28 | .]..........line=i*2-1;...x1=if( |
3b20 | 68 77 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 6c 69 6e 65 29 3b 20 0d 0a 79 31 3d 69 | hw,gmegabuf(index),line);...y1=i |
3b40 | 66 28 68 77 2c 6c 69 6e 65 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 29 3b 20 0d 0a 7a 31 | f(hw,line,gmegabuf(index));...z1 |
3b60 | 3d 6d 7a 3b 0d 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d | =mz;..z=1/(1+z1/2);..x=x1*z;..y= |
3b80 | 79 31 2a 7a 2a 72 65 67 39 39 3b 0d 0a 63 3d 63 2b 31 3b 00 a2 04 00 00 69 66 28 62 61 6e 64 28 | y1*z*reg99;..c=c+1;.....if(band( |
3ba0 | 61 62 6f 76 65 28 72 65 67 37 38 2c 32 30 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 6d 7a 2c 30 29 | above(reg78,20),band(below(mz,0) |
3bc0 | 2c 62 29 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 20 61 73 73 69 67 6e 28 20 69 6e 64 65 | ,b)),...............assign(.inde |
3be0 | 78 2c 72 65 67 31 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | x,reg11......................... |
3c00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 | ....................)+......assi |
3c20 | 67 6e 28 20 68 77 2c 72 61 6e 64 28 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | gn(.hw,rand(2).................. |
3c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 | .............................)+. |
3c60 | 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 31 29 2c | ......assign(.gmegabuf(index+1), |
3c80 | 68 77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b | hw............................)+ |
3ca0 | 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 69 | .......assign(.gmegabuf(index),i |
3cc0 | 66 28 68 77 2c 72 65 67 38 30 2c 72 65 67 38 31 29 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d | f(hw,reg80,reg81).......)+...... |
3ce0 | 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c 6d 69 6e 28 72 | .assign(.gmegabuf(index+2),min(r |
3d00 | 65 67 37 38 2c 31 30 30 29 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 | eg78,100)..........)+.......assi |
3d20 | 67 6e 28 20 72 65 67 37 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | gn(.reg78,0..................... |
3d40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b | ..............................)+ |
3d60 | 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 31 30 30 20 20 20 20 20 20 20 20 20 20 20 | .......assign(.mz,100........... |
3d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3da0 | 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 73 74 61 72 74 2c 31 | .........)+......assign(.start,1 |
3dc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 | .....................)+.......as |
3e00 | 73 69 67 6e 28 20 72 65 67 31 31 2c 20 28 72 65 67 31 31 2b 33 29 25 31 38 20 20 20 20 20 20 20 | sign(.reg11,.(reg11+3)%18....... |
3e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 20 | ........................)+...... |
3e40 | 0d 0a 61 73 73 69 67 6e 28 20 77 69 64 2c 28 72 61 6e 64 28 33 35 29 2b 31 35 29 2a 72 65 67 39 | ..assign(.wid,(rand(35)+15)*reg9 |
3e60 | 38 2a 2e 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2c 20 20 20 20 | 8*.7......................),.... |
3e80 | 20 0d 0a 2f 2f 65 6c 73 65 3a 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 28 2d 33 2c 6d | ...//else:...assign(.mz,max(-3,m |
3ea0 | 7a 2d 72 65 67 35 35 2a 32 30 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | z-reg55*200).................... |
3ec0 | 20 20 20 29 20 20 20 20 0d 0a 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...)......);.................... |
3ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 69 66 28 62 61 6e 64 28 62 65 6c 6f 77 | ...................if(band(below |
3f00 | 28 6d 7a 2c 72 65 67 38 33 29 2c 73 74 61 72 74 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (mz,reg83),start),.............. |
3f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 | .........................assign( |
3f40 | 72 65 67 31 32 2c 28 69 6e 64 65 78 2b 33 29 25 31 38 29 2b 61 73 73 69 67 6e 28 73 74 61 72 74 | reg12,(index+3)%18)+assign(start |
3f60 | 2c 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 2c | ,0)............................, |
3f80 | 30 29 3b 0d 0a 6e 3d 61 62 6f 76 65 28 6d 7a 2c 2d 31 29 2a 32 3b 20 20 20 20 20 20 20 20 20 20 | 0);..n=above(mz,-1)*2;.......... |
3fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
3fc0 | 20 20 20 20 20 20 20 0d 0a 62 6c 75 65 3d 31 2d 6d 7a 2a 2e 30 31 3b 20 20 20 20 20 20 20 20 20 | .........blue=1-mz*.01;......... |
3fe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
4000 | 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 3b 20 0d 0a 72 65 64 3d | ..............green=blue;...red= |
4020 | 62 6c 75 65 2a 2e 37 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 77 69 64 2a 7a 3b 00 00 00 00 00 10 00 | blue*.7;..linesize=wid*z;....... |
4040 | 00 00 2f 2f 20 76 76 20 6f 62 73 74 61 63 6c 65 73 00 02 00 00 00 01 00 00 00 80 80 00 00 01 00 | ..//.vv.obstacles............... |
4060 | 00 00 24 00 00 00 5d 05 00 00 01 8a 00 00 00 0d 0a 6c 69 6e 65 3d 69 2a 32 2d 31 3b 20 0d 0a 78 | ..$...]..........line=i*2-1;...x |
4080 | 31 3d 69 66 28 68 77 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 2c 6c 69 6e 65 29 3b 20 0d | 1=if(hw,gmegabuf(index),line);.. |
40a0 | 0a 79 31 3d 69 66 28 68 77 2c 6c 69 6e 65 2c 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 29 29 3b | .y1=if(hw,line,gmegabuf(index)); |
40c0 | 20 0d 0a 7a 31 3d 6d 7a 3b 0d 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 3d 78 31 2a 7a | ...z1=mz;..z=1/(1+z1/2);..x=x1*z |
40e0 | 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 39 39 3b 0d 0a 63 3d 63 2b 31 3b 00 a2 04 00 00 69 66 28 | ;..y=y1*z*reg99;..c=c+1;.....if( |
4100 | 62 61 6e 64 28 61 62 6f 76 65 28 72 65 67 37 38 2c 32 30 29 2c 62 61 6e 64 28 62 65 6c 6f 77 28 | band(above(reg78,20),band(below( |
4120 | 6d 7a 2c 30 29 2c 62 29 29 2c 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 20 61 73 73 69 67 6e 28 | mz,0),b)),...............assign( |
4140 | 20 69 6e 64 65 78 2c 72 65 67 31 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .index,reg11.................... |
4160 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d | .........................)+..... |
4180 | 0a 61 73 73 69 67 6e 28 20 68 77 2c 72 61 6e 64 28 32 29 20 20 20 20 20 20 20 20 20 20 20 20 20 | .assign(.hw,rand(2)............. |
41a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
41c0 | 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 | ..)+.......assign(.gmegabuf(inde |
41e0 | 78 2b 31 29 2c 68 77 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | x+1),hw......................... |
4200 | 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 | ...)+.......assign(.gmegabuf(ind |
4220 | 65 78 29 2c 69 66 28 68 77 2c 72 65 67 38 30 2c 72 65 67 38 31 29 20 20 20 20 20 20 20 29 2b 20 | ex),if(hw,reg80,reg81).......)+. |
4240 | 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 67 6d 65 67 61 62 75 66 28 69 6e 64 65 78 2b 32 29 2c | ......assign(.gmegabuf(index+2), |
4260 | 6d 69 6e 28 72 65 67 37 38 2c 31 30 30 29 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 20 0d | min(reg78,100)..........)+...... |
4280 | 0a 61 73 73 69 67 6e 28 20 72 65 67 37 38 2c 30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .assign(.reg78,0................ |
42a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
42c0 | 20 20 20 29 2b 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 31 30 30 20 20 20 20 20 20 | ...)+.......assign(.mz,100...... |
42e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
4300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 73 74 | ..............)+......assign(.st |
4320 | 61 72 74 2c 31 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | art,1........................... |
4340 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 20 20 20 | ..........................)+.... |
4360 | 20 0d 0a 61 73 73 69 67 6e 28 20 72 65 67 31 31 2c 20 28 72 65 67 31 31 2b 33 29 25 31 38 20 20 | ...assign(.reg11,.(reg11+3)%18.. |
4380 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 2b 20 | .............................)+. |
43a0 | 20 20 20 20 20 0d 0a 61 73 73 69 67 6e 28 20 77 69 64 2c 28 72 61 6e 64 28 33 35 29 2b 31 35 29 | .......assign(.wid,(rand(35)+15) |
43c0 | 2a 72 65 67 39 38 2a 2e 37 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 29 | *reg98*.7......................) |
43e0 | 2c 20 20 20 20 20 0d 0a 2f 2f 65 6c 73 65 3a 20 0d 0a 61 73 73 69 67 6e 28 20 6d 7a 2c 6d 61 78 | ,.......//else:...assign(.mz,max |
4400 | 28 2d 33 2c 6d 7a 2d 72 65 67 35 35 2a 32 30 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | (-3,mz-reg55*200)............... |
4420 | 20 20 20 20 20 20 20 20 29 20 20 20 20 0d 0a 29 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ........)......);............... |
4440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 69 66 28 62 61 6e 64 28 | ........................if(band( |
4460 | 62 65 6c 6f 77 28 6d 7a 2c 72 65 67 38 33 29 2c 73 74 61 72 74 29 2c 20 20 20 20 20 20 20 20 20 | below(mz,reg83),start),......... |
4480 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 61 73 | ..............................as |
44a0 | 73 69 67 6e 28 72 65 67 31 32 2c 28 69 6e 64 65 78 2b 33 29 25 31 38 29 2b 61 73 73 69 67 6e 28 | sign(reg12,(index+3)%18)+assign( |
44c0 | 73 74 61 72 74 2c 30 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | start,0)........................ |
44e0 | 20 20 0d 0a 2c 30 29 3b 0d 0a 6e 3d 61 62 6f 76 65 28 6d 7a 2c 2d 31 29 2a 32 3b 20 20 20 20 20 | ....,0);..n=above(mz,-1)*2;..... |
4500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
4520 | 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 62 6c 75 65 3d 31 2d 6d 7a 2a 2e 30 31 3b 20 20 20 20 | ..............blue=1-mz*.01;.... |
4540 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
4560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 0d 0a 67 72 65 65 6e 3d 62 6c 75 65 3b 20 0d | ...................green=blue;.. |
4580 | 0a 72 65 64 3d 62 6c 75 65 2a 2e 37 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 77 69 64 2a 7a 3b 00 00 | .red=blue*.7;..linesize=wid*z;.. |
45a0 | 00 00 00 10 00 00 00 2f 2f 20 76 76 20 6f 62 73 74 61 63 6c 65 73 00 02 00 00 00 01 00 00 00 80 | .......//.vv.obstacles.......... |
45c0 | 80 00 00 01 00 00 00 28 00 00 00 04 00 00 00 01 00 03 80 24 00 00 00 40 03 00 00 01 c1 00 00 00 | .......(...........$...@........ |
45e0 | 73 74 3d 63 25 32 3b 20 0d 0a 64 3d 69 66 28 62 6e 6f 74 28 73 74 29 2c 64 2d 70 69 78 2c 64 29 | st=c%2;...d=if(bnot(st),d-pix,d) |
4600 | 3b 0d 0a 78 31 3d 28 73 74 2a 2e 34 35 2d 2e 32 32 35 29 2a 69 2a 79 73 2b 6d 78 32 3b 20 0d 0a | ;..x1=(st*.45-.225)*i*ys+mx2;... |
4620 | 79 31 3d 31 3b 0d 0a 7a 31 3d 64 2b 72 65 67 38 33 2d 2e 31 35 3b 0d 0a 7a 3d 31 2f 28 31 2b 7a | y1=1;..z1=d+reg83-.15;..z=1/(1+z |
4640 | 31 2a 2e 35 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 39 39 3b 0d 0a | 1*.5);..x=x1*z;..y=y1*z*reg99;.. |
4660 | 72 65 67 39 37 3d 6d 69 6e 28 7a 31 2c 72 65 67 39 37 29 3b 0d 0a 72 65 64 3d 7a 2a 2e 30 31 33 | reg97=min(z1,reg97);..red=z*.013 |
4680 | 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 3b 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a 63 3d 63 2b 31 3b | ;..green=red;..blue=red;..c=c+1; |
46a0 | 00 fa 01 00 00 74 62 3d 74 3b 0d 0a 74 3d 67 65 74 74 69 6d 65 28 30 29 3b 0d 0a 66 72 3d 74 62 | .....tb=t;..t=gettime(0);..fr=tb |
46c0 | 2d 74 3b 0d 0a 63 3d 30 3b 0d 0a 79 73 3d 28 72 65 67 38 31 2b 31 29 2a 2e 35 2b 2e 32 3b 0d 0a | -t;..c=0;..ys=(reg81+1)*.5+.2;.. |
46e0 | 64 3d 2e 34 35 2a 79 73 3b 0d 0a 70 69 78 3d 32 2f 68 3b 0d 0a 6e 3d 64 2f 70 69 78 3b 0d 0a 69 | d=.45*ys;..pix=2/h;..n=d/pix;..i |
4700 | 66 28 62 65 6c 6f 77 28 61 62 73 28 69 66 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 2b 31 29 | f(below(abs(if(gmegabuf(reg12+1) |
4720 | 2c 6e 65 77 78 2c 6e 65 77 79 29 2d 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 29 2c 2e 37 29 | ,newx,newy)-gmegabuf(reg12)),.7) |
4740 | 2c 0d 0a 61 73 73 69 67 6e 28 69 66 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 2b 31 29 2c 6e | ,..assign(if(gmegabuf(reg12+1),n |
4760 | 65 77 78 2c 6e 65 77 79 29 2c 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 2d 2e 37 2a 73 69 67 | ewx,newy),gmegabuf(reg12)-.7*sig |
4780 | 6e 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 29 29 29 2b 0d 0a 61 73 73 69 67 6e 28 73 70 65 | n(gmegabuf(reg12)))+..assign(spe |
47a0 | 65 64 2c 28 31 2e 35 2f 28 67 6d 65 67 61 62 75 66 28 72 65 67 31 32 2b 32 29 2b 2e 30 32 29 29 | ed,(1.5/(gmegabuf(reg12+2)+.02)) |
47c0 | 29 0d 0a 2c 30 29 3b 0d 0a 72 65 67 31 34 3d 28 6e 65 77 78 2d 6d 78 29 2a 73 70 65 65 64 3b 0d | )..,0);..reg14=(newx-mx)*speed;. |
47e0 | 0a 72 65 67 31 35 3d 28 6e 65 77 79 2d 6d 79 29 2a 73 70 65 65 64 3b 0d 0a 6d 78 3d 6d 78 2b 72 | .reg15=(newy-my)*speed;..mx=mx+r |
4800 | 65 67 31 34 3b 0d 0a 6d 79 3d 6d 79 2b 72 65 67 31 35 3b 0d 0a 0d 0a 6d 78 32 3d 6d 78 2b 73 69 | eg14;..my=my+reg15;....mx2=mx+si |
4820 | 6e 28 74 2a 37 29 2a 2e 30 33 3b 0d 0a 6d 79 32 3d 6d 79 2b 73 69 6e 28 74 2a 35 29 2a 2e 30 33 | n(t*7)*.03;..my2=my+sin(t*5)*.03 |
4840 | 3b 0d 0a 74 31 3d 74 31 2b 67 65 74 3b 0d 0a 72 65 67 38 33 3d 73 69 6e 28 74 29 2a 32 2b 32 3b | ;..t1=t1+get;..reg83=sin(t)*2+2; |
4860 | 0d 0a 72 65 67 38 34 3d 31 2f 28 31 2b 72 65 67 38 33 2a 2e 35 29 3b 0d 0a 6c 69 6e 65 73 69 7a | ..reg84=1/(1+reg83*.5);..linesiz |
4880 | 65 3d 31 3b 0d 0a 72 65 67 38 30 3d 6d 78 32 3b 0d 0a 72 65 67 38 31 3d 6d 79 32 3b 0d 0a 00 2c | e=1;..reg80=mx2;..reg81=my2;..., |
48a0 | 00 00 00 67 65 74 3d 67 65 74 6f 73 63 28 30 2c 30 2c 30 29 2a 74 62 2a 2e 30 30 30 30 30 31 3b | ...get=getosc(0,0,0)*tb*.000001; |
48c0 | 0d 0a 72 65 67 39 39 3d 77 2f 68 3b 0d 0a 00 38 00 00 00 2f 2f 73 68 69 70 3b 0d 0a 0d 0a 73 70 | ..reg99=w/h;...8...//ship;....sp |
48e0 | 65 65 64 3d 2e 32 0d 0a 6d 78 3d 2e 35 3b 0d 0a 6d 79 3d 2e 33 3b 0d 0a 6e 65 77 78 3d 2e 32 3b | eed=.2..mx=.5;..my=.3;..newx=.2; |
4900 | 0d 0a 6e 65 77 79 3d 2e 37 3b 00 02 00 00 00 01 00 00 00 12 12 12 00 01 00 00 00 fe ff ff ff 7d | ..newy=.7;.....................} |
4920 | 03 00 00 80 00 01 0b 24 ff 00 00 00 23 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .......$....#................... |
4940 | 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 20 4c 69 73 74 | .........@..AVS.2.8+.Effect.List |
4960 | 20 43 6f 6e 66 69 67 00 00 00 00 00 28 00 00 00 01 00 00 00 0d 00 00 00 2f 2f 61 74 6d 6f 73 66 | .Config.....(...........//atmosf |
4980 | 68 65 72 65 00 0f 00 00 00 61 6c 70 68 61 6f 75 74 3d 72 65 67 34 36 00 12 00 00 00 10 00 00 00 | here.....alphaout=reg46......... |
49a0 | 01 00 00 00 00 00 00 00 02 00 00 00 80 00 00 00 88 71 6b 0a 43 6f 6c 6f 72 20 4d 61 70 00 00 00 | .................qk.Color.Map... |
49c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 c8 02 00 00 00 00 00 00 03 00 00 00 | ................................ |
49e0 | 01 00 00 00 00 00 01 01 01 00 00 00 02 00 00 00 70 09 92 0d 00 00 00 00 00 00 00 00 00 00 00 00 | ................p............... |
4a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4a20 | 00 00 00 00 01 00 00 00 02 00 00 00 48 09 92 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ............H................... |
4a40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4a60 | 01 00 00 00 02 00 00 00 20 09 92 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4a80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 | ................................ |
4aa0 | 02 00 00 00 c8 e5 90 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4ac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 02 00 00 00 | ................................ |
4ae0 | a0 e5 90 0d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4b00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 03 00 00 00 20 70 58 0d | .............................pX. |
4b20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4b40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 02 00 00 00 78 e5 90 0d 00 00 00 00 | ........................x....... |
4b60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4b80 | 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 03 00 00 00 a0 76 79 0d 00 00 00 00 00 00 00 00 | .....................vy......... |
4ba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4bc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 14 28 00 86 11 00 00 ff 00 00 00 a4 c1 ff 00 01 00 00 00 | ..............(................. |
4be0 | 00 00 00 00 2f 17 00 00 01 00 00 00 ff 00 00 00 dd ee ff 00 00 00 00 00 00 00 00 00 00 00 00 00 | ..../........................... |
4c00 | 00 00 00 00 ff 00 00 00 ff ff ff 00 01 00 00 00 00 00 00 00 ff 00 80 00 00 00 00 00 ff 00 00 00 | ................................ |
4c20 | ff ff dd 00 01 00 00 00 00 00 00 00 53 00 29 00 00 00 00 00 ff 00 00 00 d5 ff d5 00 08 74 00 00 | ............S.)..............t.. |
4c40 | 00 00 00 00 c6 63 00 00 00 00 00 00 bb 00 00 00 ff e6 cc 00 01 00 00 00 ff 00 00 00 d9 ec ff 00 | .....c.......................... |
4c60 | ac 40 00 00 00 00 00 00 ff 00 80 00 01 00 00 00 ff 00 00 00 ff d7 fa 00 95 1b 00 00 00 00 00 00 | .@.............................. |
4c80 | a0 00 00 00 0a 5f 00 00 87 00 00 00 ff 80 00 00 00 00 00 00 f4 00 00 00 ff b3 66 00 fe 42 00 00 | ....._....................f..B.. |
4ca0 | fe ff ff ff fb 0f 00 00 81 01 00 0d 24 80 00 00 00 80 00 00 00 00 00 00 00 01 00 00 00 00 00 00 | ............$................... |
4cc0 | 00 00 00 00 00 00 00 00 00 01 00 00 00 00 40 00 00 41 56 53 20 32 2e 38 2b 20 45 66 66 65 63 74 | ..............@..AVS.2.8+.Effect |
4ce0 | 20 4c 69 73 74 20 43 6f 6e 66 69 67 00 00 00 00 00 22 00 00 00 00 00 00 00 16 00 00 00 2f 2f 20 | .List.Config....."...........//. |
4d00 | 72 65 6e 64 65 72 26 62 6c 65 6e 64 20 20 73 68 69 70 00 00 00 00 00 28 00 00 00 04 00 00 00 02 | render&blend..ship.....(........ |
4d20 | 00 01 80 24 00 00 00 df 01 00 00 01 1a 01 00 00 73 74 3d 63 25 33 3b 20 0d 0a 64 3d 69 66 28 62 | ...$............st=c%3;...d=if(b |
4d40 | 6e 6f 74 28 73 74 29 2c 64 2d 70 69 78 2c 64 29 3b 0d 0a 72 3d 73 74 2a 2e 33 33 33 33 33 33 33 | not(st),d-pix,d);..r=st*.3333333 |
4d60 | 33 33 33 33 33 33 33 33 33 2a 24 70 69 2a 32 2b 24 70 69 2a 2e 35 3b 2f 2f 20 68 65 72 65 73 20 | 333333333*$pi*2+$pi*.5;//.heres. |
4d80 | 61 76 73 20 70 72 65 74 65 6e 64 69 6e 67 20 68 65 20 63 61 6e 20 72 65 61 64 20 6c 6f 6e 67 20 | avs.pretending.he.can.read.long. |
4da0 | 6e 75 6d 62 65 72 73 0d 0a 78 31 3d 63 6f 73 28 72 29 2a 64 2b 72 65 67 38 30 3b 20 0d 0a 79 31 | numbers..x1=cos(r)*d+reg80;...y1 |
4dc0 | 3d 72 65 67 38 31 3b 0d 0a 7a 31 3d 73 69 6e 28 72 29 2a 64 2b 72 65 67 38 33 3b 0d 0a 7a 3d 31 | =reg81;..z1=sin(r)*d+reg83;..z=1 |
4de0 | 2f 28 31 2b 7a 31 2a 2e 35 29 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 79 31 2a 7a 2a 72 65 67 | /(1+z1*.5);..x=x1*z;..y=y1*z*reg |
4e00 | 39 39 3b 0d 0a 72 65 67 39 37 3d 6d 69 6e 28 7a 31 2c 72 65 67 39 37 29 3b 0d 0a 72 65 64 3d 6d | 99;..reg97=min(z1,reg97);..red=m |
4e20 | 69 6e 28 69 2a 33 2c 31 29 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 3b 0d 0a 62 6c 75 65 3d 72 65 64 | in(i*3,1);..green=red;..blue=red |
4e40 | 3b 0d 0a 63 3d 63 2b 31 3b 00 40 00 00 00 63 3d 30 3b 0d 0a 64 3d 2e 32 35 3b 0d 0a 70 69 78 3d | ;..c=c+1;.@...c=0;..d=.25;..pix= |
4e60 | 32 2f 68 3b 0d 0a 6e 3d 64 2f 70 69 78 2a 33 3b 0d 0a 6c 69 6e 65 73 69 7a 65 3d 34 2a 72 65 67 | 2/h;..n=d/pix*3;..linesize=4*reg |
4e80 | 39 38 2a 72 65 67 38 34 3b 0d 0a 0d 0a 00 2c 00 00 00 67 65 74 3d 67 65 74 6f 73 63 28 30 2c 30 | 98*reg84;.....,...get=getosc(0,0 |
4ea0 | 2c 30 29 2a 74 62 2a 2e 30 30 30 30 30 31 3b 0d 0a 72 65 67 39 39 3d 77 2f 68 3b 0d 0a 00 38 00 | ,0)*tb*.000001;..reg99=w/h;...8. |
4ec0 | 00 00 2f 2f 73 68 69 70 3b 0d 0a 0d 0a 73 70 65 65 64 3d 2e 32 0d 0a 6d 78 3d 2e 35 3b 0d 0a 6d | ..//ship;....speed=.2..mx=.5;..m |
4ee0 | 79 3d 2e 33 3b 0d 0a 6e 65 77 78 3d 2e 32 3b 0d 0a 6e 65 77 79 3d 2e 37 3b 00 02 00 00 00 01 00 | y=.3;..newx=.2;..newy=.7;....... |
4f00 | 00 00 00 00 00 00 01 00 00 00 50 85 6d 0a 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 | ..........P.m.Acko.net:.Texer.II |
4f20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ae 01 00 00 00 00 00 00 61 76 73 72 65 73 5f 74 65 78 | ......................avsres_tex |
4f40 | 65 72 5f 63 69 72 63 6c 65 5f 73 68 61 72 70 5f 31 39 78 31 39 2e 62 6d 70 00 62 6d 70 00 00 00 | er_circle_sharp_19x19.bmp.bmp... |
4f60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4f80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4fa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4fc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
4fe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 | ................................ |
5040 | 00 00 01 00 00 00 00 00 00 00 14 00 00 00 6e 3d 32 3b 2f 2f 65 78 74 65 72 69 6f 72 20 72 69 6e | ..............n=2;//exterior.rin |
5060 | 67 73 24 00 00 00 73 69 7a 65 78 3d 72 65 67 39 38 2a 2e 34 38 2a 72 65 67 38 34 3b 0d 0a 73 69 | gs$...sizex=reg98*.48*reg84;..si |
5080 | 7a 65 79 3d 73 69 7a 65 78 3b 00 00 00 00 4e 00 00 00 7a 31 3d 2d 2e 31 35 2b 72 65 67 38 33 3b | zey=sizex;....N...z1=-.15+reg83; |
50a0 | 0d 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 31 3d 28 69 2d 2e 35 29 2a 2e 31 36 2b 72 | ..z=1/(1+z1/2);..x1=(i-.5)*.16+r |
50c0 | 65 67 38 30 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 72 65 67 38 31 2a 7a 2a 72 65 67 39 39 3b | eg80;..x=x1*z;..y=reg81*z*reg99; |
50e0 | 28 00 00 00 04 00 00 00 01 00 01 80 50 85 6d 0a 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 | (...........P.m.Acko.net:.Texer. |
5100 | 49 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 6c 03 00 00 00 00 00 00 61 76 73 72 65 73 5f 74 | II..............l.......avsres_t |
5120 | 65 78 65 72 5f 63 69 72 63 6c 65 5f 68 65 61 76 79 62 6c 75 72 5f 32 31 78 32 31 2e 62 6d 70 00 | exer_circle_heavyblur_21x21.bmp. |
5140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
51a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
51c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
51e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 | ................................ |
5220 | 00 00 00 00 01 00 00 00 00 00 00 00 6f 00 00 00 72 6f 77 3d 31 30 3b 20 63 6c 6d 3d 32 3b 65 66 | ............o...row=10;.clm=2;ef |
5240 | 3d 33 3b 0d 0a 6e 3d 72 6f 77 2a 63 6c 6d 3b 0d 0a 6f 66 78 3d 31 2f 63 6c 6d 3b 0d 0a 6f 66 79 | =3;..n=row*clm;..ofx=1/clm;..ofy |
5260 | 3d 31 2f 72 6f 77 3b 0d 0a 6d 6f 78 3d 32 2a 6f 66 78 3b 0d 0a 6d 6f 79 3d 32 2a 6f 66 79 3b 0d | =1/row;..mox=2*ofx;..moy=2*ofy;. |
5280 | 0a 73 74 61 72 74 78 3d 2d 31 2b 6f 66 78 3b 0d 0a 73 74 61 72 74 79 3d 2d 31 2d 6f 66 79 3b 29 | .startx=-1+ofx;..starty=-1-ofy;) |
52a0 | 00 00 00 6c 69 67 3d 6d 61 78 28 30 2c 6d 69 6e 28 31 2c 6c 69 67 2b 62 2d 2e 30 33 29 29 3b 0d | ...lig=max(0,min(1,lig+b-.03));. |
52c0 | 0a 63 3d 30 3b 0d 0a 7a 31 3d 30 3b 00 00 00 00 ac 01 00 00 67 78 3d 63 25 63 6c 6d 3b 20 0d 0a | .c=0;..z1=0;........gx=c%clm;... |
52e0 | 78 31 3d 67 78 2a 2e 31 36 2d 2e 30 38 3b 20 20 0d 0a 7a 31 3d 69 66 28 62 6e 6f 74 28 67 78 29 | x1=gx*.16-.08;....z1=if(bnot(gx) |
5300 | 2c 6d 69 6e 28 7a 31 2d 2e 30 31 2c 7a 31 2d 2e 30 37 2b 2e 33 2a 74 68 72 75 73 74 29 2c 7a 31 | ,min(z1-.01,z1-.07+.3*thrust),z1 |
5320 | 29 3b 20 20 0d 0a 74 68 72 3d 67 65 74 6f 73 63 28 2d 7a 31 2c 2e 31 2c 32 29 2a 7a 31 2a 32 3b | );....thr=getosc(-z1,.1,2)*z1*2; |
5340 | 0d 0a 74 68 72 32 3d 67 65 74 6f 73 63 28 2d 7a 31 2c 2e 31 2c 31 29 2a 7a 31 2a 32 3b 20 20 20 | ..thr2=getosc(-z1,.1,1)*z1*2;... |
5360 | 0d 0a 74 68 72 75 73 74 3d 69 66 28 67 78 2c 74 68 72 2c 74 68 72 32 29 3b 20 0d 0a 63 3d 63 2b | ..thrust=if(gx,thr,thr2);...c=c+ |
5380 | 31 3b 0d 0a 7a 32 3d 7a 31 2d 2e 31 35 2b 72 65 67 38 33 3b 0d 0a 69 66 28 62 65 6c 6f 77 28 7a | 1;..z2=z1-.15+reg83;..if(below(z |
53a0 | 32 2c 2d 31 2e 39 39 29 2c 61 73 73 69 67 6e 28 7a 32 2c 2d 31 2e 39 39 29 2c 30 29 3b 0d 0a 7a | 2,-1.99),assign(z2,-1.99),0);..z |
53c0 | 3d 31 2f 28 31 2b 7a 32 2f 32 29 3b 0d 0a 78 3d 28 78 31 2b 72 65 67 38 30 2d 7a 31 2a 2d 72 65 | =1/(1+z2/2);..x=(x1+reg80-z1*-re |
53e0 | 67 31 34 2a 65 66 29 2a 7a 3b 0d 0a 79 3d 28 79 31 2b 72 65 67 38 31 2d 7a 31 2a 2d 72 65 67 31 | g14*ef)*z;..y=(y1+reg81-z1*-reg1 |
5400 | 35 2a 65 66 29 2a 7a 2a 72 65 67 39 39 3b 0d 0a 73 69 7a 65 78 3d 6d 69 6e 28 32 2c 61 62 73 28 | 5*ef)*z*reg99;..sizex=min(2,abs( |
5420 | 28 31 2e 34 2b 7a 31 29 2a 72 65 67 39 38 2a 2e 33 2b 74 68 72 75 73 74 2a 2d 7a 31 2a 33 29 29 | (1.4+z1)*reg98*.3+thrust*-z1*3)) |
5440 | 2a 7a 3b 0d 0a 73 69 7a 65 79 3d 73 69 7a 65 78 3b 0d 0a 72 65 64 3d 2e 31 2b 6c 69 67 2a 2e 39 | *z;..sizey=sizex;..red=.1+lig*.9 |
5460 | 2a 2d 7a 31 3b 0d 0a 67 72 65 65 6e 3d 72 65 64 3b 20 20 0d 0a 62 6c 75 65 3d 72 65 64 3b 0d 0a | *-z1;..green=red;....blue=red;.. |
5480 | 12 00 00 00 10 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 00 00 00 00 19 00 00 00 14 00 00 00 | ................................ |
54a0 | 01 00 00 00 ff ff ff 00 00 00 00 00 00 00 00 00 00 00 00 00 25 00 00 00 04 00 00 00 00 00 00 00 | ....................%........... |
54c0 | 28 00 00 00 04 00 00 00 04 00 01 80 50 85 6d 0a 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 | (...........P.m.Acko.net:.Texer. |
54e0 | 49 49 00 00 00 00 00 00 00 00 00 00 00 00 00 00 cc 01 00 00 00 00 00 00 61 76 73 72 65 73 5f 74 | II......................avsres_t |
5500 | 65 78 65 72 5f 63 69 72 63 6c 65 5f 65 64 67 65 6f 6e 6c 79 5f 31 39 78 31 39 2e 62 6d 70 00 00 | exer_circle_edgeonly_19x19.bmp.. |
5520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
55a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
55c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
55e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 | ................................ |
5600 | 00 00 00 00 01 00 00 00 00 00 00 00 14 00 00 00 6e 3d 32 3b 2f 2f 65 78 74 65 72 69 6f 72 20 72 | ................n=2;//exterior.r |
5620 | 69 6e 67 73 42 00 00 00 73 69 7a 65 78 3d 72 65 67 39 38 2a 2e 34 2a 72 65 67 38 34 3b 0d 0a 73 | ingsB...sizex=reg98*.4*reg84;..s |
5640 | 69 7a 65 79 3d 73 69 7a 65 78 3b 0d 0a 72 65 64 3d 2e 31 3b 0d 0a 67 72 65 65 6e 3d 2e 35 3b 0d | izey=sizex;..red=.1;..green=.5;. |
5660 | 0a 62 6c 75 65 3d 2e 35 0d 0a 00 00 00 00 4e 00 00 00 7a 31 3d 2d 2e 31 35 2b 72 65 67 38 33 3b | .blue=.5......N...z1=-.15+reg83; |
5680 | 0d 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 31 3d 28 69 2d 2e 35 29 2a 2e 31 36 2b 72 | ..z=1/(1+z1/2);..x1=(i-.5)*.16+r |
56a0 | 65 67 38 30 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 72 65 67 38 31 2a 7a 2a 72 65 67 39 39 3b | eg80;..x=x1*z;..y=reg81*z*reg99; |
56c0 | 50 85 6d 0a 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 00 00 00 00 00 00 00 00 00 00 | P.m.Acko.net:.Texer.II.......... |
56e0 | 00 00 00 00 f7 01 00 00 00 00 00 00 61 76 73 72 65 73 5f 74 65 78 65 72 5f 63 69 72 63 6c 65 5f | ............avsres_texer_circle_ |
5700 | 68 65 61 76 79 62 6c 75 72 5f 31 39 78 31 39 2e 62 6d 70 00 00 00 00 00 00 00 00 00 00 00 00 00 | heavyblur_19x19.bmp............. |
5720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
57a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
57c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
57e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 | ................................ |
5800 | 14 00 00 00 6e 3d 32 3b 2f 2f 65 78 74 65 72 69 6f 72 20 72 69 6e 67 73 6d 00 00 00 73 69 7a 65 | ....n=2;//exterior.ringsm...size |
5820 | 78 3d 72 65 67 39 38 2a 2e 33 2a 72 65 67 38 34 3b 0d 0a 73 69 7a 65 79 3d 73 69 7a 65 78 3b 0d | x=reg98*.3*reg84;..sizey=sizex;. |
5840 | 0a 6c 69 67 3d 6d 61 78 28 30 2c 6d 69 6e 28 2e 35 2c 6c 69 67 2b 62 2d 2e 30 31 35 29 29 3b 0d | .lig=max(0,min(.5,lig+b-.015));. |
5860 | 0a 72 65 64 3d 2e 31 2b 6c 69 67 3b 0d 0a 67 72 65 65 6e 3d 2e 35 2b 6c 69 67 2a 2e 35 3b 0d 0a | .red=.1+lig;..green=.5+lig*.5;.. |
5880 | 62 6c 75 65 3d 2e 35 0d 0a 00 00 00 00 4e 00 00 00 7a 31 3d 2d 2e 31 33 2b 72 65 67 38 33 3b 0d | blue=.5......N...z1=-.13+reg83;. |
58a0 | 0a 7a 3d 31 2f 28 31 2b 7a 31 2f 32 29 3b 0d 0a 78 31 3d 28 69 2d 2e 35 29 2a 2e 31 36 2b 72 65 | .z=1/(1+z1/2);..x1=(i-.5)*.16+re |
58c0 | 67 38 30 3b 0d 0a 78 3d 78 31 2a 7a 3b 0d 0a 79 3d 72 65 67 38 31 2a 7a 2a 72 65 67 39 39 3b 50 | g80;..x=x1*z;..y=reg81*z*reg99;P |
58e0 | 85 6d 0a 41 63 6b 6f 2e 6e 65 74 3a 20 54 65 78 65 72 20 49 49 00 00 00 00 00 00 00 00 00 00 00 | .m.Acko.net:.Texer.II........... |
5900 | 00 00 00 9c 03 00 00 00 00 00 00 61 76 73 72 65 73 5f 74 65 78 65 72 5f 63 69 72 63 6c 65 5f 68 | ...........avsres_texer_circle_h |
5920 | 65 61 76 79 62 6c 75 72 5f 32 31 78 32 31 2e 62 6d 70 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | eavyblur_21x21.bmp.............. |
5940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
59a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
59c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
59e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
5a00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 01 00 00 00 00 00 00 00 6f | ...............................o |
5a20 | 00 00 00 72 6f 77 3d 31 30 3b 20 63 6c 6d 3d 32 3b 65 66 3d 33 3b 0d 0a 6e 3d 72 6f 77 2a 63 6c | ...row=10;.clm=2;ef=3;..n=row*cl |
5a40 | 6d 3b 0d 0a 6f 66 78 3d 31 2f 63 6c 6d 3b 0d 0a 6f 66 79 3d 31 2f 72 6f 77 3b 0d 0a 6d 6f 78 3d | m;..ofx=1/clm;..ofy=1/row;..mox= |
5a60 | 32 2a 6f 66 78 3b 0d 0a 6d 6f 79 3d 32 2a 6f 66 79 3b 0d 0a 73 74 61 72 74 78 3d 2d 31 2b 6f 66 | 2*ofx;..moy=2*ofy;..startx=-1+of |
5a80 | 78 3b 0d 0a 73 74 61 72 74 79 3d 2d 31 2d 6f 66 79 3b 2d 00 00 00 0d 0a 6c 69 67 3d 6d 61 78 28 | x;..starty=-1-ofy;-.....lig=max( |
5aa0 | 30 2c 6d 69 6e 28 2e 35 2c 6c 69 67 2b 62 2d 2e 30 31 35 29 29 3b 0d 0a 63 3d 30 3b 0d 0a 7a 31 | 0,min(.5,lig+b-.015));..c=0;..z1 |
5ac0 | 3d 30 3b 00 00 00 00 d8 01 00 00 67 78 3d 63 25 63 6c 6d 3b 0d 0a 78 31 3d 67 78 2a 2e 31 36 2d | =0;........gx=c%clm;..x1=gx*.16- |
5ae0 | 2e 30 38 3b 0d 0a 7a 31 3d 69 66 28 62 6e 6f 74 28 67 78 29 2c 6d 69 6e 28 7a 31 2d 2e 30 31 2c | .08;..z1=if(bnot(gx),min(z1-.01, |
5b00 | 7a 31 2d 2e 30 37 2b 2e 33 2a 74 68 72 75 73 74 29 2c 7a 31 29 3b 20 20 0d 0a 74 68 72 3d 67 65 | z1-.07+.3*thrust),z1);....thr=ge |
5b20 | 74 6f 73 63 28 2d 7a 31 2c 2e 31 2c 32 29 2a 7a 31 2a 32 3b 0d 0a 74 68 72 32 3d 67 65 74 6f 73 | tosc(-z1,.1,2)*z1*2;..thr2=getos |
5b40 | 63 28 2d 7a 31 2c 2e 31 2c 31 29 2a 7a 31 2a 32 3b 0d 0a 74 68 72 75 73 74 3d 69 66 28 67 78 2c | c(-z1,.1,1)*z1*2;..thrust=if(gx, |
5b60 | 74 68 72 2c 74 68 72 32 29 3b 20 20 20 0d 0a 63 3d 63 2b 31 3b 0d 0a 7a 32 3d 7a 31 2d 2e 31 35 | thr,thr2);.....c=c+1;..z2=z1-.15 |
5b80 | 2b 72 65 67 38 33 3b 0d 0a 69 66 28 62 65 6c 6f 77 28 7a 32 2c 2d 31 2e 39 39 29 2c 61 73 73 69 | +reg83;..if(below(z2,-1.99),assi |
5ba0 | 67 6e 28 7a 32 2c 2d 31 2e 39 39 29 2b 61 73 73 69 67 6e 28 73 6b 69 70 2c 31 29 2c 30 29 3b 0d | gn(z2,-1.99)+assign(skip,1),0);. |
5bc0 | 0a 7a 3d 31 2f 28 31 2b 7a 32 2f 32 29 3b 0d 0a 78 3d 28 78 31 2b 72 65 67 38 30 2d 7a 31 2a 2d | .z=1/(1+z2/2);..x=(x1+reg80-z1*- |
5be0 | 72 65 67 31 34 2a 65 66 29 2a 7a 3b 0d 0a 79 3d 28 79 31 2b 72 65 67 38 31 2d 7a 31 2a 2d 72 65 | reg14*ef)*z;..y=(y1+reg81-z1*-re |
5c00 | 67 31 35 2a 65 66 29 2a 7a 2a 72 65 67 39 39 3b 0d 0a 73 69 7a 65 78 3d 6d 69 6e 28 32 2c 61 62 | g15*ef)*z*reg99;..sizex=min(2,ab |
5c20 | 73 28 28 31 2e 34 2b 7a 31 29 2a 72 65 67 39 38 2a 2e 33 2b 74 68 72 75 73 74 2a 2d 7a 31 2a 35 | s((1.4+z1)*reg98*.3+thrust*-z1*5 |
5c40 | 29 29 2a 7a 3b 0d 0a 73 69 7a 65 79 3d 73 69 7a 65 78 3b 0d 0a 72 65 64 3d 2e 32 2d 6c 69 67 2a | ))*z;..sizey=sizex;..red=.2-lig* |
5c60 | 7a 31 2b 7a 32 2a 2e 35 2a 2e 31 3b 20 0d 0a 67 72 65 65 6e 3d 2e 32 2d 6c 69 67 2a 7a 31 2a 2e | z1+z2*.5*.1;...green=.2-lig*z1*. |
5c80 | 32 2b 7a 32 2a 2e 35 2a 2e 31 3b 0d 0a 62 6c 75 65 3d 2e 33 2d 6c 69 67 2a 2d 7a 31 2b 7a 32 2a | 2+z2*.5*.1;..blue=.3-lig*-z1+z2* |
5ca0 | 2e 31 3b 25 00 00 00 04 00 00 00 01 00 00 00 | .1;%........... |