Digirule2JnR

Digirule2JnR

// Some handy constants
%define grounded              240
%define AirTime             241
%define Area1             242
%define Area1.2             243
%define Area2.1             244
%define Area2.2             245
%define Area3.1             246
%define Area3.2             247
%define Area4.1             248
%define Area4.2             249
%define Timer               250
%define Level               251
%define statusRegister      252
%define buttonRegister      253
%define addressLEDRegister  254
%define dataLEDRegister     255

%define PlayerBit 6


// My App

// Setup
Speed 128
SBR 2 StatusRegister

COPYLR 5 AirTime
Copyra AirTime
Copylr 0 Timer

Copylr 1 Area1
//Copylr 0 Area1.2

//Copylr 0 Area2.1
//Copylr 0 Area2.2

//Copylr 0 Area3.1
//Copylr 0 Area3.2

//COPYLR 0 Area4.1
//COPYLR 0 Area4.2





// Loop
:Loop


BCRSC PlayerBit ButtonRegister
Call jump

BCRSS PlayerBit ButtonRegister
Call Land
jump loop // Loop forever

:jump
CBR 6 DataLEDRegister
SBR 6 AddressLEDRegister
CBR 0 Grounded
Return

:Land 
CBR 6 AddressLEDRegister
SBR 6 DataLEDRegister
SBR 0 Grounded
Return

:Scroll
BCRSC 0 Grounded
CBR 6 DataLEDRegister
BCRSS 0 Grounded
CBR 6 AddressLEDRegister
ShiftRL Area1
ShiftRL DataLEDRegister
BCRSC PlayerBit DataLEDRegister
call checkColl

BCRSC 0 Grounded
SBR 6 DataLEDRegister
Return

:checkColl
bcrsc 0 grounded
halt
return