Pecus/scorch_src
1
0
Fork 0
mirror of https://github.com/Pecusx/scorch_src.git synced 2026-05-20 22:33:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Minimally different menu layout.

Browse Source
This commit is contained in:
Pecusx
2022-11-05 22:50:35 +01:00
parent 9575dcee11
commit 1eae4054ed
4 changed files with 11 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
display_main_menu.asm
+9 -9
View File
@@ -6,15 +6,15 @@
;----------------------------------------------- ;-----------------------------------------------
OptionsHere OptionsHere
; 0123456789012345678901234567890123456789 ; 0123456789012345678901234567890123456789
dta d"Players : 2 3 4 5 6 " dta d"Players : 2 3 4 5 6 "
dta d"Cash : none 2K 8K 12K 20K " dta d"Cash : none 2K 8K 12K 20K "
dta d"Gravity : 0.2G 0.5G 1G 2G 4G " dta d"Gravity : 0.2G 0.5G 1G 2G 4G "
dta d"Wind : 1B 3B 5B 7B 9B " dta d"Wind : 1B 3B 5B 7B 9B "
dta d"Rounds : 10 20 30 40 50 " dta d"Rounds : 10 20 30 40 50 "
dta d"Missiles : slug slow norm fast hare " dta d"Missiles : slug slow norm fast hare "
dta d"Seppuku : nevr rare norm oftn alws " dta d"Seppuku : nevr rare norm oftn alws "
dta d"Mountains: NL BE CZ CH NP " dta d"Mountains: NL BE CZ CH NP "
dta d"Walls : none wrap bump boxy rand " dta d"Walls : none wrap bump boxy rand "
;; 01234567890123456789012345678901 ;; 01234567890123456789012345678901
; dta d"Players: 2 3 4 5 6 " ; dta d"Players: 2 3 4 5 6 "
; dta d"Cash :none 2K 8K 12K 20K" ; dta d"Cash :none 2K 8K 12K 20K"
scorch.bin
BIN
View File
Binary file not shown.
scorch.xex
BIN
View File
Binary file not shown.
textproc.asm
+2 -1
View File
@@ -187,13 +187,14 @@ OptionsInversionLoop1
mwa #OptionsHere temp mwa #OptionsHere temp
mva #0 temp2 ;option number pointer mva #0 temp2 ;option number pointer
adw temp #11 ;offset of the first option=11 adw temp #10 ;offset of the first option=11
OptionsSetMainLoop OptionsSetMainLoop
ldx temp2 ldx temp2
lda OptionsTable,x lda OptionsTable,x
asl asl
asl asl
adc OptionsTable,x ;OptionsTable value * 5 adc OptionsTable,x ;OptionsTable value * 5
adc OptionsTable,x ;OptionsTable value * 6
tay tay
ldx #6-1 ; width of the highlight bar (6 chars) ldx #6-1 ; width of the highlight bar (6 chars)
OptionSetLoop OptionSetLoop