all repos — soulgrind @ 8aaf182b8ee7afd212f08b403ea80304206c7993

arcade-style rollerblading game in uxntal with xrxs multiplayer 

setting up to start 1p programming
Iris Lightshard nilix@nilfm.cc
PGP Signature 
-----BEGIN PGP SIGNATURE-----

iQIzBAABCAAdFiEEkFh6dA+k/6CXFXU4O3+8IhROY5gFAmIX+C0ACgkQO3+8IhRO
Y5i/Pw/7Bz6UOeeq2nPQ9uJxBgSOJlNy16hzkPY7itCx4ZVvpHrBJNd+cLhXW4+T
6a9dZ6NGj/o986X/9j8ycYpMf3/EszZGcfXyqW4I1y1HqJ7KSK9pfRCGFnSBucgu
QP0v0hLilanaCM0A7lf3RD53lA1oZp8+DEHrxRpWfclD4Y1jaabDGyfx5mAfsMYR
01mP0OSPPdN6vvX2H3rURQFQ/AOBBfhciyfPyj45jBrw/yxJhrufGArr5P+h5cTt
i5d7hx0l/44VDiXlk4j0TlkNXHguUppB8nMddcPI9HXUAVP8mxVdvnNrFMnLvzc2
LKVtasO8kW1Q9WD4+6Wp4pLh2+g1OXP6HXoQeoYe7gNxSDR6hhKqbMILac6hI/xF
EpoZwMawuyk9HH+HAFAEU8JIaeCwh9gJCOD+mmx+ZLszLxXJHeOBChIRUcvCGVje
jwpYMtm+wjewsVYhT9Po1x7so+pfeMfLOSGzJdTlCnDVod8GM2ZjUEzcYIST2hY4
Ekb7V66O226c9cCah+RygUqt/PVxeWAddgvoYm9SrBhc3f98m3vEAmELhyOEhPcU
Cblk6K63O/XwRExnX+lQ0nx6SE7piNr2jjK/fsBWN9i1w3h2QZYOfCc0YYCO2vp1
dqVg/q1p4KzwcW3zrREvL0EbAZfYZP51CRjKXLABV7eWEabQ2P0=
=DDo8
-----END PGP SIGNATURE-----
commit

8aaf182b8ee7afd212f08b403ea80304206c7993

parent

7caa246483409cc81c22f969a8803ed90d69ecc7

3 files changed, 51 insertions(+), 1 deletions(-)

jump to
M blueprint.yml → blueprint.yml 
@@ -16,3 +16,11 @@ - hex: 0x30
     meaning: play-single
   - hex: 0x40
     meaning: play-multi
+    
+- name: mapRules
+  rules: [
+    "must have at least one free row"
+    "rails must be at least 8 tiles long (5 mid + start/end)"
+    "must have at least 8 tiles of free row before next rail"
+  ]
+
M soulgrind.tal → soulgrind.tal 
@@ -114,6 +114,7 @@ 
   ;buffer .File/read DEO2
   .File/success DEI2 #0000 NEQ2 .xrxs STZ
 
+  ;prng-init JSR2
 
   ;main-loop .Screen/vector DEO2
   ;key-listen-press-start .Controller/vector DEO2

@@ -326,6 +327,32 @@ SWP2 SUB2
   
 RTN
 
+( random )
+
+@prng-init ( -- )
+
+  ( seed )
+  #00 .DateTime/second DEI
+  #00 .DateTime/minute DEI #60 SFT2 EOR2
+  #00 .DateTime/hour   DEI #c0 SFT2 EOR2 ,prng/x STR2
+  #00 .DateTime/hour   DEI #04 SFT2
+  #00 .DateTime/day    DEI #10 SFT2 EOR2
+  #00 .DateTime/month  DEI #60 SFT2 EOR2
+      .DateTime/year  DEI2 #a0 SFT2 EOR2 ,prng/y STR2
+
+JMP2r
+
+@prng ( -- number* )
+
+  LIT2 &x $2
+  DUP2 #50 SFT2 EOR2
+  DUP2 #03 SFT2 EOR2
+  LIT2 &y $2 DUP2 ,&x STR2
+  DUP2 #01 SFT2 EOR2 EOR2
+  ,&y STR2k POP
+
+JMP2r
+
 @print-hex ( value -- )
 	
 	STHk #04 SFT ,&parse JSR .Console/write DEO

@@ -380,4 +407,19 @@ 00 00 44 28 10 28 44 00 00 00 44 44 3c 04 78 00    00 00 7c 04 38 40 7c 00 00 1e 10 10 10 00 00 00
   00 10 10 10 10 10 10 00 00 00 00 08 08 08 78 00    00 00 00 32 4c 00 00 00 3c 42 99 a1 a1 99 42 3c 
 ]
 
-@titlescreen $bc00
+@rail-start [ 0000 0000 0f10 0000 0000 000f 1f3f 3c38
+              0000 0000 0000 0000 3838 3838 3838 0000 ]
+@rail-mid   [ 0000 0000 ff00 0000 0000 00ff ffff 0000
+              0000 0000 0000 0000 0000 0000 0000 0000 ]
+@rail-end   [ 0000 0000 f000 0000 0000 00f0 f8f8 3c1c
+              0000 0000 0000 0000 1c1c 1c1c 1c1c 1c00 ]
+
+@blader-placeholder
+            [ ffff ffff ffff 0000 0000 0705 0507 ffff
+              ffff ffff ffff 0000 0000 e0a0 e0a0 ffff
+              00e0 e0e0 e0ff ffff ffff ffff ff00 0000
+              0007 0707 07ff ffff ffff ffff ff00 0000
+              ffff ffff ff93 93ff 0000 0000 006c 6c00
+              ffff ffff ffc9 c9ff 0000 0000 0036 3600 ]
+
+@titlescreen $bc00