ùúùúÿñp‡ÿñp‡ <ÿñp‡ÿñp‡ÿñp‡ÿñp‡ÿñp‡ÿñp‡ ;Z;Q;og ST... PENETRATE: equ 3 TIMESHOW: equ 13 TRIPLE1: equ 14 TRIPLE2: equ 15 LOOK1: equ 16 LOOK2: equ 17 SBACK1: equ 18 SBACK2: equ 19 WEAPSUB: equ 20 LIV1: equ 23 LIV2: equ 24 AIR: equ 25 FRG1: equ 26 FRG2: equ 27 THR_K: equ 28 FUEL_TNK: equ 29 AMMO_TNK: equ 30 RELOAD1: equ 9 RELOAD2: equ 10 ENERGY_M: equ 31 SHOTS_W: equ 4 PL2_tD: equ 33 FAST: equ 34 L_PAUS: equ 35 KROCK_FX: equ 36 WCOLLFIX: equ 37 SPGUID1: equ 38 SPGUID2: equ 39 SFX1B: equ 40 SFX2B: equ 41 GLAPP1: equ 42 GLAPP2: equ 43 RECORD1: equ 44 ASK_UNFAIR: equ 45 ;no=0,yes=2,longw TSCMDS: equ 46 SINGLE: equ 47 FLIPP: equ 48 PREFS_FIL: equ 49 SCREEN_MODE: equ 50 J_DELAY: equ 51 KEY_B: equ 52 REKYL: equ 53 SMART_M: equ 54 BENEFACTOR: equ 55 IGNORE_PL2: equ 56 MULTIS: equ 57 BONUS_PODS: equ 58 INVIS1: equ 59 INVIS2: equ 60 W: equ $10000 GFP_VERSION: equ $47465006 ;'GFP',6 section menyer,code ule: move.l d0,prev move.l d0,mainmenu move.l d0,qqq1 move.l d0,qqq2 move.l d0,qqq3 ; move.l d0,qqq4 move.l d0,qqq5 ; move.l d0,qqq6 move.l d0,qqq7 ; move.l d0,qqq8 ; move.l d0,qqq9 ; move.l d0,qqq10 ; move.l d0,qqq11 ; move.l d0,qqq12 ; move.l d0,qqq13 ; move.l d0,qqq14 move.l d0,qqq15 ; move.l d0,qqq16 move.l d0,qqq17 move.l d0,qqq18 move.l d0,qqq87 move.l d0,qqq51 move.l d0,imain move.l d1,stat_adr lea Menyadrs,a0 lea Bildstruct,a1 move.l #instr_meny,d0 move.l #pl2_hl,d1 move.l #ch_fusk,d2 move.l #dis2m,d3 move.l #ask_u_act,d4 move.l #scr_mode,d5 rts dc.b '$VER: GPX_M.DAT 950406',10,0 even Menyadrs: dc.l prefs,posi_plats,save_kod,use_prefs save_menys: dc.l cheatmeny,shotsmeny,worldm,envm,envm2,back1 dc.l back2,cann1,cann2,pl1prefs,pl2prefs,col1m,col2m,hidden dc.l miscm,prefs,worldm2 dc.l 0 use_prefs: ;a4=adr till menyadrs move.l (PREFS_FIL*4)(a4),a3 cmp.l #GFP_VERSION,(a3)+ bne.w .nehepp lea save_menys,a0 .fixm: move.l (a0)+,a1 cmp.l #0,a1 beq.w .nehepp move.l 4(a1),d0 addq.l #1,d0 mulu #20,d0 add.l #12,d0 move.l (a3)+,(a1,d0) move.l (a3)+,4(a1,d0) lea (a1,d0),a2 move.l 4(a1),d7 addq.l #8,a1 moveq #0,d6 .procn: move.l 16(a1),d2 ext.l d2 asl.l #2,d2 move.l (a4,d2),a6 move.w (a1),d0 beq.s .mat subq.w #1,d0 move.b (a2,d0.w),d1 cmp.b d1,d6 bne.s .next move.l 8(a1),d0 move.l 12(a1),d1 cmp.b #1,d0 bne.s .n1 move.l d1,(a6) .n1: cmp.b #213,d0 beq.s .j2 cmp.b #2,d0 bne.s .n2 .j2: move.w d1,(a6) .n2: cmp.b #3,d0 bne.s .next move.b d1,(a6) bra.s .next .mat: cmp.l #5,8(a1) bne.s .next moveq #0,d0 move.w 14(a1),d0 moveq #0,d1 move.w (a3),12(a1) move.w (a3)+,d1 mulu d1,d0 swap d0 move.w d0,(a6) .next: add.l #20,a1 addq.l #1,d6 dbf d7,.procn bra.w .fixm .nehepp: rts save_kod: ;a4 pekar på menyadrs move.l (PREFS_FIL*4)(a4),a3 move.l #GFP_VERSION,(a3)+ lea save_menys,a0 .fixm: move.l (a0)+,a1 cmp.l #0,a1 beq.w .nehepp move.l 4(a1),d0 addq.l #1,d0 mulu #20,d0 add.l #12,d0 move.l (a1,d0),(a3)+ move.l 4(a1,d0),(a3)+ lea (a1,d0),a2 move.l 4(a1),d7 addq.l #8,a1 moveq #0,d6 .procn: move.l 16(a1),d2 ext.l d2 asl.l #2,d2 cmp.l #5,8(a1) bne.s .next move.w 12(a1),(a3)+ .next: add.l #20,a1 addq.l #1,d6 dbf d7,.procn bra.s .fixm .nehepp: rts ;- - - - - - - - - cheatmeny: dc.l cheatt,11 dc.l 60,60,2,250,Liv1 dc.l 60,69,2,250,Liv2 dc.l 60,96,1,0,GLAPP1 dc.l 60,105,5,$000000ff,GLAPP1 dc.l 60,114,5,$000000ff,GLAPP2 dc.l 60,132,2,0,J_DELAY dc.l 60,141,2,5,J_DELAY dc.l 60,150,2,15,J_DELAY dc.l 60,159,2,40,J_DELAY dc.l $10000+60,179,2+256,1,TIMESHOW dc.l $10000+60,188,2+256,0,TIMESHOW dc.l 15,225,0 qqq15: dc.l 0,0 dc.l 0 dc.b 10,0,0,0,0,0,0,0 CheatT: dc.b '¹y',30,'¹D¹z¹f4Are we Cheating?¹n¹b',60,60 dc.b '250 lives to Player 1',10 dc.b '250 lives to Player 2',10,10,10 dc.b 'No Glappkontakt',10 dc.b 'Glappkontakt Ply 1',10 dc.b 'Glappkontakt Ply 2',10,10 dc.b 'No Joystick Delay',10 dc.b '5 Frames Delay',10 dc.b '15 Frames Delay',10 dc.b '40 Frames Delay',10 dc.b '¹y',179,'¹f3TimeShow ON',10,'TimeShow OFF',10 dc.b '¹b',15,225,'¹f7OK, back to Main Menu now!',0 even FStatmeny: dc.l FSnixT,11 dc.l 60,60,201,4,1 dc.l 60,69,201,16,1 dc.l 60,78,201,20,1 dc.l 60,87,201,24,1 dc.l 60,96,201,8,15000 dc.l 60,105,201,12,10000 dc.l 60,123,201,4,-1 dc.l 60,132,201,16,-1 dc.l 60,141,201,20,-1 dc.l 60,150,201,24,-1 dc.l 60,159,201,8,-15000 dc.l 60,168,201,12,-10000 dc.l Fstatmeny,0,0 FSnixT: dc.b '¹y',30,'¹d¹z¹f4Change Stats¹n' dc.b '¹b',60,60 dc.b '¹f1Sub Played Match',10,'Sub Time Started' dc.b 10,'Sub Match >20 sec',10,'Sub Race' dc.b 10,'Sub 5 minutes time',10,'Sub 10000 shots',10,10 dc.b '¹f3Add Played Match',10,'Add Time Started' dc.b 10,'Add Match >20 sec',10,'Add Race' dc.b 10,'Add 5 minutes time',10,'Add 10000 shots' even ltmeny: dc.l ltT,0 dc.l 15,225,0 qqq5: dc.l 0,0,0,0,0 ltT: dc.b '¹y',30,'¹d¹z¹f6THE LT-INFO SCREEN!!!¹n¹b',10,80 dc.b '¹f2 This fantastic super mega advanced font combines L and T ' dc.b 'in a very nice way. Just look at this...',10,10 dc.b '¹z¹f4LTLTLTLTLTLTLTLTLTLTLTLTLT¹b',15,225,'¹f7So What?',0 even ; --------------------------------------- smilemeny: dc.l smilet,0 dc.l 15,225,0,smilemeny,0,0,0,0 smilet: dc.b '¹y',30,'¹d¹z¹f4THE SMILEY-SCREEN!¹n¹b',10,60 dc.b '¹z¹f2Look at this quite advanced smiley:',10,10,10,10 dc.b '¹D¹z¹f7O +-