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

000   LBL RD
003   DFN F1: R4D@R4
010   DFN F2: R6D@R6
017   DFN F3: R8D@R8
024   DFN F4: 10D@R1
031   DFN F5: 20D@R2

038   LBL R4
041   'ROLLED 4D'
050   PAU
051   PAU
052   (4* R# +1) INT       
060   HLT 
   
061   LBL R6
064   'ROLLED 6D'
073   PAU
074   PAU
075   (6* R# +1) INT  
083   HLT
     
084   LBL R8
087   'ROLLED 8D'
096   PAU
097   PAU
098   (8* R# +1) INT  
106   HLT

107   LBL R1
110   'ROLLED 10D'
120   PAU
121   PAU
122   (10* R# +1) INT  
131   HLT

132   LBL R2
135   'ROLLED 20D'
145   PAU
146   PAU
147   (20* R# +1) INT  
156   HLT