Dragons, Druids, and Dice - Dice Roller
Source Code for TI-95 1.0
Note: when entering code, the NUM key has R# and INT

0000   LBL RD
0003   DFN F1: R4D@R4
0010   DFN F2: R6D@R6
0017   DFN F3: R8D@R8
0024   DFN F4: 10D@R1
0031   DFN F5: 20D@R2

0038   LBL R4
0041   'ROLLED 4D'
0050   PAU
0051   PAU
0052   (4* R# +1) INT       
0060   HLT 
   
0061   LBL R6
0064   'ROLLED 6D'
0073   PAU
0074   PAU
0075   (6* R# +1) INT  
0083   HLT
     
0084   LBL R8
0087   'ROLLED 8D'
0096   PAU
0097   PAU
0098   (8* R# +1) INT  
0106   HLT

0107   LBL R1
0110   'ROLLED 10D'
0120   PAU
0121   PAU
0122   (10* R# +1) INT  
0131   HLT

0132   LBL R2
0135   'ROLLED 20D'
0145   PAU
0146   PAU
0147   (20* R# +1) INT  
0156   HLT