:Labelbuy
0001: wait 0 ms   
03A4: name_thread "BUY"

:labelbuyload
03BC: $3F = create_sphere -1734.270 -1708.423 13.887  5.0
0247: request_model #DELUXO
038B: load_requested_models

:Labelbuy2 
0001: wait 0 ms
00d6: if 0
00e3: player $PLAYER_CHAR 0 ()near_point -1734.270 -1708.423 radius 1.0 1.0
004d: jump_if_false ££Labelbuy2
00D6: if  0
010A:  player $PLAYER_CHAR money >  2500
004d: jump_if_false ££Labelbuy2
0109: player $PLAYER_CHAR money += -2500 
00A5: $10 = create_car #DELUXO at -1724.941 -1707.464 14.387
0175: set_car $10 z_angle_to  0.0
0001: wait 5000 ms
0002: jump ££Labelbuy2